Salut tous j'ai un petit problème sur une application
j'ai un DateTimePicker avec une case a cocher,avec un edit
quand le DateTimePicker.Checked = true edit.text=1
sinon edit.text=0
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
procedure TForm1.DateTimePicker1Change(Sender: TObject);
begin
if DateTimePicker1.Checked = true then begin
Edit1.Text:='1';
end
else begin
Edit1.Text:='0';
end;
end;
avec XPManifes mon edit change une fois seulement et reste a 1
existe t'il une parade ou un composant style XP gratuit .Merci de votre aide