Schleifen Optimierung?

[youuu]

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