Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  Re: Grafikausgabe mit FreePascal (DOS)

   
    by sirius, 31. Mär 2007
  Hier aus der Doku von FreePascal:
  
  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 }
• Forum: Programmieren allgemein

  Re: Grafikausgabe mit FreePascal (DOS)

   
    by sirius, 31. Mär 2007
  Also, wenn du direkt in DOS programmierst, geht das nicht. DOS ist im Textmodus. Da kannst du nur Text ausgeben und keine einzelnen Pixel färben. Du musst erst in den Grafimodus schalten:
  
  var graphicdriver, graphicmode : integer;
  bgipfad:string;
  begin
  //ich glaube, du kannst hier auch jeweils 0 einsetzen
  graphicdriver:=vga;
  graphicmode:=vgahi;
  
  //hier musst du das entspr....
• Forum: Programmieren allgemein

  Re: Grafikausgabe mit FreePascal (DOS)

   
    by sirius, 31. Mär 2007
  Oh wunder! Die alten Disketten sind noch lesbar....
  
  Also, ich habe mal gekramt. Im Anhang hängt ein Grafikprogramm, was unter TP 6.0 programmiert wurde. Das Programm ist alt und ohne OOP geschrieben, also etwas undurchsichtig. Prinzipiell ist es: "Türme von Hanoi".
  
  Da befindet sich eine procedure "init" gleich am Anfang. Die initialisiert nicht nur die Grafik, sondern sucht auch noch den...
• Forum: Programmieren allgemein

  Re: FreePascal

   
    by sirius, 30. Mär 2007
  Da gab es früher mal die Unit "graph" dazu (weis nicht, wie das bei freePascal ist) und darin waren die ganzen Grafikroutinen. Zuerst musste man mit initgraph in den grafikmodus schalten (dabei auch angeben, welcher grafikmodus) und mit "closegraph" kam man dann wieder zurück.
  und dann gab es solche rountinen wie:
  PutPixel
  Line
  LineTo
  MoveTo
  TextOut
  TextoutXY
  GetPixel
  PutImage