n'oubliez pas de mettre résolu
procedure TForm1.Edit1Change(Sender: TObject);
var i:integer;
s:string;
begin
Type: Messages; Utilisateur: MIWAN
n'oubliez pas de mettre résolu
procedure TForm1.Edit1Change(Sender: TObject);
var i:integer;
s:string;
begin
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.