Forum: Datenbanken
Delphi
by Nothine,
26. Aug 2004
man tut was man kann :mrgreen:
Forum: Datenbanken
Delphi
by Nothine,
26. Aug 2004
indem du den kram den ich gerade eben gepostet hab ganz schnell wieder vergisst :mrgreen: und folgendes anwendest ^^
query6.ParamByName('GUELTIG_AB').AsString :=
FormatDateTime('yyyy"-"mm"-"dd',StrToDate(
StringReplace(MaskEdit1.Text,'-','.',)));
// Edit: Funktion nich getestet, aber in delphi geschrieben also muss laufen ^^
// Edit2: Sorry aber stand gerade eben aufm schlauch deswegen der...
Forum: Datenbanken
Delphi
by Nothine,
26. Aug 2004
z.B. so
var ST: TSystemTime;
DT: TDateTime;
begin
DT := StrToDate(StringReplace(Maskedit1.Text,'-','.',));
DateTimeToSystemTime(DT,ST);
query6.ParamByName('GUELTIG_AB').AsString :=
IntToStr(ST.wYear)+'-'+IntToStr(ST.wMonth)+'-'+IntToStr(ST.wDay);
end;