Array of String zu TStrings

[Jakunar]

Hey kurze Frage:

Gibts ne effizientere/schnellere Methode um alle Strings eines Array of String in ein TStrings zu bekommen als ueber Laufvariable?
Also als:

Code:

const
  MyStrArray: Array[0..1023] of String = ('1', '2', '3', '4', '5', ..);
var
  i: Word;
begin
  ComboBox1.Clear;
  for i := 0 to Lentgh(MyStrArray)-1 do
    ComboBox1.Add(MyStrArray[i];
end;

Gruss Jakunar

[Namenloser]

Nein, aber du kannst vorher TStrings.BeginUpdate und nachher TStrings.EndUpdate aufrufen, was die Operation deutlich beschleunigen sollte, wenn es sich um Eigenschaften von Komponenten handelt.

[Uwe Raabe]

Delphi XE kennt da eine überladene Methode:

Delphi-Quellcode:

procedure AddStrings(const Strings: TArray<string>); overload;

[himitsu]

Zitat:

... als ueber Laufvariable

Jain, ab Delphi 2009 ... nicht schneller, aber dafür kleiner

Delphi-Quellcode:

ComboBox1.Clear;
for S in MyStrArray do ComboBox1.Add(S);

Ansonsten pack deinen Code in eine Prozedur, falls du sowas mehrmals im Programm benötigst.

Abgesehn von dem schongenannten BeginUpdate, vorallem wenn es sich um StringListen in VCL-Komponenten handelt.

[Namenloser]

[OT]

Zitat:

Zitat von Uwe Raabe (Beitrag 1078414)

Delphi-Quellcode:

procedure AddStrings(const Strings: TArray<string>); overload;

Delphi-Quellcode:

TArray<string>

? Ist das eine neue Schreibweise für

Delphi-Quellcode:

array of string

? :gruebel:
[/OT]

[Jakunar]

Hm ich verwende Delphi 7, werde also mit BeginUpdate und EndUpdate verwenden.

Vielen Dank!

P.S: Kann man Themen als "Geloest" markieren?

Gruss Jakunar

[Bummi]

oder Du verwendest statt des Array's gleich eine Stringlist?

[himitsu]

Zitat:

Zitat von NamenLozer (Beitrag 1078418)

[OT] Ist das eine neue Schreibweise für

Delphi-Quellcode:

array of string

? :gruebel:
[/OT]

Ist ein generischer Typ, welcher hier quasi ein

Delphi-Quellcode:

array of string

ergibt.

[Namenloser]

Gibt es da irgendeinen Unterschied?

[Luckie]

Sollte er nicht lieber BeginUpdate und EndUpdate von der Combobox aufrufen, damit sie nicht ständig neu gezeichnet wird?

[Namenloser]

Zitat:

Zitat von Luckie (Beitrag 1078428)

Sollte er nicht lieber BeginUpdate und EndUpdate von der Combobox aufrufen, damit sie nicht ständig neu gezeichnet wird?

Gibt es nicht :wink: Die TStrings-Klasse sorgt dafür, dass das Control geupdatet wird (vermutlich durch ein Event). Zwischen BeginUpdate und EndUpdate wird dieses Event unterdrückt.

[Jakunar]

So der Ordnung halber hier meine verwendete Loesung:

Code:

const
  MyStrArray: Array[0..1023] of String = ('1', '2', '3', '4', '5', ..);
var
  i: Word;
begin
  ComboBox1.Items.BeginUpdate;
  ComboBox1.Clear;
  for i := Low(MyStrArray) to High(MyStrArray) do
    ComboBox1.Items.Add(MyStrArray[Cnt]);
  ComboBox1.Items.EndUpdate;
end;

Gruss Jakunar