|
Registriert seit: 22. Aug 2005
31 Beiträge
|
Re: Erkennen von Lines
2. Sep 2005, 22:04
kannst du mir dazu mal ein kleinen quelltext schreiben
if OpenDialog1.Execute then
DateiName := OpenDialog1.FileName ;
ChecklisteEin.Lines.LoadFromFile(OpenDialog1.FileN ame);
AssignFile (Datei, DateiName);
Reset (Datei);
for i := 1 To Max do
begin
ReadLn (Datei, zeile1);
ReadLn (Datei, (zeile2)+1);
es ist wichtig das nur jede 2. zeile als zahl gelesen wird ! wie benutze ich das trystrtoint?
|