Tach auch,
ich habe meine Combobox so gefüllt( siehe unten), aber die Kunden zb. Kreuz, Alte und Hase stehen nicht drin weil ich noch Kunden habe die Kreuzkamp, Alte-Stadt und Haselünner heissen.
Was muss ich ändern?
Delphi-Quellcode:
if not Table1.Active then exit;
combobox3.Clear;
combobox3.Sorted := true;
Table1.First;
while not Table1.Eof do begin
///*********************
if table1['D_Kunde'] = ComboBox2.Items[ComboBox2.ItemIndex] then begin
///*********************
u := trim(Table1.FieldByName('D_Ort').AsString);
if u <> '' then begin
l := combobox3.Perform(CB_FINDSTRING, -1, LongInt(PChar(u)));
if (l = CB_ERR) or ((l = 0) and (combobox3.Items.Count = 0)) then begin
combobox3.Items.Add(u);
end;
end;
///**********
end;
//****
[Edit=Sakura]DELPHI-Tags gesetzt.[/Edit]