Topic: Обновить Дату и Время в DateTimePicker
Помогите мне обновить время в DateTimePicker2
Попробовал задать текущее время кнопкой UPDATE, но все равно не сохраняет новое время в базу данных.
Может существует команда обновления DateTimePicker!?
My Visual Database → Russian → Обновить Дату и Время в DateTimePicker
Помогите мне обновить время в DateTimePicker2
Попробовал задать текущее время кнопкой UPDATE, но все равно не сохраняет новое время в базу данных.
Может существует команда обновления DateTimePicker!?
procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean);
begin
Form1.DateTimePicker1.DateTime := Now();
Form1.DateTimePicker2.DateTime := Now();
end;
или так:
procedure OnTimer (Sender: TObject);
begin
Form1.DateTimePicker1.DateTime := Now();
Form1.DateTimePicker2.DateTime := Now();
end;
procedure Form1_OnShow (Sender: TObject; Action: string);
var
Timer:TTimer;
begin
Timer := TTimer.Create(Form1);
Timer.Interval := 1000;
Timer.OnTimer := 'OnTimer';
end;
procedure Form1_Button1_OnClick (Sender: TObject; var Cancel: boolean); begin Form1.DateTimePicker1.DateTime := Now(); Form1.DateTimePicker2.DateTime := Now(); end;
Спасибо k245
все работает. Первый вариант очень подходящий для меня.
My Visual Database → Russian → Обновить Дату и Время в DateTimePicker
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi