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
