hmmm... ich krieg das einfach nicht hin,
also zum ersten Problem:
Ich habe mir die tipps nochmals angeschaut, die du mir gegeben hast.
Ich habe es jetzt geschafft, jedes wort anzusprechen, aber irgendeine gute funktion konnte ich nicht basteln.
Ich möchte ja nicht den ganzen code den ich schon habe wieder umschreiben.
bis jetzt sieht dieser code so aus:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject); //sfv file öffnen
begin
if OpenDialog1.Execute then
begin
SL := TStringList.Create;
SL.LoadFromFile(OpenDialog1.FileName); //sfv daten in stringlist speichern
SL.Delimiter :=' ';
SLSub := TStringList.Create;
StringGrid1.RowCount:=SL.Count+1; //stringgrid zeilen erstellen
for I := 0 to SL.Count - 1 do
begin
SLSub.DelimitedText := SL[I];
StringGrid1.Cells[0, (1+(I))]:=SlSub[0]; //dateiname in stringgrid einfügen
StringGrid1.Cells[2, (1+(I))]:=SlSub[1]; //hash wert in stringgrid einfügen
StringGrid1.Cells[1, (1+(I))]:='ready'; //status gleich ready
end;
end;
end;
dann zum zweiten Problem:
Ja es sind zeilenkommentare.
Mit dem pos bin ich irgendwie auch nicht weitergekommen,
irgendwie habe ich immer probleme mit den verschiedenen Formaten, also Strings, string, integer...
drittes Problem:
Also ich glaube, das ist ja sogar normal dass ein Programm bei längeren berechnungen einfriert,
aber ich glaube das kann man doch mit einem thread oder so umgehen?! Nur habe ich leider keine Ahnung davon.
viertes Problem:
Also das mit dem Fortschrittbalken krieg ich glaub nicht hin, da ich erstens zu wenig ahnung davon habe, und zweitens
habe ich durch die componente die mir das ganze berechnet irgendwie zu wenig informationen.
Ich werde dort jetzt einfach einen Fortschritsbalken anzeigen, der hin und her fahrt.
vielen dank schonmal,
Ich hoffe ihr könnt mir das noch ein bisschen genauer erklären
mfg headi