Predmet:Re: Delphi trikovi
Prilikom čitanja datuma iz Windows sustava često dolazi do pogreÅ¡ke jednom kad se taj datum pretvara u string. Naime, sam oblik datuma u Windowsima se postavlja u "Regional settings". Tako da se pri koriÅ¡tenju uobičajene naredbe DateToStr mogu na različito konfiguriranim sustavima dobivaju različiti izlazi. Zato je važno prije ikakve pretvorbe odrediti oblik datuma koji želimo dobiti, a to radimo naredbom FormatDateTime('hh:mm:ss:zzz',ProtekloVrijeme) pomoću koje ćemo dobiti naÅ¡e vrijeme u željenom obliku.
PreuzmiIzvorni kôd (Delphi):if Pos('MMMM',ShortDateFormat)=0 then
ShortDateFormat:= Copy(ShortDateFormat,1,Pos('MMMM', ShortDateFormat))
+Copy(ShortDateFormat,Pos('MMMM',ShortDateFormat)+3,Length(ShortDateFormat));
if Pos('MMM', ShortDateFormat)=0 then
ShortDateFormat:= Copy(ShortDateFormat,1,Pos('MMM', ShortDateFormat))
+Copy(ShortDateFormat,Pos('MMM',ShortDateFormat)+2,Length(ShortDateFormat));
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.