Bonjour,

J'ai essayé de recycler une fonction me permettant de faciliter la saisie à l'utilisateur (dans le cas présent pour saisir une heure) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
procedure Form1.EFDebutKeyDown(Sender: TObject; var Key: Word;
  var KeyChar: Char; Shift: TShiftState);
begin
  if (Length(EFDebut.Text)=2) And (Key <> 8) And (Key <> 58) then 
    EFDebut.Text := EFDebut.Text+':';
  EFDebut.SelStart := Length(EFdebut.Text);
end;
Avec Delphi 6, ça fonctionne sans soucis, mais en FMX (Delphi 11), la plupart du temps, et ce pour beaucoup de touches, Key = 0 .
Est-ce normal?