Werte aus einer DBComboBox in eine andere übernehmen

[kiar]

hallo kongo,

versuche es so:

Delphi-Quellcode:

procedure TForm1.CB1Change(Sender: TObject);
begin
       CB2.ItemIndex:= CB1.ItemIndex;
       CB3.ItemIndex:= CB1.ItemIndex;
       if CB2.ItemIndex <> -1 then
          CB2.OnChange(CB2);
          if CB3.ItemIndex <> -1 then
             CB3.OnChange(CB3);
end;

procedure TForm1.CB2Change(Sender: TObject);
begin
     Showmessage('Cb2.Change');
end;

procedure TForm1.CB3Change(Sender: TObject);
begin
      Showmessage('CB3.Change');
end;

raik