Topic: Please Help
Anyone Tell How to show Running Current Date and Time
Time Is Paused When I Open Form
My Visual Database → General → Please Help
Anyone Tell How to show Running Current Date and Time
Time Is Paused When I Open Form
Hi,
Have a look at the attached example; the time is displayed in the Form's caption but it could just as easily be done as a label.
Derek.
Sorry - just realised you wanted date and time (although it's much the same).
See attachment.
Derek.
not in form title time
any chance running to datetimepicker
procedure Form1_OnShow (Sender: TObject; Action: string);
var
Timer: TTimer;
begin
Timer := TTimer.Create(Form1);
Timer.Interval := 1000;
Timer.onTimer := @OnTime;
Timer.Enabled := True;
end;
procedure OnTime(Sender :TObject);
begin
Form1.DateTimePicker1.DateTime := Now();
end;
procedure Form1_OnShow (Sender: TObject; Action: string); var Timer: TTimer; begin Timer := TTimer.Create(Form1); Timer.Interval := 1000; Timer.onTimer := @OnTime; Timer.Enabled := True; end; procedure OnTime(Sender :TObject); begin Form1.DateTimePicker1.DateTime := Now(); end;
Working Thank you brother <3
My Visual Database → General → Please Help
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi