Forum: Sonstige Fragen zu Delphi
Delphi
by dorisdoloris,
14. Dez 2005
Hallo Marabu
Aus wieviel Zeichen jede Zeile besteht oder wie lang sie ist kann ich nicht sagen ändert sich ja auch Zeile für Zeile. Übergeben wird es an einer Variablen von Typ String (sNew). Am besten du schaust dir das Beispiel von Daniel Schuhmann an so in etwa sieht das dann aus.
Forum: Sonstige Fragen zu Delphi
Delphi
by dorisdoloris,
14. Dez 2005
Ich habe es jetzt mal mit TStringList getestet wird aber noch langsamer :(
procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
slNew: TSringList;
begin
Forum: Sonstige Fragen zu Delphi
Delphi
by dorisdoloris,
14. Dez 2005
Also ersteinmal ein Danke an alle für die Hilfe
Ich habe es nun mit der ProgressBar getestet und bin dabei zu folgenden Ergebnis gekommen
ProgressBar1.Position := i; // mit dieser Variante komm ich auf 29703 ms
If I mod 100 = 0 then ProgressBar1.StepBy(100);// mit dieser Variante komm ich auf 27297 ms
// und ohne ProgressBar komme ich auf 26504 ms
Forum: Sonstige Fragen zu Delphi
Delphi
by dorisdoloris,
14. Dez 2005
"Delimiter" gibt es bei mir leider nicht ich benutze Delphi 5.0
Forum: Sonstige Fragen zu Delphi
Delphi
by dorisdoloris,
14. Dez 2005
Hallo liebe Delphifreunde erst ein Problem gelöst und schon hab ich ein neues :(
Schaut euch mal den Code an in der ListBox sind 20000 Zeilen enthalten und die Übergabe dauert recht lange
for i := 0 to ListBox1.Items.Count -1 do
begin
sNew := sNew + '' + Listbox1.Items.Strings;
ProgressBar1.Position := i; // aktuelle Position
end;