Atualizar um componente em tempo de execução
19/02/2003
0
Quero passar uma string e atualizar um componete
Ex:
minha string vai mudar dentro de um for;
vv := ´varialvel´;
for x := 1 to 10 do
begin
string := vv + intTostr(x);
atualizacomponete(string,Valor);
end;
procedure atualizacomponete(s:tppvarialvel,val:double);
begin
s.value := val;
end;
Como transforma esta string em um componete ppvariavel ??????
Ex:
minha string vai mudar dentro de um for;
vv := ´varialvel´;
for x := 1 to 10 do
begin
string := vv + intTostr(x);
atualizacomponete(string,Valor);
end;
procedure atualizacomponete(s:tppvarialvel,val:double);
begin
s.value := val;
end;
Como transforma esta string em um componete ppvariavel ??????
Anonymous
Curtir tópico
+ 0
Responder
Posts
19/02/2003
Qmd
vc tem que usar FindComponent()...
Tipow:
For x := 1 to 10 do
TppVariavel( FindComponent( ´variavel´ + IntToStr(x) ).Value := Valor;
QmD
Tipow:
For x := 1 to 10 do
TppVariavel( FindComponent( ´variavel´ + IntToStr(x) ).Value := Valor;
QmD
Responder
19/02/2003
Qmd
[size=9]desculpe mas faltou um ´)´[/size]
For x := 1 to 10 do
TppVariavel( FindComponent( ´variavel´ + IntToStr(x) ) ).Value := Valor;
sorry :|
For x := 1 to 10 do
TppVariavel( FindComponent( ´variavel´ + IntToStr(x) ) ).Value := Valor;
sorry :|
Responder
Clique aqui para fazer login e interagir na Comunidade :)