sodele... es beginnt zu funktionieren..
Delphi-Quellcode:
write('testing, testing.... *hust*');
TextColor := $FF0000;
write('.... everything seems to be in order');
TextColor := $00FF00;
BackgroundColor := $505050;
write('Console test done.');
ich weiß... Zeilenumbrüche fehlen halt ^^ gemach gemach
Jetzt wie mach ich Readln ? läuft doch bestimmt auch wieder über InOut ?
schaut dann so aus: