Discussion :

[marco64]

Bjr,
Qd j'utilise la fonction "FormatDateTime", j'obtiens les jours ou mois en anglais.
Comment modifier, si c'est la solution, les variables globales ShortDayNames ou ShortMonthNames pour les obtenir en français.
J'ai également vérifié les parametres régionaux de windows mais rien d'anormal.
Merci

[e-ric]

Salut

Ta version de Delphi ne serait pas en Anglais par hasard ?

e-ric

[marco64]

Non, c'est une vielle license delphi2 (il en reste encore ) en français.

[aityahia]

c tres bizzar quelle version de windows utiliser vous

avec une version française et un bon paramétrage la fonction marche tres bien

montre nous un bout de ton code.

[Alyx²]

je confirme...
J'utilise Delphi 4, et la fonction renvoi bien des dates en francais.

Est-ce qu'il n'y aurait pas pls formats disponibles, dont 1 par défaut (en anglais donc dans delphi 2) ?

[marco64]

Const
Fdate = 'ddd d/mm" " hh:nn';
...
...
procedure TForm1.Timer1Timer(Sender: TObject);
begin
HeureCourante.caption := formatdatetime(Fdate,now);
end

et je récupère dans mon label : Sun 23/07 09:19

Je tourne sous Win Me et les dates et heures ds parametres régionaux du panneau de config sont au format français.

Dans l'aide Delphi on parle d'API windows mais n'etant pas un pro je n'ai pas trop creusé

[Laurent Dardenne]

Salut,
utilise le formatage adéquate 'JJ/MM/YYY' .

[marco64]

JJ n'est pas reconnu par la fonction !

[Laurent Dardenne]

oui avec DD/MM/YYYY c'est plus mieux

[marco64]

Mon pb c'est le retour de la fonction qui ne me convient pas : jour et mois en anglais.
Comment passer en français alors que tout semble correctement paramétré ??

[Eric.H]

Mon pb c'est le retour de la fonction qui ne me convient pas : jour et mois en anglais.
Comment passer en français alors que tout semble correctement paramétré ??

Normalement les variables du style ShortDayNames sont initialisées au démarrage de l'aplication en prenant en compte la config windows. Tu as peut être un problème de paramétrage de ton windows (encore que Me est connu pour être une daube)

sinon tu peut faire au démarrage de ton application :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ShortDayNames[1]:='toto';

Et bien entendu tu peux tout surcharger (unité SysUtils):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
var
  CurrencyString: string;
  CurrencyFormat: Byte;
  NegCurrFormat: Byte;
  ThousandSeparator: Char;
  DecimalSeparator: Char;
  CurrencyDecimals: Byte;
  DateSeparator: Char;
  ShortDateFormat: string;
  LongDateFormat: string;
  TimeSeparator: Char;
  TimeAMString: string;
  TimePMString: string;
  ShortTimeFormat: string;
  LongTimeFormat: string;
  ShortMonthNames: array[1..12] of string;
  LongMonthNames: array[1..12] of string;
  ShortDayNames: array[1..7] of string;
  LongDayNames: array[1..7] of string;
  SysLocale: TSysLocale;
  TwoDigitYearCenturyWindow: Word = 50;
  ListSeparator: Char;

Tu peut également utiliser

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

function FormatDateTime(const Format: string; DateTime: TDateTime; var FormatSettings: TFormatSettings): string;

Si disponible dans ta version de Delphi

[slimjoe]

Salut!

Je crois que tu n'as pas répondu à la question la plus importante cher ami. Est-ce que tu utilises une version de Windows en anglais ?

Si ton Windows est en anglais (ou en italien ou turc) tu devrais manuellement traduire les libellés des jours et des mois dans les variables globales correspondantes (LongMonthNames, ShortMonthNames, LongDayNames, ShortDayNames). Je ne crois pas que Windows stocke le mot Lundi dans toute les langues possibles (à mon avis, ce que l'on configure dans le panneau de configuration c'est uniquement la langue d'entrée et les paramètres de localisation comme le format monétaire et la virgule ou le point pour indiquer une décimale). Je peux me tromper mais je crois que si ton Windows est en anglais, le seul mot qu'il connaîtra pour faire afficher un lundi est Monday.

Bon dev!

[slimjoe]

Pendant que j'y pense....

Je ne sais pas si ça existe sour Delphi 2 mais sous mon Delphi 7 (et je sais que ça y étais en D4 aussi) tu peux choisir la langue par défaut de ton application. Menu Project --> Options --> onglet "Version Info" --> GroupBox "Language" au milieu à droite.

[aityahia]

y a pas de raison pour que sa ne fonction pas si ta vesion de windows est en français, bon j'ai pas delphi 2 sous la mains mais avec delphi 7 sa fonctione bien

tu peu faire un test dans l'evenement onclick d'un bouton

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
 ShowMessage(ShortDayNames[1]);

il doit afficher dim.
si c'est pas le cas regarde du coté de windows.

[slimjoe]

y a pas de raison pour que sa ne fonction pas si ta vesion de windows est en français

J'ai beau lire le post encore et encore, je ne vois pas où marco64 indique que son Windows est en français... je crois qu'il est là le problème....

C'est écrit "Démarrer" ou "Start" en bas à gauche ?

[Eric.H]

C'est écrit "Démarrer" ou "Start" en bas à gauche ?

"Démarrationning"

[marco64]

Merci pour tous ces messages.
Je possede Win ME (meme si c'est une daube) en français. Les dates retournées par windows sont en français.
Le test de aityahia me renvoie tjrs sunday
Ma version de Delphi est aussi française et non piratée.
Je vais pas me prendre le chou et remplir le tableau ShortDayNames .
Dommage de rester sur sa faim

[aityahia]

execute ton prog sur une autre machine avec un autes syteme XP ou 2000.