Filterprobleme bei Tabelle (e-mail geht nicht)

[dollar]

Hi

ich habe eine Datenbank geschrieben in der ich ein paar informationen über eine person speichere (Name, Adresse, Beruf und e-mail)
Funktioniert soweit alles!

Jetzt habe ich mir eine Suchmaske geschrieben in der man auch die suchfunktionen verknüpfen kann! Z.B. Ich gebe Peter und Berlin ein und er zeigt mir alle Peters die in Berlin wohnen an! So natürlich kann man dort auch nach der e-mail suchen!
Das Problem bei der ganzen sache ist aber, dass wenn ich eine e-mail eingebe und suchen drücke das der mit ausspuckt

"Tabelle: Das Feld 'E' wurde nicht gefunden"

Habe so ein ähnliches Thema schon im Forum gefunden aber dort war das Problem das er den String nicht gequotet hatte! Habe ich aber. Hier mein Quelltext:

Delphi-Quellcode:

Form1.Tabelle.Filter :=
'Vorname = ' + QuotedStr(Vorname) +
'AND Nachname =' + QuotedStr(Nachname) +
'AND Strasse =' + QuotedStr(Strasse) +
'AND Postleitzahl =' + QuotedStr(Plz)+
'AND Ort =' + QuotedStr(Ort) +
'AND Geburtstag =' + QuotedStr(Geburtstag) +
'AND E-mail =' + QuotedStr(email) +
'AND Taetigkeit = ' + QuotedStr(Taetigkeit) +
'AND Interessen = ' + QuotedStr(Interessen);
Form1.Tabelle.Filtered := true;

Es liegt meiner Meinung nach am @-Zeichen! wie schaffe ich es das nicht der Fehler mit dem Feld 'E' kommt?

[marabu]

Herzlich willkommen in der Delphi-PRAXiS, dollar.

Auch in deinem Fall liegt es an den fehlenden Quotes: Paradox stellt gewisse Anforderungen an Bezeichner, ein Minuszeichen darf normalerweise nicht im Namen vorkommen. Tut es das doch, so musst den Feldnamen in Quotes einpacken. Schau mal in deiner LocalSQL Online-Hilfe unter "Spaltennamen".

Delphi-Quellcode:

Form1.Tabelle.Filter :=
'Vorname = ' + QuotedStr(Vorname) +
'AND Nachname =' + QuotedStr(Nachname) +
'AND Strasse =' + QuotedStr(Strasse) +
'AND Postleitzahl =' + QuotedStr(Plz)+
'AND Ort =' + QuotedStr(Ort) +
'AND Geburtstag =' + QuotedStr(Geburtstag) +
'AND T."E-mail" =' + QuotedStr(email) +
'AND Taetigkeit = ' + QuotedStr(Taetigkeit) +
'AND Interessen = ' + QuotedStr(Interessen);
Form1.Tabelle.Filtered := True;

Das T musst du durch den echten Tabellennamen ersetzen. Eventuell möchtest du auch noch das AND durch ein OR ersetzen.

Freundliche Grüße vom marabu

[dollar]

Danke für die Hilfe!

1 Minute nach dem ich den Beitrag geschrieben hatte ist mir das auch aufgefallen ich Holzkopf!!