Delphi-Quellcode:
Function StatusCustomer (Customer_Number: String): Boolean;
Begin
result:= false;
FormMain.QueryUpdate.Params.ParamValues['Customer_Number'] := Customer_Number;
FormMain.QueryUpdate.Params.ParamValues['Date'] := Date();
FormMain.QueryUpdate.Open;
Try
result := (FormMain.QueryUpdate.FieldByName('Anzahl').AsInteger > 0);
Finally
FormMain.QueryUpdate.Close;
End;
End;
[/quote]
Wobei ich damit Probleme bekomme, da
MySql irgendwi eine andere Formatierung benutzt für Date.
Hate davor alles in Varchar und hab es für diese funktion in Date geändert, da er mit Varchar keine richtigen ergenisse seiten aktive und inaktive mehr raus geworfen hat, allerdings auch nicht mit Date.
Date in
MySQL sieht so aus: 2009-07-19 z.B, wobe in Date doch 19.07.2009