Zuerst muss einmal der Grafikmodus initialisiert werden, bevor etwas gezeichnet werden kann. Das geschah in TP7 so:
Delphi-Quellcode:
uses Graph, ...;
var
Grd, Grm: Integer;
begin
InitGraph(Grd, Grm, ''); //Initialisieren, 16 Farben, 640x480 Pixel
SetFillStyle(1,White); //Füllfarbe und -stil setzen, 1 ist voll ausgefüllt
FillRect(0,0,640,480); //Gefülltes Rechteck zeichnen
SetColor(Black); //Linienfarbe setzen
Line(0,0,640,480); //Linie zeichnen
Readln;
CloseGraph; //Grafikmodus beenden
end;
Ich hab das schon oft in TPW versucht, hat aber nie funktioniert. Am besten ist wirklich du suchst dir irgendwo ein altes 5.5 Pascal oder kaufst jemandem ein TP7 um 1 Euro ab, mehr wird es heute eh nicht mehr wert sein.