Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TDateTimePicker kein Datum zuweisen? (https://www.delphipraxis.net/53628-tdatetimepicker-kein-datum-zuweisen.html)

ibp 20. Sep 2005 10:45


TDateTimePicker kein Datum zuweisen?
 
Hallo,

wie kann ich dem TDateTimePicker klar machen, dass kein Datum ausgewählt ist oder keins angezeigt werden soll, wenn keins gesetzt ist?

Gruß aus F

Sharky 20. Sep 2005 10:57

Re: TDateTimePicker kein Datum zuweisen?
 
Hai ibp,

wie genau soll den der Ablauf bei der Eingabe durch den Benutzer sein? Sprich: Wie soll definiert werden wann etwas angezeit wird?

ibp 20. Sep 2005 11:00

Re: TDateTimePicker kein Datum zuweisen?
 
hai hai,

die daten stammen aus einer db und es kann sein, dass kein datum gesetz ist oder auch wird. dann sollte die anzeige z.B. so aussehen: " . . " oder "" natürlich ohne ""

Sharky 20. Sep 2005 11:02

Re: TDateTimePicker kein Datum zuweisen?
 
Zitat:

Zitat von ibp
hai hai,

die daten stammen aus einer db und es kann sein, dass kein datum gesetz ist oder auch wird. dann sollte die anzeige z.B. so aussehen: " . . " oder "" natürlich ohne ""

Die Frage ist:
Wie gibt soll der Anwender ein Datum eingeben können? Oder soll er das überhaupt nicht? Wenn er es soll dann hätte ich glaube ich eine Lösung die über den Dialog geht. Aber nicht einfach so über die Tastatur.

ibp 20. Sep 2005 11:06

Re: TDateTimePicker kein Datum zuweisen?
 
genauer es gibt ein formular (= felder der tabelle) wenn dieses bearbeitet wird kann ein datum eingegeben oder eben aus dem picker gewählt werden oder eben nicht oder wieder gelöscht werden! natürlich nur wenn ich auch das feld anwähle!

Sharky 20. Sep 2005 11:17

Re: TDateTimePicker kein Datum zuweisen?
 
Hai ibp,

noch nicht so ganz 100%. Aber eventuell eine Grundlage?
Delphi-Quellcode:
procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
  if (DateTimePicker1.Tag = 1) then
  begin
    (Sender As TDateTimePicker).Format := QuotedStr('Datum wählen');
  end
  else
  begin
    (Sender As TDateTimePicker).Format := ShortDateFormat;
  end;
end;

procedure TForm1.DateTimePicker1CloseUp(Sender: TObject);
begin
  (Sender As TDateTimePicker).Tag := 0;
  DateTimePicker1Change(sender);
end;

procedure TForm1.DateTimePicker1KeyPress(Sender: TObject; var Key: char);
begin
  if (Key = #27) then
  begin
    (Sender As TDateTimePicker).Tag := 1;
  end;
  if Key in ['0'..'9'] then
  begin
    (Sender As TDateTimePicker).Tag := 0;
  end;
  DateTimePicker1Change(sender);
end;

Flocke 20. Sep 2005 11:21

Re: TDateTimePicker kein Datum zuweisen?
 
Ich nehme für so etwas immer einen DateTimePicker mit CheckBox (gesetzt->Datum, nicht gesetzt->kein Datum).

ibp 20. Sep 2005 11:28

Re: TDateTimePicker kein Datum zuweisen?
 
Zitat:

Zitat von Flocke
Ich nehme für so etwas immer einen DateTimePicker mit CheckBox (gesetzt->Datum, nicht gesetzt->kein Datum).

kommt hier nicht in frage

und @hai werde es mal testen!


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:50 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz