[delphi-br] ClientDataSet ou Insert direto no banco, qual melhor?

Wed, 18 Jan 2006 02:55:24 -0800 

qual dos 2
estou com problema no ClientDataSet com um autoincremento, ele fala que o campo 
CODIGO tem que ter um valor, mas a Variavel Chave_primaria retorna o valor

   SQLQuery1.SQL.Clear;
   SQLQuery1.SQL.Add('SELECT CAST(GEN_ID(GEN_EMPRESAS_ID,1) AS INTEGER) AS COD 
FROM RDB$DATABASE');
   SQLQuery1.Open;
   if SQLQuery1.Fields[0].IsNull then
      Chave_Primaria := 1
    else
      Chave_Primaria := SQLQuery1.Fields[0].AsInteger+1;


   ShowMessage(IntToStr(Chave_Primaria));
   ClientDataSet1.Append;
   ClientDataSet1.FieldByName('codigo').AsInteger := Chave_Primaria;
   ClientDataSet1.FieldByName('nome_fantasia').AsString := DBEdit1.Text;
   ClientDataSet1.FieldByName('razao_social').AsString := DBEdit2.Text;
   ClientDataSet1.Post;
   ClientDataSet1.applyupdates(0);

[]s
Fernando

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






-- 
<<<<< 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