Fórum Gravar dados numa tabela a partir de um listbox #368594

19/02/2009

0

Olá,

Como faço para capturar os nomes que estão em um listbox para inclui-los num campo chamado user de uma tabela usando o codigo abaixo. Por exemplo, tenbo um listbox assim:

JOSE
JULIO
MARCOS
MURILO
PAULO
SERGIO
...

preciso saber como criar um loop no codigo abaixo que vá pegando cada nome que está no listbox e gravando no campo user da tabela. Se alguem puder ajudar.

with .QryINSCONT do
begin
......
ParamByName(´user´).asstring := //aqui pegaria o nome que está no listbox ;

ExecSql;
End;

Grato

Luiz Carlos


L_carlos

L_carlos

Responder

Posts

19/02/2009

Dedi

Var i:integer;
begin
 for i:= 1 to listbox1.count do begin
 //...
 ParamByName(´user´).asstring :=ListBox1.Items.Strings[i-1];
 //...
 end;
end;



Responder

Gostei + 0

20/02/2009

L_carlos

Vlw Dedi. Problema resolvido.

Luiz


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar