[Newbi.Question] Paradox 7 mit Query Befehl

[DeddyH]

Das ist gar nicht so schwer. Dein Query hat eine Eigenschaft SQL vom Typ TStrings. Wenn Du im OI da draufklickst, kannst Du das SQL von mkinzler dort fest eintragen:

SQL-Code:

SELECT
    COUNT (*) AS Treffer
FROM
    Benutzer
Where
    Benutzername = :benutzer AND
    Kennwort = :kennwort;

Dabei sind :benutzer und :kennwort sog. Parameter, die Du zur Laufzeit dynamisch belegen kannst.

Delphi-Quellcode:

procedure Tframe_Anmeldung.iAnmeldenClick(Sender: TObject);
begin
  //Belegen der SQL-Parameter mit den Inhalten der Edits
  fHauptprogramm.QueryBenutzer.ParamByName('benutzer').Value := eBenutzername.Text;
  fHauptprogramm.QueryBenutzer.ParamByName('kennwort').Value := eKennwort.Text;

  //Abfrage der Daten
  fHauptprogramm.QueryBenutzer.Open;

  //Auswerten der Rückgabe und Ablegen in der Boolean-Variablen "angemeldet"
  angemeldet := fHauptprogramm.QueryBenutzer.FieldByName('Treffer').AsInteger > 0;

  //Query schließen
  fHauptprogramm.QueryBenutzer.Close;
end;

Ich hoffe, das ist nun verständlicher.