Carregar valores para SP via função...
Olá pessoal!
Gostaria de saber de vcs se alguém aqui ja implementou algum código em Delphi ou C++ que faça o seguinte: faça uma varredura no formulário, pegue o nome dos componentes e valores, depois compare os nomes com os parametros da Stored Procedure e preencha os valores dos Parametros com os valores contidos nos componentes.
Resumindo, criado uma função q preencha os parametros da Stored Procedure automaticamente, sem precisar digitar IBStoredProc1.Params.FindParam(´Nome´).AsString:=DbEdit1.text;
Se alguém puder me ajudar.
Gostaria de saber de vcs se alguém aqui ja implementou algum código em Delphi ou C++ que faça o seguinte: faça uma varredura no formulário, pegue o nome dos componentes e valores, depois compare os nomes com os parametros da Stored Procedure e preencha os valores dos Parametros com os valores contidos nos componentes.
Resumindo, criado uma função q preencha os parametros da Stored Procedure automaticamente, sem precisar digitar IBStoredProc1.Params.FindParam(´Nome´).AsString:=DbEdit1.text;
Se alguém puder me ajudar.
Andrew
Curtidas 0
Respostas
Afarias
20/09/2004
Algo como::
particularmente nunca fiz! mas olha... essa pergunta estaria melhor colocada no fórum Delphi ou C-Builder visto q depende de código dessas ferramentas e não do Interbase ou Firebird.
T+
for I := 0 to ComponentCount-1 do
if (Components[i].Tag = 1) then // indica q deve ser lido
begin
if (components[i] is TEdit) then
with (components[i] as TEdit) do
StoredProc1.ParamByName(Name).AsString := Text;
{ if ... outra classe ... }
end;
particularmente nunca fiz! mas olha... essa pergunta estaria melhor colocada no fórum Delphi ou C-Builder visto q depende de código dessas ferramentas e não do Interbase ou Firebird.
T+
GOSTEI 0
Martins
20/09/2004
Pronto! o A. Farias já te mandou a resposta, com esse exemplo, vc poderá trabalhar com os mais variados componentes Dataware ou não, agora depende da sua criatividade...
GOSTEI 0