hallo , Brauche mal wieder eure Hilfe!
Ich habe eine ListBox mit einigen Einträgen darin.Ich möchte die dort selektierten Einträge einzeln in ein
array vom Typ meiner definierten Klasse einfügen.
Ich erzeuge das Array dynamisch.
Ich dachte ich könnte das so machen.
aber irgendwie funktioniert das nicht.
Habt ihr vielleicht ne bessere Möglichkeit?
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
Datei:array of TOpenDialogEntity; // meine Klasse
i,j: Integer;
begin
j:=0;
SetLength(Datei,ListBox1.SelCount);
for i := ListBox1.Items.Count - 1 downto 0 do
if ListBox1.Selected[i] = True then
begin
//Datei[j].create;
Datei[j].FFilename:=ListBox1.Selected[i].Text;
Inc(j);
end;
end;
[edit=sakura] [cl] durch [delphi] tags ersetzt. Der ist süß 
Mfg, sakura[/edit]
[edit=sakura] untere korrektur gelöscht - kannst auch Edit nutzen 
Mfg, sakura[/edit]