Autor Beitrag
Julia1985
Hält's aus hier
Beiträge: 1



BeitragVerfasst: Di 24.01.06 00:15 
Hallo, ich hätte da ein kleines Problem mit dem Einlesen von Anweisungen aus einer plt-Datei. Der Inhalt sieht folgendermaßen aus:
100.00 100.00 move
100.00 100.00 line
...
usw.
DAbei sind die Zahlen Koordinaten, "move" und "line" befehle. (moveto und lineto).
Das Programm soll jetzt die Datei einmal einlesen, um die Größe der Graphik zu bestimmen, dann nochmals, um die Zeichnung möglichst groß und mit richtigen Seitenverhältnissen in einem Fenster darzustellen.
Jetzt habe ich leider keinen Plan wie ich die Sache angehen soll, d.h. ob das ganze als memo eingelesen werden soll oder als stringbox und wie´s dann weitergeht.
Schnelle Hilfe wäre seeehr nett! :-)
Narses
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Administrator
Beiträge: 10185
Erhaltene Danke: 1261

W11x64
TP3 .. D7pro .. D10.2CE
BeitragVerfasst: Di 24.01.06 00:24 
Moin und :welcome: im Forum!

Du solltest mal ein Anfänger-Tut machen, glaub ich! :wink: Chistian S. hat eins in der DL, schau doch mal da rein.

Naja, irgendwo muss man ja anfangen, also hier ein Ansatz:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
var
  Datei,Zeile: TStringList;
  i: Integer;
begin
  Datei := TStringList.Create;
  Zeile := TStringList.Create;
  try
    Datei.LoadFromFile('C:\plotfile.txt'); // jetzt ist die Datei im Speicher
    for i := 0 to Datei.Count-1 do begin // für alle Zeilen der Datei
      Zeile.CommaText := Datei.Strings[i]; // Zeile in Elemente zerlegen
      ShowMessage(Zeile.Text); // nur zur Demo: Zeilenelemente zeigen
      // du kannst hier mit Zeile.Strings[] wie oben auf die einzelnen Elemente zugreifen
    end;
  finally
    Zeile.Free;
    Datei.Free;
  end;

cu
Narses