OnGuard da 01.01.9999 tarihinde hata
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
OnGuard da 01.01.9999 tarihinde hata
arkadaslar onguard kullananlar bilir
checknodate:=StrToDate('01.01.9999');
diye bir satir vardir burasi hata verir hale geldi, sizde de boyle bir sorun varmi?
valid date degil diyor bu satirda kod
checknodate:=StrToDate('01.01.9999');
diye bir satir vardir burasi hata verir hale geldi, sizde de boyle bir sorun varmi?
valid date degil diyor bu satirda kod
Programın girişine
kodunu ekleyeceksin. Bu sayede yerel ayarlar ne olursa olsun Türkçe tarih biçimine göre işlem yapacak.
Kod: Tümünü seç
uses SysUtils;
DateSeparator := '.';
ShortDateFormat := 'dd.mm.yyyy';
Program girişi
Program'in girişinden kastiniz
form'un creatine mi,, yoksa yapılan her kisa porgramin başlangicina mi..
ikisi arasında bir fark olur mu?
örnekteki işlemi yaptıktan sonra aşağıdaki tarih ayarlamasını yapmaya gerek var mı?
form'un creatine mi,, yoksa yapılan her kisa porgramin başlangicina mi..
ikisi arasında bir fark olur mu?
örnekteki işlemi yaptıktan sonra aşağıdaki tarih ayarlamasını yapmaya gerek var mı?
Re: Program girişi
Bir fark olmaz. Bu kodun program açıldığında bir kereliğine çalışması yeterli. Sürekli çalıştırmayacaksınız.Çağrıbey yazdı:Program'in girişinden kastiniz
form'un creatine mi,, yoksa yapılan her kisa porgramin başlangicina mi..
ikisi arasında bir fark olur mu?
Neyi kastettiğini anlamadım.Çağrıbey yazdı: örnekteki işlemi yaptıktan sonra aşağıdaki tarih ayarlamasını yapmaya gerek var mı?
Re: OnGuard da 01.01.9999 tarihinde hata
en iyisi regeditten sorgu yapıp tarih formatını kaydetme.
var
reg:TRegistry;
begin
reg:=TRegistry.Create;
reg.RootKey:=HKEY_CURRENT_USER;
reg.OpenKey('Control Panel\International',True);
if reg.ReadString('sShortDate')<>'dd.MM.yyyy' then
Begin
reg.WriteString('sShortDate','dd.MM.yyyy');
end;
reg.CloseKey;
reg.Free;
var
reg:TRegistry;
begin
reg:=TRegistry.Create;
reg.RootKey:=HKEY_CURRENT_USER;
reg.OpenKey('Control Panel\International',True);
if reg.ReadString('sShortDate')<>'dd.MM.yyyy' then
Begin
reg.WriteString('sShortDate','dd.MM.yyyy');
end;
reg.CloseKey;
reg.Free;
Re: OnGuard da 01.01.9999 tarihinde hata
Bir ek bilgi de ben vereyim.
Eger firebird ile ugraşıyorsanız nokta . kullandıgınızda firebird tarihi dd.mm.yyyy olarak yorumlar, eger slash / kullanırsanız mm/dd/yyyy olarak yorumlar.
Eger firebird ile ugraşıyorsanız nokta . kullandıgınızda firebird tarihi dd.mm.yyyy olarak yorumlar, eger slash / kullanırsanız mm/dd/yyyy olarak yorumlar.