Zitat von
dahead:
kuck dir mal die Hilfe zu TStringList und zu DelimitedText an.
das dürfte dir auf die Sprünge helfen.
hi dahead,
vielen dank erstmal.
Ich hab mir das mal angeschaut, und auch gleich was geschafft,
nur jetzt sehe ich schon das erste problem.
Und zwar wenn im dateinamen auch ein leerzeichen ist dann ist dies logischerweise auch im delimiter also wird auch auf ne neue Zeile gemacht.
Ich denke das könnte ein recht grosses Problem sein.
hier mal mein Code:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var sl: Tstrings;
begin
if OpenDialog1.Execute then
sl:=TStringList.Create;
sl.LoadFromFile(OpenDialog1.FileName);
sl.Delimiter:=' ';
sl.DelimitedText:=sl.Text;
ShowMessage(sl.Text);
sl.Free;
end;
Achja nochwas, durch den delimiter hab ich ja jetzt einfach jede erste zeile den dateinamen und jede zweite zeile den crc32.
wenn ich mit dem jetzt arbeiten möchte, muss ich die aber wieder auseinander bringen am besten wieder nebeneinander.
ich hoffe ich bekomme nochmals so einen guten Tipp
vielen dank
mfg headi