[ MatezYU @ 07.04.2006. 14:54 ] @
Odradio sam kompletan program i kada treba da iz jmbg broja izvucem mesec, dan i godinu rodjenja to odradi. Ali problem nastaje na onim sistemima koji koriste drugaciji prikaz datuma, recimo ja prikazem u jednom boxu 13/02/1985 i onda iz tog boxa to konvertujem u datum i tako ga zapisem u bazu. Ali na racunaru gde se datum prikazuje sa 02/13/1985 program izbaci gresku i nece da odradi upis u bazu. Kako mogu to da resim?
[ Srki_82 @ 07.04.2006. 16:44 ] @
Code:
var
  Dan, Mesec, Godina: Word;
  Datum: TDate;
begin
  Dan := 1; //uzmes nekako iz JMBG
  Mesec := 2; //uzmes nekako iz JMBG
  Godina := 2006; //uzmes nekako iz JMBG
  Datum := EncodeDate(Godina, Mesec, Dan);
  Edit1.Text := DateToStr(Datum);
  // nesto radis... korisnik pise u Edit1.Text
  Datum := StrToDate(Edit1.Text);
  Baza.FieldByName('NekiDatum').AsDateTime := Datum;
end;


Kako god da je podeseno da se prikazuje datum kod korisnika, tako ce raditi i tvoj program.