Discussion :

[joreveur]

Bonjour

Quand je clique sur une date dans calendrier dans un TDateEdit la date récupérée est du type 2-4-15

Y-a-t' il une propriété ou une méthode pour reformater cette date genre 02/04/2015 dans le composant ?

NB pour Info je suis sous Linux avec Lazarus 1.2.6



Bien cordialement

[Jipété]

Yop !

Y-a-t' il une propriété ou une méthode pour reformater cette date genre 02/04/2015 dans le composant ?

Propriété DateOrder et tu choisis doDMY.

Attention, l'éditeur passera en mode TMaskEdit, mais au moins l'affichage est formaté comme tu veux.

[e-ric]

Salut

(sur Debian moi aussi, problème reproduit)
Après lecture des sources et un peu de tâtonnement, on trouve une solution (bricolée):

Code :

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

1
2
3
4
 
  DefaultFormatSettings.DateSeparator := '/';
  DateEdit1.Clear;
  DateEdit1.DateOrder := doDMY; // faisable avec l'inspecteur d'objet

Le composant est mal foutu... il impose un choix limité de format de date (je n'ai regardé que cela) via un type énuméré.
L'appel à clear permet de mettre à jour le format immédiatement.

La variable DefaultFormatSettings.DateSeparator prend la valeur '-' alors que les paramètres système semble indiquer '/', le problème se tient dans l'unité SysUtils et plus précisément dans sysinth.inc, les valeurs par défaut sont en dur et ne semblent pas reprises depuis les paramètres système, c'est ballot. Pour contourner le problème, il suffit donc de forcer la valeur au démarrage du programme.

Sujet à approfondir...

[e-ric]

re-salut

Il existe une fonction GetFormatSettings qui permet de reprendre les paramètre système locaux mais elle est disponibles uniquement dans le monde Windows (peut mieux faire...).

Donc si mon analyse est juste, la bidouille que j'ai proposée demeure une solution acceptable en l'état.

Si quelqu'un connaît mieux, ce serait bien de partager.

Cdlt

[joreveur]

Bonjour, Jipété

Yop !

Propriété DateOrder et tu choisis doDMY.

Attention, l'éditeur passera en mode TMaskEdit, mais au moins l'affichage est formaté comme tu veux.

effectivement ça formate en prévisualisation mais pas à l’exécution.


Bonjour e-ric

Salut

(sur Debian moi aussi, problème reproduit)
Après lecture des sources et un peu de tâtonnement, on trouve une solution (bricolée):

Code :

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

1
2
3
4
 
  DefaultFormatSettings.DateSeparator := '/';
  DateEdit1.Clear;
  DateEdit1.DateOrder := doDMY; // faisable avec l'inspecteur d'objet

Le composant est mal foutu... il impose un choix limité de format de date (je n'ai regardé que cela) via un type énuméré.
L'appel à clear permet de mettre à jour le format immédiatement.

La variable DefaultFormatSettings.DateSeparator prend la valeur '-' alors que les paramètres système semble indiquer '/', le problème se tient dans l'unité SysUtils et plus précisément dans sysinth.inc, les valeurs par défaut sont en dur et ne semblent pas reprises depuis les paramètres système, c'est ballot. Pour contourner le problème, il suffit donc de forcer la valeur au démarrage du programme.

Sujet à approfondir...

oui effectivement la méthode fonctionne parfaitement.
j'avais eu un problème un peu similaire en freepascal http://www.developpez.net/forums/sho...errerid=348736 ( Est-ce qu'il y a une similitude ?) et on m'avait conseillé de me mettre une unité clocale pour Linux. Mais en Lazarus cette méthode ne semble pas fonctionner.

Je ne marque pas le sujet résolu (bien que pour moi, il le soit) pour que ce problème puisse être réglé.

Merci à chacun pour sa contribution.

Bien à vous

[Jipété]

Bonjour, Jipété


effectivement ça formate en prévisualisation mais pas à l’exécution.

À l'exécution chez moi (Debian 32 bits et Lazarus 1.0.10) :



Bon, le séparateur n'est pas le "/" comme tu le demandes dans ton premier post, mais est-ce bien grave ?

[yamer]

Un peu au hasard et sans essayer par manque de temps. Avez-vous essayé de charger l'unité clocale dans votre programme (fichier lpr) ?

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
program Project1;
 
{$mode objfpc}{$H+}
 
uses
  {$IFDEF UNIX}
  clocale, 
  {$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}
 
  {$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, Unit1
  { you can add units after this };

[Jipété]

Un peu au hasard et sans essayer par manque de temps. Avez-vous essayé de charger l'unité clocale dans votre programme (fichier lpr) ?

Bingo !

Je ne mets pas de copie d'écran, mais les "/" sont bien là.

[joreveur]

Bonjour Jipété et Merci de tes réponses

À l'exécution chez moi (Debian 32 bits et Lazarus 1.0.10) :



Bon, le séparateur n'est pas le "/" comme tu le demandes dans ton premier post, mais est-ce bien grave ?

Quand le demandeur souhaite un type d'affichage, il faut s'en tenir à sa demande sauf à prouver que c'est infaisable...
Mais c'est vrai que dans l'absolu, ce n'était pas bien grave en terme de fonctionnalité.

---

Bonjour yamer et merci pour cette solution qui fonctionne.

Un peu au hasard et sans essayer par manque de temps. Avez-vous essayé de charger l'unité clocale dans votre programme (fichier lpr) ?

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
program Project1;
 
{$mode objfpc}{$H+}
 
uses
  {$IFDEF UNIX}
  clocale, 
  {$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}
 
  {$ENDIF}
  Interfaces, // this includes the LCL widgetset
  Forms, Unit1
  { you can add units after this };

J'avais bien essayé de mettre cette unité dans unit1.pas mais j'avais du mal implémenté (oublié un {ENDIF} ...) et donc je pensais que ça ne fonctionnais pas d'où ce billet ; ça simplifiera le code en conséquence et cela sera plus propre


Merci à chacun et bonne continuation.

Cordialement