Fórum Problema typecast String gt; TLabel | Prob com ComponentCo #366216
16/11/2008
0
Bom dia.
Seguinte, estou desenvolvendo um programinha aqui, porém estou tendo dificuldades nessa parte:
eu quero no caso, alterar o status desses labels para true, porem existem cerca de 25 labels, entao resolvi criar uma procedure que desativasse eles...
procedure TFuncoes.ActiveLabels(LabelName: TLabel);
begin
TLabel(LabelName.Name).Enabled := True;
TLabel(LabelName.Name + ´Ponto´).Enabled := True;
TLabel(LabelName.Name + ´Duracao´).Enabled := True;
TLabel(LabelName.Name + ´Status´).Enabled := True;
TLabel(LabelName.Name + ´Status´).Caption := ´Pendente...´;
end;
então. a procedure que criei receberia o nome do primeiro label, e entao desativaria seus ´filhos´...
todos seguem esse padrao, nome + Sequencia...
nomePonto
nomeDuracao
nomeStatus
porém toda vez que tento rodar ela, da um acess violation...
alguém sabe o que está errado?
obs: Estou tentando usar o ComponentCount em uma unit onde só tem funções, e não está funcionando... já declarei no uses a Classes, porém mesmo assim não funciona. Alguém tem idéia do que pode ser?
agradeço
Mateus Jr.
Seguinte, estou desenvolvendo um programinha aqui, porém estou tendo dificuldades nessa parte:
eu quero no caso, alterar o status desses labels para true, porem existem cerca de 25 labels, entao resolvi criar uma procedure que desativasse eles...
procedure TFuncoes.ActiveLabels(LabelName: TLabel);
begin
TLabel(LabelName.Name).Enabled := True;
TLabel(LabelName.Name + ´Ponto´).Enabled := True;
TLabel(LabelName.Name + ´Duracao´).Enabled := True;
TLabel(LabelName.Name + ´Status´).Enabled := True;
TLabel(LabelName.Name + ´Status´).Caption := ´Pendente...´;
end;
então. a procedure que criei receberia o nome do primeiro label, e entao desativaria seus ´filhos´...
todos seguem esse padrao, nome + Sequencia...
nomePonto
nomeDuracao
nomeStatus
porém toda vez que tento rodar ela, da um acess violation...
alguém sabe o que está errado?
obs: Estou tentando usar o ComponentCount em uma unit onde só tem funções, e não está funcionando... já declarei no uses a Classes, porém mesmo assim não funciona. Alguém tem idéia do que pode ser?
agradeço
Mateus Jr.
Mateusjr
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)