Discussion :

[Powerdj]

Salut

Je ne sais pas pourquoi ce code ne fonctionne pas !!

Code :

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

1
2
3
4
5
6
7
For H := 1 to 45 do
begin
if (Form8.Components[H] is TQRLabel) then
begin
TQRLabel(Form8.Components[H]).Caption := '';
end;
end;