Цитата Сообщение от pahotnyh Посмотреть сообщение
... Как лучше генератор на 1 сек сделать?
По разному, например, вот так
Код:
    a1 := dt_to_udint(get_date_time());
    Q := not (SYS.compare_date_time(a1, a2, 1) = 0);
    a2 := a1;