Discussion :

[pierrot67]

Bonjour

Comment peut-on empêcher la saisie d'un espace (barre espace) entre les caractères dans un dbedit

MERCI D'AVANCE

[SergioMaster]

a première vue , dans l'evenement OnKeyPress du composant

Code :

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

1
2
3
4
5
 
procedure TForm.Code_ClientKeyPress(Sender: TObject; var Key: Char);
begin
if Key=#20 then Key:=#0;
end;

[pierrot67]

Merci mais
Ne marche pas

[pierrot67]

C'est bon c'était un problème de n° de code 32 et pas 20

Merci encore

[SergioMaster]

C'est bon c'était un problème de n° de code 32 et pas 20

désolé je n'avais pas testé , j'avais mis #20 en pensant aux %20 remplacant les espaces dans certains chemins . Enfin la soluce était bonne dans le principe

Hex 20 = Dec 32