Forum: Datenbanken
Delphi
by Orbmu2k,
10. Dez 2004
klammern setzen vergessen :cyclops:
...
if (i < lbzugeordnet.Items.Count)
and (i < DstList.Items.Count) then
...
Forum: Datenbanken
Delphi
by Orbmu2k,
10. Dez 2004
Nehme mal an das es der Fehler "Listenindex überschreite Maximum ..." ist.
procedure Tzuordnen.btnzuoClick(Sender: TObject);
var
i: Integer;
begin
Listbox1.Clear;
for i := 0 to lbzugeordnet.Items.Count - 1 do
if i < lbzugeordnet.Items.Count
Forum: Datenbanken
Delphi
by Orbmu2k,
10. Dez 2004
procedure Tzuordnen.btnzuoClick(Sender: TObject);
var
i: Integer;
begin
Listbox1.Clear;
for i := 0 to lbzugeordnet.Items.Count - 1 do
Listbox1.Items.Add(lbzugeordnet.Items + ' ' + DstList.Items);
end;
Forum: Datenbanken
Delphi
by Orbmu2k,
10. Dez 2004
z.B. :)
Es sollte deinen Code Oben ersetzen ...
Forum: Datenbanken
Delphi
by Orbmu2k,
10. Dez 2004
Meintest du so ?
for i := 0 to Listbox1.Items.Count - 1 do
Listbox3.Items.Add(Listbox1.Items + ' ' + Listbox2.Items;