- Код: Выделить всё
ShowMessage('бу');
ShowMessage('12:00:00');
ShowMessage(TimeToStr(StrToTime('12:00:00')));
увидим
'12:00:00'
'00:00:00'
я так понимаю что виноват код
- Код: Выделить всё
if PM then
begin
if (TimeValues[0] <> 12) then
Inc(TimeValues[0], 12);
end
else
begin
if (TimeValues[0]=12) then
TimeValues[0]:=0;
^^^^^^^^^^^^^^
end;
в dati.inc
на что исправить еще не смотрел.
пойду писать багтрекер.
баг номер 9772