Parameter bei SQL

[Hansa]

Hi,

Habe Wirklich keine ! Benutze die FIBplus-Kompos, dazu kommt zum Schluß noch was wichtiges.

Code:

  
  IF (Edit1.Text <> '') THEN BEGIN
    Edit1.Enabled := false;
    WITH KuDataMod.KuDataSet DO BEGIN
      active := false;
      SelectSQL.Text := 'SELECT * FROM KUNDE8 WHERE NR = ' + Edit1.text;
      active := true;
      IF IsEmpty THEN BEGIN
        Insert;
        FieldByName ('NR').value := StrToInt (Edit1.text);
      END
      ELSE
        Edit;
    END;
    DBedit1.SetFocus;
  END

Ich gebe hier eine Kundennr. ein, dann habe ich alle Daten des Kunden. Gibt es diesen noch nicht, besetze ich das Feld schon mal mit dem eingebenen Edit1.Text. Sag mir mal einer wozu ich da eine Query brauche ?

So jetzt aber etwas für IBX - Benutzer! Auf der Delphi 7 Companion CD ist FIBplus dabei ! Wohlgemerkt auf der Borland-CD ! Meiner Ansicht nach bedeutet das das endgültige aus für IBX. Bei Delphi 8 ist wohl Schluß.

Gruß
Hansa