Num determinado momento da minha aplicação eu preciso fazer uma verificação sobre o estado da tabela:
procedure TFrmEstoqueEntrada.SpeedButton1Click(Sender: TObject);
begin
DM.TbProdutos.Cancel;
FrmConsProdutos.showmodal;
if DM.TBProdutos.State = dsBrowse then // Linha 44
DM.TbProdutos.Edit;
end;
procedure TFrmEstoqueEntrada.BtnOKClick(Sender: TObject);
begin
if (DM.TbProdutos.State = dsEdit) and (edit1.text <> '') then // Linha 50
begin
DM.TbProdutosQuant.Value := DM.TbProdutosQuant.Value +
strtoint(edit1.Text);
DM.TbProdutos.Post;
edit1.clear;
end;
end;
Quando eu dou F9 ele pára e exibe as mensagens pra declarar as variáveis "dsBrowse" e "dsEdit":
[Error] EntradaEstoque.pas(50): Operator not applicable to this operand type
[Fatal Error] Estoque.dpr(18): Could not compile used unit 'EntradaEstoque.pas'
Que doideira é essa de ele mandar declarar o estado da tabela, quer dizer, certamente eu errei em algum ponto... analisando essa parte do código alguém sabe me dizer uma solução.
Pergunta
Arlon
Vê se alguém me ajuda nesse erro aki:
Num determinado momento da minha aplicação eu preciso fazer uma verificação sobre o estado da tabela:
Quando eu dou F9 ele pára e exibe as mensagens pra declarar as variáveis "dsBrowse" e "dsEdit":
[Error] EntradaEstoque.pas(44): Undeclared identifier: 'dsBrowse'
[Error] EntradaEstoque.pas(50): Undeclared identifier: 'dsEdit'
[Error] EntradaEstoque.pas(50): Operator not applicable to this operand type
[Fatal Error] Estoque.dpr(18): Could not compile used unit 'EntradaEstoque.pas'
Que doideira é essa de ele mandar declarar o estado da tabela, quer dizer, certamente eu errei em algum ponto... analisando essa parte do código alguém sabe me dizer uma solução.
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados