Uso o Interbase e o delphi 6.
Tenho o seguinte código abaixo para inserir os itens de uma venda:

{ITENS DA VENDA}
  a:=0;
  while a<= itens.Lines.Count do
  begin
      DMConsulta.QConsulta_id_itens.Open;
      result_itens:=DMConsulta.QConsulta_id_itens.Fields[0].AsString;
      DMConsulta.QConsulta_id_itens.Close;

      if(result_itens = '') then
      begin
         result_itens:='0';
       end
      else
       begin
         result_itens:=result_itens;
       end;
     
      DMCliente.QItens.Append;
      DMCliente.QItens.Open;
      DMCliente.QItensID.Value:=strtoint(trim(result_itens)) + 1;
      DMCliente.QItensREF_ID_VENDA.Value:= strtoint(id.text);
      DMCliente.QItensDESCRICAO.Value:= itens.Lines.Strings[a];
      DMCliente.QItensVALOR.Value:= strToFloat(itens2.Lines.Strings
[a]);
      DMCliente.QItens.Post;

   a:=a+1;
   end;

sendo que o itens e itens2 são do tipo MEMO.
Quando executo e ele chega exatamente na linha DMCliente.QItens.Post, 
ele dá o erro Dynamic SQL error Token Unknown.

Não sei mais o que fazer pois os campos estão criados certos na 
tabela.
Se alguém puder me ajudar eu fico super grata.






-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 



Responder a