Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
2. Jan 2004
:oops: Nicht gleich so dick auftragen, daß hat bei mir Nebenwirkungen :mrgreen:
Danke!
...:cat:...
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
2. Jan 2004
Von
nach
auf
:firejump: (Das musste noch raus :mrgreen: )
...:cat:...
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
2. Jan 2004
Gerne.
Die erste und wohl größte Verbesserung ist es gewesen, die Schleife for I := 0 to k_max_xp_tweak_i zu entfernen. Dadurch sparst Du Dir "k_max_xp_tweak_i" Läufe durch die gesamte StringListe config_sl ein. Das ist schon mal ein direkter Performancegewinn, der einlauchten sollte.
Der nächste wichtige Punkt war es die String-Operationen zu optimieren. Delphi hat zwar mit die besten...
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
30. Dez 2003
Und, wie sieht es jetzt aus :stupid:
...:cat:...
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
30. Dez 2003
Weitere Optimierungen, die Du überlegen solltest. Folgende Voraussetzungen:Der Wert vor dem ersten Underscore bestimmt die Position des Eintrags im Array
Alle Wertenamen in der StringList werden mit einem "=" abgeschlossen.
Einen Eintrag im Bereich von -1 existiert nicht
Unter diesen Voraussetzungen können wir auf die äußere Schleife (for i := 1 to k_max_xp_tweak_i d) komplett verzichten....
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
29. Dez 2003
Also wie folgend: (Hier auch gleich mal IntToStr(I) ersetzt ;-)
for j := 0 to config_sl.Count - 1 do
begin
Dummy := config_sl.Strings;
strI := IntToStr(i);
//Version auslesen
if (Pos(strI + '_HXPTT_XPVersion=', Dummy) = 1) then
begin
...
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
29. Dez 2003
Erste enorme Verbesserung sollte es sein, wenn Du config_sl.Strings in eine "Dummy Variable" lädst und anschließend mit der arbeitest. Wie lange dauert es dann noch?
...:cat:...
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
29. Dez 2003
Eigentlich interessierte mich eher der Code, wo Du die Textdatei auseinander nimmst. Da dürfte die meiste Zeit verloren gehen ;-)
...:cat:...
P.S.: Du solltest Deine Delphi Codes in die und Tags (ohne Leerzeichen) setzen
Forum: Object-Pascal / Delphi-Language
Delphi
by sakura,
29. Dez 2003
Wo kommen denn die Werte her, weil mal kurz 5000 Strings zu setzen eigentlich nicht lange dauert.
...:cat:...