[delphi-br] Como colocar vetor na posicao banco

Thu, 15 Feb 2007 07:03:51 -0800 

Pessoal tenho uma tabela com os campos c1,c2,c3,c4,c5,c6,c7,c8,c9,c10
Tenho um vetor b[1...5]
Digitos :2,3,8,5,7
Como informar para o banco que quero colocar assim
C1=null
C2=2
C3=3
C4=null
C5=5
C6=null
C7=7
C8=8
C9=null
C10=null


Usando a sintaxe

with QRY_AUX do
   begin
     try
       close;
       sql.clear;
       SQL.Add('Insert into tb_controle
(n_pla,st,c1,c2,c3,c4,c5,c6,c7,c8,c9,c10,n_l)');//codigo_colaborador,
       SQl.Add('Values (');
       sql.Add(quotedstr(Edit_Codigo_Pla.Text)+',' );
       sql.Add(quotedstr(Edit_st.Text)+',' );


/////AQUI VAI OS CAMPOS DE C1 ATÉ C10 COLOCANDO O NUMERO NO CAMPO CERTO
**********

       for i:=0 to 3 do begin
         sql.Add(inttostr(tabela[i])+',' );
       end;


       SQL.Add(QuotEdStr( Edit_Codigo_L.Text)+')');
      ExecSQL;
       Except
       on E:Exception do
        Begin
            MessageDlg(E.Message,mtError,[mbOk],0);
            Exit;
        End;
      End;
  end;
  end

   else
   begin
   exit;
    end;




desde ja agradeço





[As partes desta mensagem que não continham texto foram removidas]

Responder a