title image


Smiley Re: SQL-Statement klappt nicht
Hallo,

dem einfachen update hat es geklappt, aber nur ,wenn ich beim Einlesen der Daten das Datumsfeld weglasse.

Mit den Parametern komm ich noch nicht so zurecht.

Beim Öffnen lese ich wie folgt die Felder der DB aus:



****************************************************+

procedure Tfrm_Kunden.FormShow(Sender: TObject);

begin

//Verbindungen herstellen

qry_ReDaten.ConnectionString:=ADO_Provider;

//qry_ReDaten.Open;

qry_KDNR.ConnectionString:=ADO_Provider;

//qry_KDNR.Open;

qry_Daten_lesen.ConnectionString:=ADO_Provider;

qry_Daten_lesen.Close;

qry_Daten_lesen.SQL.Add('SELECT * FROM kunden ORDER BY kdnr');

qry_Daten_lesen.Open;

qry_daten_lesen.Last;

Daten_lesen;

end;

*********************





procedure Tfrm_Kunden.Daten_lesen;

begin

//Überprüfen ob es schon Kunden gibt wenn ja dann lies sie aus

if (self.qry_daten_lesen.Recordset.RecordCount > 0) and (self.qry_daten_lesen['KDNR'] Null) then

begin

lbl_Kdnr.Caption:=qry_daten_lesen['KDNR'];

Ed_Nachname.Text:=qry_daten_lesen['Nachname'];

Ed_Vorname.Text:=qry_daten_lesen['Vorname'];

Ed_Strasse.Text:=qry_daten_lesen['Strasse'];

Ed_PLZ.Text:=qry_daten_lesen['PLZ'];

Ed_Ort.Text:=qry_daten_lesen['Ort'];

Ed_Telefon.Text:=qry_daten_lesen['Telefon'];

Ed_Fax.Text:=qry_daten_lesen['Fax'];

Ed_Email.Text:=qry_daten_lesen['Email'];

Ed_Mobil.Text:=qry_daten_lesen['Mobil'];

Ed_Bank.Text:=qry_daten_lesen['Bank'];

Ed_BLZ.Text:=qry_daten_lesen['BLZ'];

Ed_KtoNr.Text:=qry_daten_lesen['KTONR'];

dtp_Geb.Date:=qry_daten_lesen['Geb'];

Memo_Kunden.Text:=qry_daten_lesen['Memo'];

cb_Schuhkunde.Checked:=qry_Daten_lesen['Schuhkunde'];

cb_Repkunde.Checked:=qry_Daten_lesen['Reperaturkunde'];

Ed_Status.Text:=qry_Daten_lesen['Status'];

dtp_Ebest.Date:=qry_Daten_lesen['Ebest'];

dtp_Lbest.Date:=qry_Daten_lesen['Lbest'];

end;

end;

***********************************************+

Da hab ich aber das Problem, dass er immer bei den Datumsfeldern hängen bleibt.

Wieso kann ich nicht so dem DateTimePicker den Inhalt aus der DB zuweisen?



Hab auch schon mal versucht ein Parameters.ParamByName davor zu setzen, daber dass klappt nicht. Vermutlich weil ich nicht weiß wie man das an dieser Stelle machen könnte.

Vielleicht hast Du nochmal den Tip für mich.



Gruß

Gabi

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: