TextColor()

Computer: Software & Programmierung Delphi & Pascal
#1

Hallo…

Erstelle ich in Delphi 7 eine Konsolenanwendung müsste ich mich mit vielen Dingen wieder dem guten alten Pascal nähern können. Nun stellte ich jedoch fest, da ich nun eine Konsolenanwendung schreiben möchte, dass es auf den ersten Blick gar keine Möglichkeit gibt die Farbe der auszugegeben Zeichen über WriteLn zu definieren. Weiß da jemand wie das unter Delphi funktioniert?
Am liebsten wäre mir eine Übersetzung des folgenden Quellcodes aus Pascal-Zeiten in Delphi…:

program farben;

uses
 crt;

begin
 textcolor(red);
 writeln('rot');
 textcolor(green);
 writeln('grün');
 textcolor(yellow);
 writeln('gelb');
end;

Gruß und Danke
Stage

#2

hi,

begin
für textcolor(red); folgendes eingeben: form1.color:=clred;
für textcolor(green); folgendes eingeben: form1.color:=clgreen;
für textcolor(yellow); folgendes eingeben: form1.color:=clyellow;

end;

So det wärs :wink:

#3

Totaler Nonsens!
Hallo Du,

überlege Dir bitte nochmal was „Konsolenanwendung“ heisst - da gibt es kein instanziertes Form - ausserdem würde man mit der Property TForm.Color die Hintergrundfarbe ändern - die Textfarbe ginge über TForm.Font.Color…
Bitte das nächste mal nachdenken bevor man antwortet…

Gruß
Stage