Entwickler-Ecke

Datenbanken - dbLookupCombo mit Bedingungen


snoop242 - Di 17.12.02 01:06
Titel: dbLookupCombo mit Bedingungen
Ich habe zwei tabellen, wobei in eine die PersonenAdresse gespeichert werden soll und in der zweiten verschiedene Postleitzahlen mit zugehörigen Orten stehen.

wie kann ich es jetzt gestalten, daß bei Eingabe einer Postleitzahl in der AdressenTabelle ein Lookup bezgl. der PostleitzahlenTabelle erreicht wird und ich in meiner Ortseingabe bei der Adresstabelle nur die zugehörigen Orte mit entsprechender PLZ zur Auswahl bekomme??

Thx für eine schnelle Antwort.


Klabautermann - Di 17.12.02 11:23

Hallo,

du könntest anstelle einer Tabelle ein Query verwenden. Dan könntest du das ganze im OnCahange Feld deines Edits so aktuallisieren:

Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
procedure TForm1.Edit1Change(Sender: TObject);
begin
  IF NOT (Sender IS tEdit) THEN
    Exit;
  Query1.Close;
  Query1.SQL.Clear;
  Query1.SQL.Add('SELECT Ort FROM PostleitzahlenTabelle');
  IF (tEdit(Sender).Text <> '') THEN
    Query1.SQL.Add('WHERE PLZ LIKE ' + tEdit(sender).Text + '%');
  Query1.Open;
end;


Gruß
Klabautermann