Eingabe mit Daten aus der Datenbank vergleichen

[Garby]

Hallo,

ich hoffe du erwartest nicht, dass dir hier jemand den Source eines kompletten Programms postet.

Mal angenommen du hast eine Tabelle in Paradox die folgedermassen ausschaut:

ENGLISCH_DEUTSCH
ENLFNR // laufende Nummer
ENENGLISCH // englischer Text
ENDEUTSCH // deutscher Text

Die Abfrage schaut dann so aus:

Delphi-Quellcode:

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

  Close;
end;

Hoffentlich hilft es dir