Delphi e Interbase

Question

Ol� Pessoal,� a primeira vez  que utilizo o forum, estou iniciando no delphi, e como todo iniciante estou cheio de d�vidas, por exemplo esta:tenho uma tabela no interbase com dois campos (cod e nome),...

Biffi · Answer

Quais componentes voce esta utilizando para acesar o banco de dados (preencher o edit1)?...

Oadventista · Answer

Estou utilizando o IBDataBase, o IBTransaction e o IBStoredProcedure...

Biffi · Answer

Eu normalmente utilizo os componentes dbexpress, mas acredito que tbem funcione.

IBTable1.Insert;
IBTable1.FieldByName(�CODIGO�).AsInteger := StrToInt(EDIT1.TEXT);
IBTable1.FieldByName(�NOME�).AsString := EDIT2.TEXT;
IBTable1.Post;
IBTable1.ApplyUpdates;

espero ter ajudado
caso naum funcione retorne que terei prazer em ajuda-lo(estou um pouco ocupado - naum tive tempo de testar)

Oadventista · Answer

Olha deu o seguinte pau, quando eu clico para cadastrar ele me retorna um erro, dizendo que ocorreu um erro no ibtable1 e que o mesmo � fechado, dai o depurador marca a seguinte linha:

procedure TFormExemplo.ButtonCadastrarClick(Sender: TObject);
begin
if (EditNome.Text = ��) then
begin
FormErro.showmodal;
EditNome.SetFocus;
end;
{Executa o insert na tabela}
IBTable1.Insert;
>>> IBTable1.FieldByName(�CAMPO1�).AsInteger := StrToInt(EditCod.Text);
IBTable1.FieldByName(�CAMPO2�).AsString := EditNome.Text;
IBTable1.Post;
IBTable1.ApplyUpdates;
end;

Biffi · Answer

antes do evento deste bot�o, voc� abriu o ibtable1? Se naum provavelmente � este o erro, experimente adicionar antes do �IBTable1INSERT� a linha �IBTable1.Open�. Se voce ja abriu a tabela antes, fica mais facil se voce me enviar um trecho do codigo para eu dar uma olhada.

t+

Oadventista · Answer

Cara, Valeu a ajuda, deu certo com .openValeu mesmo.AtenciosamentePaulo...

F�rum Delphi e Interbase #202723