Einzelnen Beitrag anzeigen

Benutzerbild von sirius
sirius

Registriert seit: 3. Jan 2007
Ort: Dresden
3.443 Beiträge
 
Delphi 7 Enterprise
 
#13

Re: Grafikausgabe mit FreePascal (DOS)

  Alt 31. Mär 2007, 16:46
Hier aus der Doku von FreePascal:
Delphi-Quellcode:
var
 gd,gm : integer;
 PathToDriver : string;
begin
 gd:=detect; { highest possible resolution }
 gm:=0; { not needed, auto detection }
 PathToDriver:=’C:\PP\BGI’; { path to BGI fonts,
  drivers aren’t needed }

 InitGraph(gd,gm,PathToDriver);
 if GraphResult<>grok then
   halt; ..... { whatever you need }
 CloseGraph; { restores the old graphics mode }
end.
(alles unter Reference zur Unit Graph)

Und was und wo du welche Dateien brauchst und viielleicht irgendwelche Pfade einbinden musst, weis ich nicht.
Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.
  Mit Zitat antworten Zitat