Было много раз на форуме.
Потом использовать например так...Код:PROGRAM GetingTime VAR GetTime: CurTimeEx; TimeAndDate: SystemTimeDate; Sys_Time: SysTime64; END_VAR VAR_OUTPUT out_hour: UINT; out_minute: UINT; out_DayOfWeek: UINT; END_VAR ------------------------------------ TimeAndDate.Day :=0; TimeAndDate.DayOfWeek :=0; TimeAndDate.dwHighMsec :=0; TimeAndDate.dwLowMSecs :=0; TimeAndDate.Milliseconds :=0; TimeAndDate.Minute :=0; TimeAndDate.Second :=0; TimeAndDate.Hour :=0; TimeAndDate.Year :=0; TimeAndDate.Month :=0; Sys_time.ulHigh :=0; Sys_time.ulLow :=0; GetTime (SystemTime:=Sys_Time , TimeDate:= TimeAndDate); out_hour:=TimeAndDate.Hour ; out_minute:=TimeAndDate.Minute; out_DayOfWeek:=TimeAndDate.DayOfWeek;
plc0.jpg




Ответить с цитированием
