polynline aus datei darstellen

[HAF68k]

einlesen kannst du deine datei so:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
        FileName: String;
begin
        FileName:=extractfilepath(Application.ExeName) + 'text.txt';
        Memo1.Lines.LoadFromFile(FileName);
end;

oder wenn du ini-files bevorzugst:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
        FileName: String;
begin
        FileName:=TIniFile.Create(ExtractFilePath(Application.ExeName) + 'data.ini');
        Edit1.Text:=FileName.ReadString('Section','Ident','');
end;

und dann kann sich sicher irgendwie eine linie zeichnen lassen ....