Discussion :

[Jon Shannow]

Bonjour,

Voilà, j'aimerais que sur le clique d'un bouton, tous les TDBEdit de la form passent ReadOnly True à ReadOnly False.
Il y a beaucoup de TDBEdit sur la form en question, et pas que des TDBEdit, mais je ne veux toucher qu'aux TDBEdit.

Comment puis-je faire cela en étant sûr de traiter tous les TDBEdit et seulement les TDBEdit !

Merci

JS

[batyann811]

Tu dois pouvoir faire comme ça :

Code :

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

1
2
3
4
5
6
7
8
 
var
  I: Integer;
begin
  for I := 0 to ComponentCount - 1 do
    if Components[I] is TBEdit then
      (Components[I] as TBEdit).ReadOnly := false;
end;

[Jon Shannow]

Merci,

C'est tellement simple que je n'aurais osé l'essayer !

JS