Lệnh của Pascal dùng để lấy thông tin về giờ hiện tại
GetTime(Tiếng,Phút,Giây,Giây100);
GetTime(Hour,Min,Sec,Sec100);