ساعت کامل

[amin2dpr]

سلام چطور میشه در دلفی یک متغیر از ساعت به شکل زیر بدست آورد؟

pm 01:35:21
​

 

[یاسردرا]

var
today : TDateTime;
begin
today := Time;

ShowMessage('today has time = '+TimeToStr(today));

end;
.............................................
برای موقع از زمان هم می تونی شرط بزاری
و مقدار شو بدست بیاری بعد دو متغیر در کنار هم بزاری.