Gracias por las aportaciones, pero no me funciona snif
tengo este codigo
Código Delphi
[-]
procedure Trregistro.xtipohabitaClick(Sender: TObject);
var
fila,columna:integer;
pasar:tlabel;
textos:string;
begin
pasar := TLabel.Create(self);
pasar.Parent := fentrada;
pasar.enabled:=true;
fila:=xtipohabita.col;
columna:=xtipohabita.row;
if xtipohabita.cells[fila,columna]<>'' then
begin
fentrada.ha:=strtoint(xtipohabita.cells[fila,columna]);
textos:=xtipohabita.cells[fila,columna];
pasar.Name:='Lh'+textos;
pasar.caption:=textos;
fentrada.lbl.name:='lh'+textos;
pasar.caption:=xtipohabita.cells[fila,columna];
fentrada.lbl.enabled:=true;
fentrada.refresh;
showmessage(fentrada.lbl.caption);
pasar.destroy;
end;
end;
tengo en el form fentrada los labels por ejemplo el label maestro por asi decirlo se llama en caption 101, en name lh101, pero esos label el resto son lh102, etc.....
aplicando el codigo que me habeis dicho, podria hacer que el name del label sea lh110 y ahi redibujarlo en fentrada, pero no funciona, me debe faltar algo imagino.
El problema es poder modificar cualquier label del form fentrada.
gracias por la paciencia