[solved] TDateTimePicker - bug in Lazarus?
lazarus / 9-Editor

----------------------------------------------------------------------
Nicole · 2022-08-01 09:17

I was told to upload anything in this forum, what I think it may be a
bug.
I am relatively new to Lazaus, so I am insecure

So I upload
- a project simplified
- the lazarus.log
- the text below:

Do this:
- start the program
- go to the last Tab "neu"
- focus your attention on the DateTimePicker
- select the second RadioButton
- the DateTimePicker is gone


I suspect it may have something to do with
DateTimePicker_TerminEintrag.Kind
dkDateTime
dkDate
dkTime

These were the items, I worked with in the recent hours

(attachemend deleted)

----------------------------------------------------------------------
kirchfritz · 2022-08-01 10:00

Hi Nicole,

I was not able to load and compile your demo program.

unit_notizen.pas(15,21) Fatal: Kann Unit_myStringList nicht finden
verwendet von unit_Notizen des Projektinspektors.

----------------------------------------------------------------------
kirchfritz · 2022-08-01 10:08

Hi Nicole,

if you inspect your radio button click event:

Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i procedure
TForm_Notizen.RadioGroup_TerminNeuClick(Sender: TObject);begin   
DateTimePicker_TerminEintrag.Visible:=false;     if
RadioGroup_TerminNeu.ItemIndex=0 then     
Panel_TeminNeuUHilfe.Color:=Farbe_Typ0;   if
RadioGroup_TerminNeu.ItemIndex=1 then     
Panel_TeminNeuUHilfe.Color:=Farbe_Typ1;   if
RadioGroup_TerminNeu.ItemIndex=2 then     
Panel_TeminNeuUHilfe.Color:=Farbe_Typ2;   if
RadioGroup_TerminNeu.ItemIndex=3 then     
Panel_TeminNeuUHilfe.Color:=Farbe_Typ3;    if
(RadioGroup_TerminNeu.ItemIndex=4) then begin     
DateTimePicker_TerminEintrag.Visible:=true;     
Panel_TeminNeuUHilfe.Color:=Farbe_Typ4;   end;    if
(RadioGroup_TerminNeu.ItemIndex=5) then begin     
DateTimePicker_TerminEintrag.Visible:=true;     
Panel_TeminNeuUHilfe.Color:=Farbe_Typ4;   end;     if
RadioGroup_TerminNeu.ItemIndex=6 then     
Panel_TeminNeuUHilfe.Color:=Farbe_Typ6;    if
RadioGroup_TerminNeu.ItemIndex=7 then     
Panel_TeminNeuUHilfe.Color:=Farbe_Typ7;     if
RadioGroup_TerminNeu.ItemIndex=8 then         
Panel_TeminNeuUHilfe.Color:=Farbe_Typ8;      if
RadioGroup_TerminNeu.ItemIndex=9 then         
Panel_TeminNeuUHilfe.Color:=Farbe_Typ9; end;         
in the very first step you hide the dateTimePicker_TerminEintrag
and then you set the visibility to TRUE, only when
RadioGroup_TerminNeu.ItemIndex is 4 or 5.

If you click the second radiobutton, then the visibilty of the
DataTimepicker will never change.

----------------------------------------------------------------------
Nicole · 2022-08-01 10:38

Thank you so much!!
This is the silly mistake: I had two pickers, one for time-kind and
one for date-kind (my old Delphi did not allow both).
The time-kind I hid when not needed.

A rename action left the name of the time-kind instead of the name of
the date-kind-picker.
I needed somebody else to tell me the obvious.