Datum -und Zeit-Angabe in 2 DateTimePicker

[Thomm]

Ich möchte Datum und Zeit-Angabe (STRING) aus einer Datenbank in 2 DateTimePicker
(einen für die Uhr-Zeit,einen für das Datum) eintragen.
Problem ist das beide Angaben für Zeit und Datum in derselben Datenbankzelle stehen,
und durch 4 Leerzeichen getrennt sind

"12:09:56....24.08.2008" ---> DateTimePicker1 + DateTimePicker2 (Uhrzeit) (Datum)

Weiß nicht ,wie das geht.

[grenzgaenger]

Achtung Crosspost im DF

[DeddyH]

Wieso speicherst Du DateTime-Werte als String ab?

[Thomm]

Zitat:

Zitat von DeddyH

Wieso speicherst Du DateTime-Werte als String ab?

Weil ich nicht gewußt habe, wie man die sonst in eine Datenbank-Zelle schreibt

[DeddyH]

Kennt die DB keinen Datentyp DateTime oder Timestamp?

[grenzgaenger]

dann ist das also deine eigene DB :-)

dann nimm die felder doch auseinander... :-)

damit ersparst du dir in der zukunft viele kopfschmerzen...

[grenzgaenger]

Zitat:

Zitat von DeddyH

Kennt die DB keinen Datentyp DateTime oder Timestamp?

muss ja nicht... ein, zwei integer reichen doch :-)

aber so, zusammen, mit trennzeichen, welche von rechner zu rechner unterschiedlich sein können... ist doch etwas unglücklich ...

[BullsEye]

Delphi-Quellcode:

DateTimePicker1.Time := trunc(DateTimePicker1.Date) + frac(DateTimePicker2.Time);

[DeddyH]

Wenn, dann gleich double oder nicht?

[grenzgaenger]

Zitat:

Zitat von DeddyH

Wenn, dann gleich double oder nicht?

kommt auf die anforderungen drauf an :-) und was er auswerten möcht...

das wäre dann eben statt zwei felder, ein feld... mit unterschiedlichen vor und nachteilen...

was er aber nicht machen sollte, ist diese eingaben als text zu speichern... das ist eine todsünde, genauso wie bei zahlen :-)

[Thomm]

Zitat:

Zitat von DeddyH

Kennt die DB keinen Datentyp DateTime oder Timestamp?

Doch
Aber wie schreibt man

DateTimePicker1.Time + DateTimePicker2.Date

zusammen in eine Zelle

ClientDataSet1Zeitangabe

Wußte nicht wie das geht daher hab ich es umständlich gemacht

Delphi-Quellcode:

ClientDataSet1Zeitangabe.AsString:= (TimetoStr(datetimepicker1.Time))+'   '+(Datetostr( datetimepicker2.date));

[DeddyH]

Delphi-Quellcode:

ClientDataSet1Zeitangabe.AsDateTime := frac(datetimepicker1.Time) +trunc(datetimepicker2.date);

[Thomm]

Zitat:

Zitat von DeddyH

Delphi-Quellcode:

ClientDataSet1Zeitangabe.AsDateTime := frac(datetimepicker1.Time) +trunc(datetimepicker2.date);

Das probier ich mal aus

Hast du die Leerstelle beachtet ?

Vielen Dank nochmal

Ich sag euch später ,obs funktioniert

[DeddyH]

Ich bin jetzt davon ausgegangen, dass Du den Feldtyp in DateTime geändert hast, dann gibt es keine Leerstellen.

[grenzgaenger]

oder du nimmst gleich einen datetime picker ... in dem der user die beiden werte eintragen kann :-)

[BullsEye]

Es geht auch 'einfacher'

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption := DateToStr(DateTimePicker1.Date) + '...' + TimeToStr(DateTimePicker2.Time);
end;

Demo Prog im Anhang

[DeddyH]

Es geht ja darum, einen Zeitwert in 2 DateTimePickern darzustellen.

[Thomm]

Zitat:

Zitat von grenzgaenger

oder du nimmst gleich einen datetime picker ... in dem der user die beiden werte eintragen kann :-)

Ich hab doch einen DateTimePicker in der Eingabemaske,

von dort wird das in eine Datenbank eingetragen

[grenzgaenger]

und dann nimmst du die datums- und zeitkomponente explizit auseinander um sie getrennt in der DB zu speichern?

und jetzt willst sie wieder zusammenfügen... :gruebel: :gruebel:

[DeddyH]

Also, mein TDateTimePicker kann nur Date oder Time. Welchen verwendest Du denn?

[grenzgaenger]

Zitat:

Zitat von BullsEye

Delphi-Quellcode:

DateTimePicker1.Time := trunc(DateTimePicker1.Date) + frac(DateTimePicker2.Time);

das trunc/frac kann er sich in diesem fall auch sparen... braucht man nur, wenn man gemischte picker mit jeweils datums- und zeitanteil hast ... :-)

[DeddyH]

Mit dieser Aussage wäre ich sehr, sehr vorsichtig.

[Thomm]

Ich habs probiert

Es funktioniert, nur steht jetzt das Datum zuerst danach die Uhrzeit

auch wenn man den Code herumdreht :shock:

[grenzgaenger]

Zitat:

Zitat von DeddyH

Also, mein TDateTimePicker kann nur Date oder Time. Welchen verwendest Du denn?

mhhh, asche über mein haupt... hatte eine andere compo im kopf ...

[Thomm]

Seltsam, bei diesem Code müßte er doch zuerst die Zeit anzeigen,oder ?

Delphi-Quellcode:

ClientDataSet1Zeitangabe.AsDateTime := frac(datetimepicker1.Time) +trunc(datetimepicker2.date);

[grenzgaenger]

das ist ihm egal... der vorkommateil ist das datum, der nachkomma teil die zeit...

[Thomm]

Kann man das nicht umdrehen ???

......zuerst die Zeit.....dann das Datum

oder geht das nicht ?

[DeddyH]

Da kommt eine Fließkommazahl bei raus. Wie Du das ausgibst, ist doch Deine Musik.