TForm1: : btn3Click (TObject * Sender)//exit button
{
Application - & gt; The Terminate ();
}
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --

Void __fastcall TForm1: : btn1Click (TObject * Sender)//show time
{

Form1 - & gt; Label1 - & gt; Caption=Now ();

}
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --
Void __fastcall TForm1: : btn2Click (TObject * Sender)//display the date
{

//not

}

Void __fastcall TForm1: : tmr1Timer (TObject * Sender)//in the timer display time
{
Form1 - & gt; Label1 - & gt; Caption=Now ();
}
//-

CodePudding user response:

 void __fastcall TForm1: : BitBtn1Click (TObject * Sender) 
{
//display time 
Form1 - & gt; Label1 - & gt; Caption=FormatDateTime (" hh: nn: ss ", Now ()); 
} 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
Void __fastcall TForm1: : BitBtn2Click (TObject * Sender) 
{
//display the date 
Form1 - & gt; Label1 - & gt; Caption=FormatDateTime (" yyyy '-', '-' mm dd ", Now ()); 
} 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 

As for the Timer, and shall be dealt with in accordance with the
But, you want to use the

 Timer1 - & gt; Enabled=true; 

To activate the Timer control work

CodePudding user response:

The effect of the original poster is to want to a switch, simpler,

 void __fastcall TForm1: : tmr1Timer (TObject * Sender) 
{
Label1 - & gt; Caption=tmr1 - & gt; Tag==1? The Date () : the Time (); 
} 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
//display the date 
Void __fastcall TForm1: : btn1Click (TObject * Sender) 
{
Tmr1 - & gt; Tag=1; 
} 
//-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- 
//display time 
Void __fastcall TForm1: : btn2Click (TObject * Sender)/
{
Tmr1 - & gt; Tag=0; 
}