si tengo 25 botones en un form y quiero cambiarles el caption a todos...
ES NECESARIO QUE NOMBRE LOS 25 BOTONES?!?!??!
Código Delphi
[-]
procedure TSalas.FormActivate(Sender: TObject);
var h:integer;
var a:string;
begin
with query1 do
begin
for h:=1 to 25 do
arreglo[h] := IntToStr(h);
for h:=1 to 25 do
begin
sql.clear;
sql.add('select*from usopc where inde='+arreglo[h]);
open;
USARVARIABLE H.Caption:=(fieldbyname('nombre').asstring);
end;
end;
end;
end.