Predi da twardish 4e ne towa e problema - spri i pomisli malko - nali ti kazah da proverish za kakwo sluzat tezi "konstantni promenlivi" - naprwi si truda da pro4etesh malko helpa na Delphito
- konkretno na waprosa ti - wawezdaneto na datata w BD ( !!!!!!!! ako izpolzwash BDE !!!!!!!!! - zawisi ot nastrojkite na BDE -to) zawisi ot towa kakaw modul polzwash za dostap do sastinskata Data Engine - moze da e BDE, a moze da ne e minawash prez neia. Mezdu drugoto daze i kato polzwash BDE pri 4ast ot operaciite se izpolzwa Regional Settings, a pri drugi se izpolzwat nastrojkite na BDE - koito po default sa MDY - ako ne si pipal razbra se tam kadeto ne ti e rabota. Da ama poletata w koito se wawezda datata obiknoweno izpolzwat formata na Winbozata - pri koeto naistina nastawa neweroiatna sumatoha - pri polozenie primerno 4e ti se opitwash da izpolzwash niakoia ot funkciite za preobrazuwane na data kum string ili oste po losho ot STRING kum data.
Primerno iskash da setnesh poleto na
Table1.FeldByName('MyDate').asDateTime:=StrToDate('12/01/1999');
da ama mnogo losha situacia se polu4awa - stoto tazi funkcia zawisi ot regionalnite nastrojki na win-a - t.e. na edin komputar ste raboti ama na drug ne - osobenno na takaw na kogoto sa instalirali FlexType ;-))) toku sto.
Naprawi si slednia primer(PISHA NAIZUST - moze da ima greshki)

var D:TDateTime;
s:string;
begin
D:=Now;
ShortDateFomat:='dd/mm/yyyy g.'; //ili probwaj s LongDateFormat ako towa ne raboti taka kakto mislia
s:=DateToStr(s);
MessageBox(s,'Look', MB_OK);
ShortDateFomat:='dd/mm/yyyy GGGGG.';
s:=DateToStr(s);
MessageBox(s,'Look', MB_OK);
end;

Bi triabwalo da si razbral 4e niama nuzda da promeniash regionalnite nastrojki na Win-a - pri startiraneto na programata te se zarezdat w onezi "konstanti" i se polzwat ot funkciite ot tam - taka 4e edinstwenoto koeto triabwa da nprawish e da si izberesh nastrojki s koito da rabotish i da gi ustanowish na podhodiasto miasto w progamata
Towa oba4e samo po sebesi e goliam nedostatak - moze pak klienta da iska da wizda datite taka kakto sa si nastroeni w Windowsa - edinstwenia na4in go e kazal kolegata - ami prosto predawaj nestata 4rez promnliwi TDateTime

---
Е т'ва е живот!

Съдържаниет е скрито
Влезте за да го видите