Eingabe mit Daten aus der Datenbank vergleichen

[Garby]

OK,

du ziehst einfach eine TQuery-Komponente auf den Formular.
Dann stellst du die Database-Eingenschaft der Query gleich ein, wie bei deiner TTable-Komponente.
Danach erstellst du z.B. einen Button, in dessem Click-Ereignis du o.g. Code reinstellst.
Die Tabelle und die Felder der o.g. SQL-Anweisung musst du natürlich deiner DB anpassen.

Dann sollte alles laufen, OK?

[Flo]

Ich muss dich jetzt gleich noch einmal nerven, sorry.

Wie passe ich die SGL-Anweisungen an die DB an ???

[Flo]

Doppelpost Bitte löschen

[Hansa]

Zitat von Flo:

...wie passe ich die SGL-Anweisungen an die DB an ???

Es geht um die Bezeichner. Die müssen im Programm und der DB übereinstimmen. Sonst wird eben gar nichts gefunden.

[Flo]

Danke euch beiden.
Ich werde das gleich mal ausprobieren.
Melde mich dann nochmal. Ich hoffe, ich hab was positives zu berichten

[Garby]

Hier nochmal der Source:

Delphi-Quellcode:

with qryAbfrage do begin 
  Close; 
  SQL.Text := 'Select Count(*) as ANZAHL From (1)ENGLISCH_DEUTSCH(1)'; 
  SQL.Add('Where (2)ENENGLISCH(2) = (P):Englisch(P) and (3)ENDEUTSCH(3) = (P):Deutsch(P)'); 
  ParamByName('Englisch').AsString := (4)edtEnglisch.Text(4); // Parameterwerte aus 2 Edit-Feldern 
  ParamByName('Deutsch').AsString := (5)edtDeutsch.Text(5); 
  Open; 
  // (PE)
  if FieldByName('ANZAHL').AsInteger > 1 then 
    ShowMessage('Richtig') 
  else 
    ShowMessage('leider Falsch'); 

  Close; 
end;

Oben habe ich die Stellen die du ersetzen musst mit Zahlen oder Buchstaben eingeschlossen(bitte nicht drinlassen, sonst gehts sicher nicht).
(1) = dein Tabellenname
(2) = der Feldname in dem der Englische Text in der Tabelle steht
(3) = der Feldname des Deutschen Textes
(4) = Irgendwo in deinem Formular wirst du eine Variable oder ein Edit haben, wo der englische Text steht --> hier einsetzen
(5) = das selbe mit dem vom User eingegebenen deutschen Text
(P) sind Parameter. Die kannst du benennen wie du willst. Sie dienen nur als Platzhalter für die Werte, die du dann unter (PE) den Parametern zuweisen musst.

So, einfacher krieg ichs nicht hin. Experimentier doch einfach mal damit herum, dann kommst du bestimmt drauf.

Etwas hab ich noch vergessen. Dein TQuery-Objekt muss natürlich auch qryAbfrage heissen

[Flo]

Das ist gut, jetzt müsste ich das eigentlich kapieren *hoffnungsvoll*

Danke nochmal

[harrybo]

Hi Garby,
sollte das Ergebnis nicht auf "> 0" alternativ ">= 1" abgefragt werden (also: if FieldByName('ANZAHL').AsInteger > 0 then)?

gruß, harrybo

[Flo]

Danke nochmal an alle. Es hat geklappt.

Hab noch eine Frage (mehr optisch)
Wie erziele ich, dass bei Richtg- oder Falschergebnis nicht Projekt1 sonder ''blabla'' steht ???