Hi nochmal,
Der Quelltext sieht jetzt so aus:
Delphi-Quellcode:
begin
dbFach.Items.Clear;
dbFach.Items.Add(tabS2.FieldValues['lk1']);
dbFach.Items.Add(tabS2.FieldValues['lk2']);
dbFach.Items.Add(tabS2.FieldValues['gk1']);
dbFach.Items.Add(tabS2.FieldValues['gk2']);
dbFach.Items.Add(tabS2.FieldValues['gk3']);
dbFach.Items.Add(tabS2.FieldValues['gk4']);
dbFach.Items.Add(tabS2.FieldValues['gk5']);
if not tabS2.FieldValues['gk6'].IsNull and (tabS2.FieldValues['gk6'] <> '') then
dbFach.Items.Add(tabS2.FieldValues['gk6']);
if not tabS2.FieldValues['gk7'].IsNull and (tabS2.FieldValues['gk7'] <> '') then
dbFach.Items.Add(tabS2.FieldValues['gk7']);
if not tabS2.FieldValues['gk8'].IsNull and (tabS2.FieldValues['gk8'] <> '') then
dbFach.Items.Add(tabS2.FieldValues['gk8']);
if not tabS2.FieldValues['gk9'].IsNull and (tabS2.FieldValues['gk9'] <> '') then
dbFach.Items.Add(tabS2.FieldValues['gk9']);
end;
Ich hatte mich verschrieben, Der Quelltext soll nur auf eine Tabelle zugreifen ->
tabS2
Und die Bedingungen müssen natürlich mit AND verknüpft werden...
Aber es geht immer noch nicht