masquer le contenu de datetimepickerRésolu

Question

salut a tous, j'ai dans ma form un chekbox et 2 datetimepicker,un pour la date et l'autre pour l'heure  et j'aimerai savoir comment ne pas afficher le contenu des datetimepicker si je ne coche pas checkbox ? et question bette:est ce que je peut afficher et la date et l'heure dans le même datetimepicker?!merci d'avance.

cs_rt15 · Accepted Answer

Salut,

Pour la première question, bin suffit de mettre un peu de code dans le onclick de ta checkbox. Quelque chose comme ça :

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
  DateTimePicker1.Visible:= CheckBox1.Checked;
  DateTimePicker2.Visible:= CheckBox1.Checked;
end;

cs_cantador · Answer

bonjour,

plus élégant...

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
  DateTimePicker1.Enabled:= CheckBox1.Checked;
  DateTimePicker2.Enabled:= CheckBox1.Checked;
end;

cantador

cs_mimichette · Answer

salut;
merci beaucoups, ca marche du tonner.

cs_mimichette · Answer

resalut,
voila j'ai encore quelques petits problemes;  ne prob1: il faut que je coche dabord mon checkbox dont le champ est 'ARRET_EQUI' ensuite je le décoche pour qu'il s'affiche 'false' dans ma table dbase4.                                    prob2: la date et l'heure s'affichent quand meme dans ma table meme si je ne  coche pas checkbox.
prob3: dans mon datetimepicker5 j'affiche l'heure, je lui est mis sa propriete kind:
dtktime mais encore un fois dans ma table son format et comme celui de la date. 
alors voici mon code aidez moi svp!!!

procedure TForm2.CheckBox1Click(Sender: TObject);
begin
if checkbox1.checked =false then
table1.FieldByName('ARRET_EQUI').asboolean:=false
else
table1.FieldByName('ARRET_EQUI').asboolean:=true ;
DateTimePicker2.Enabled:= CheckBox1.Checked;
DateTimePicker5.Enabled:= CheckBox1.Checked;
end;

procedure TForm2.FormCreate(Sender: TObject);
begin
DateTimePicker2.DateTime:= Now;
DateTimePicker5.Time:= Now;
end;

procedure TForm2.Table1AfterInsert(DataSet: TDataSet);
begin
Table1.FieldByName('D_ARR_EQUI').AsDatetime:= DateTimePicker2.Date;
Table1.FieldByName('H_ARR_EQUI').AsdateTIME:= DateTimePicker5.Time;
end;

cs_cantador · Answer

tu peux créer une petite procédure :

procedure EtatDateTime;
begin
DateTimePicker2.Enabled:= CheckBox1.Checked; DateTimePicker5.Enabled:= CheckBox1.Checked;
end;

que tu appelles ensuite dans :
procedure TForm2.FormCreate(Sender: TObject); 
begin 
DateTimePicker2.DateTime:= Now; 
DateTimePicker5.Time:= Now;
EtatDateTime; 
end; 

et
procedure TForm2.CheckBox1Click(Sender: TObject); 
begin 
if checkbox1.checked =false then 
table1.FieldByName('ARRET_EQUI').asboolean:=false 
else 
table1.FieldByName('ARRET_EQUI').asboolean:=true ; 
EtatDateTime;
end;

cantador

cs_mimichette · Answer

salut cantador,
 merci pour la procedure etatdatetime, mais quand j'éxecute le progamme, il y a une erreur dans cette procedure ''identificateur non déclaré:datetimepicker2 et 3''!! je suppose que je dois les déclarer dans la procedure, mais je ne sais pas comment?
(pardon pour l'écriture, je ne sais pas comment agrandir la fenetre de mon message??? 
a+

cs_rt15 · Answer

C'est que EtatDateTime est une procédure classique, pas une méthode de la form.
Elle ne peut donc pas connaître les composants de celle-ci.

Les méthodes de la classe TForm2 sont préfixées par : "TForm2 .". Elles prennent en plus un argument caché : Self. Self correspond à l'instance de ta TForm2.

Pour ajouter une méthode, il faut ajouter sa déclaration dans TForm2 :

type
  TForm2 = class(TForm)
  private
    procedure EtatDateTime;
  ...
  end;

Et l'implémenter :

procedure TForm2.EtatDateTime;
begin
  //...
end;

cs_cantador · Answer

merci rt15 pour le complément...

cantador

cs_mimichette · Answer

merci a vous deux, mais je ne sais vraiment pas pourquoi le format de l'heure s'affiche comme celui de la date dans ma table?!!! pourtant j'ai bi1 mis  kind dtktime et format hh:mm.

cs_cantador · Answer

mais je ne sais vraiment pas pourquoi le format de l'heure s'affiche comme celui de la date dans ma table?!!!



Ton champ doit être déclaré en TIME dans la table

cantador

cs_mimichette · Answer

oui mais j'utilise une table dbase4 et il n'y a pas TIME alors j'ai mis caractere. please help me!!!!

cs_cantador · Answer

dbase4 ?
houla..beaucoup trop vieux 
faut prendre une base plus récente sinon tu vas t'enliser..

cantador

cs_mimichette · Answer

ok cantador, merci pour le conseil mais j'ai deja fais 3 tables géantes et plein de formes alors si je refais les tables avec paradox sans que je refasse les formes ca va peut etre créer des problemes!! ou pas??? aidez moi svp.merci.

cs_cantador · Answer

C'est un choix à faire...
travailler avec des vieux outils et galérer ou 
prendre le taureau par les cornes !

pour les bdd, tu as le choix Firebird, MySQL, SQLServer etc etc..(il y en a beaucoup de free..)
pas paradox, car c'est troquer son cheval borgne contre un aveugle..

cantador

cs_mimichette · Answer

ok, mais est ce que si je change mes tables sans changer mes formes il n y aurait pas de problemes? (je n'ai qu'a les enregistrer dans mon projet)?

cs_cantador · Answer

Tout dépend du choix de la base..
Si c'est FireBird (que je connais bien), tu peux utiliser l'ODBC
(il faut le driver) mais le mieux est de choisir des composants d'accès direct.
Tu peux aussi utiliser une base access avec les composants ADO.

Tout dépend aussi de l'importance de ton projet, de la taille de la base et de son mode d'utilisation (local ou réseau)

A lire les infos sur le net à propos de toutes ces bases..

cantador

cs_mimichette · Answer

ok, merci cantador.

Masquer le contenu de datetimepicker

17 réponses

Votre réponse

Discussions similaires