Online
Registriert seit: 11. Aug 2012
Ort: Essen
1.623 Beiträge
Delphi 10.2 Tokyo Professional
|
AW: Array of Integer setzen mit StrToIntDef(): gibt es was schnelleres?
13. Sep 2022, 20:02
Wenn es immer nur 0 oder 1 sind, kann man Fritzew's if/then/else durch
l_arr[i] := Ord(ltemp[i]) - Ord('0');
ersetzen. Evtl. Ord('0') noch durch eine Konstante ($30) ersetzen.
Und was ich erst vor kurzem gelernt habe: Eine While-Schleife, die vom Maximum auf 0 zählt ist schneller als eine For-Schleife von 0 bis Maximum. (Ich muss zugeben, dass mich das erschreckt hat, ich dachte, das optimiert der Compiler selbst.)
Und wenn auch das noch zu langsam ist, kann man statt mit Array+Index auch mit Pointern arbeiten. Das wird dann zwar schlechter lesbar aber vermulich nochmal deutlich schneller.
Thomas Mueller
|