Forum: Sonstige Fragen zu Delphi
Delphi
by Martin K,
5. Jan 2006
Mein erster Code funktioniert natürlich genauso, allerdings kann es bei großen Dateien länger Dauern, da die Schleife 2x durchlaufen wird.
Am besten ist es, wenn du meinen letzten aus Beitrag #5 nimmst, wahrscheinlich hast du nur begin oder end vergessen.
Ich hab dir nochmal an jede ergänzte Zeile den Kommentar drangemacht.
Ich würde diesen Code aus #5 dann nehmen, da er schneller ist.
...
Forum: Sonstige Fragen zu Delphi
Delphi
by Martin K,
5. Jan 2006
Jo, stimmt. Das geht auch:
procedure TForm1.Button1Click(Sender: TObject); //sfv file öffnen
var
i : integer;
begin
if OpenDialog1.Execute then
begin
SL.LoadFromFile(OpenDialog1.FileName); //sfv daten in stringlist speichern
Forum: Sonstige Fragen zu Delphi
Delphi
by Martin K,
5. Jan 2006
Hier mein Vorschlag:
procedure TForm1.Button1Click(Sender: TObject); //sfv file öffnen
var
i : integer;
begin
if OpenDialog1.Execute then
begin
SL.LoadFromFile(OpenDialog1.FileName); //sfv daten in stringlist speichern