jak w temacie.
z europejskiego na amerykański nie ma problemu ale odwrotnie jakoś nie mogę znaleźć
próbowałem łopatologicznie w ten sposób ale strtotime i tak zamienia go na am/pm...
S := FormatDateTime('HH:nn:ss ampm', Now);
if length(s)>8 then begin
if copy(s,10,2) = 'PM' then
begin
t:=strtoint(copy(s,1,2));
t:=t+12;
delete(s,1,2);
s:=inttostr(t)+s;
end;
end;
s:=copy(s,1,8);
t1:=strtotime(s);
result:=t1;
obszedłem to w końcu zwracającą stringa zamiast ttime ale dobrze by było wiedzieć jak to powinno wyglądać :P