quot;Vetorquot; de componentes...
Estou querendo fazer o seguinte caso:
Tenho uma variavel que, por exemplo, controla os dias da semana (com valores de 1 a 7)... e dependendo do dia da semana o codigo vai pegar o valor do componente TEXT (caixa de texto) correspondente... existe alguma maneira de fazer um ´vetor´ de componentes... como no codigo exemplo abaixo:
a variavel ´i´ representa os dias da semana...
for i := 1 to 7 do Tabela[´Campo = i´] := Text[i].text;
do que ter q fazer um por um...
Tabela[´Campo = 1´] := text1.text;
Tabela[´Campo = 2´] := text2.text;
... e assim por diante !!
Sei que no VB eu consigo fazer isso... e tmb é possivel no Delphi ??
Agradeço desde já...
[]´s
Renato
Tenho uma variavel que, por exemplo, controla os dias da semana (com valores de 1 a 7)... e dependendo do dia da semana o codigo vai pegar o valor do componente TEXT (caixa de texto) correspondente... existe alguma maneira de fazer um ´vetor´ de componentes... como no codigo exemplo abaixo:
a variavel ´i´ representa os dias da semana...
for i := 1 to 7 do Tabela[´Campo = i´] := Text[i].text;
do que ter q fazer um por um...
Tabela[´Campo = 1´] := text1.text;
Tabela[´Campo = 2´] := text2.text;
... e assim por diante !!
Sei que no VB eu consigo fazer isso... e tmb é possivel no Delphi ??
Agradeço desde já...
[]´s
Renato
Renato_mendes
Curtidas 0
Respostas
Edilcimar
23/01/2004
var diasemana : string;
i : word;
for i = 1 to 7 do
begin
inttostr(i);
diasemana := ´dia´ + i; // aqui o dia fica sendo dia1 .. dia7
end;
agora vc pode trabalhar o a variável diasemana como sendo o nome do campo da tabela
i : word;
for i = 1 to 7 do
begin
inttostr(i);
diasemana := ´dia´ + i; // aqui o dia fica sendo dia1 .. dia7
end;
agora vc pode trabalhar o a variável diasemana como sendo o nome do campo da tabela
GOSTEI 0
Renato_mendes
23/01/2004
Edilcimar,
O problema é q tenho uma relação de horarios que são mostrados / preenchidos em ´Edit´s´ (caixa de texto)... e o valor que irá pra tabela (BD) é o valor dessas caixas de texto !! Como fiz um exemplo:
for i := 1 to 7 do Tabela[´Campo = i´] := Text[i].text;
O problema é q tenho uma relação de horarios que são mostrados / preenchidos em ´Edit´s´ (caixa de texto)... e o valor que irá pra tabela (BD) é o valor dessas caixas de texto !! Como fiz um exemplo:
for i := 1 to 7 do Tabela[´Campo = i´] := Text[i].text;
GOSTEI 0