Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi ZQuery + ZUpdate (https://www.delphipraxis.net/96451-zquery-zupdate.html)

micha0815 24. Jul 2007 22:35

Datenbank: MySQL • Version: 5.1 • Zugriff über: ZeosLib

ZQuery + ZUpdate
 
Hallo Forum,

möchte mich mal näher mit den Datenbankkomponenten befassen. bisher hatte ich eine ZQuery genommen und immer direkte Abfragen gemacht. Jetzt will ich mal die ganze data aware controls benutzen.


Konkret:

Ich habe eine aktualisierbare Datenmenge (RequestLive = True)

Jetzt werden in den gebundenen controls nicht alle Werte eingegeben die ich für ein insert brauche

Die Kundennummer z.B.

Delphi-Quellcode:
ZQuery_Lieferadressen.Sql = 'SELECT * FROM AdressenEmpfaenger WHERE Kundennummer = :Kundennummer';

und

ZUpdate_Lieferadessen.InsertSQL = 'insert into AdressenEmpfaenger
  (AdressenEmpfaenger.Vorname,
AdressenEmpfaenger.Nachname,
   AdressenEmpfaenger.Adresse, AdressenEmpfaenger.Ort,
AdressenEmpfaenger.eMail,
   AdressenEmpfaenger.Kundennummer, AdressenEmpfaenger.PLZ,
AdressenEmpfaenger.LandID,
   AdressenEmpfaenger.Firma, AdressenEmpfaenger.Anrede,
AdressenEmpfaenger.Hid,
   AdressenEmpfaenger.Hausnummer, AdressenEmpfaenger.Telefon,
AdressenEmpfaenger.Telefon1,
   AdressenEmpfaenger.Fax)
values
  (:Vorname, :Nachname, :Adresse, :Ort, :eMail, :Kundennummer,
:PLZ,
   :LandID, :Firma, :Anrede, :Hid, :Hausnummer, :Telefon, :Telefon1, :Fax)
Jetzt muß ich die Kundennummer noch schnell in die Insertquery "schmuggeln"

Ich dachte ich mache das im OnUpdateData-Event denke das ist der richtige Weg aber hier scheint mir der Fehler zu sein
Delphi-Quellcode:
procedure TDM_Adressen.DS_LieferadressenUpdateData(Sender: TObject);
begin
     with DM_Adressen.ZQuery_Lieferadressen.Params do begin

          ParamByName('Kundennummer').AsString := frmStammdatenKunden.edtKundennummer.Text;
          ParamByName('Hid').AsString := frmStammdatenKunden.edtHaendlerID.Text;
     end
end;
wie macht man das richtig?

Achso, Beim Insert beschwert esr sich das Kundennummer null sei.

Danke schon mal

Micha


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:43 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz