Estou construindo meu primeiro Projeto sozinho e estou tendo várias dificuldades, e como sempres vocês estão me ajudando muito, então estou aki mais uma vez. Tenho um form, no qual chamo um outro com um DBGrid atravez de um botão. Criei uma rotina da seguinte forma:
procedure TfrmPesqPreco.bbtnPesqPrecoClick(Sender: TObject);
var
vNomeProd: String;
begin
vNomeProd:= InputBox('Pesquisa do Produto!','Digite Um Nome à ser Pesquisado','');
If (vNomeProd='') then
Begin
ShowMessage('Digite um Nome à Ser Procurado');
Exit;
End;
dm.tbPreco.IndexFieldNames:= 'Nome';
dm.tbPreco.FindNearest([vNomeProd]);
frmGradeListaPreco.Show;
end;
end.
Mas qd compilo da o seguinte erro(está na imagem seguinte)
Pergunta
Fernando Souza
Boa Noite!
Estou construindo meu primeiro Projeto sozinho e estou tendo várias dificuldades, e como sempres vocês estão me ajudando muito, então estou aki mais uma vez. Tenho um form, no qual chamo um outro com um DBGrid atravez de um botão. Criei uma rotina da seguinte forma:
Mas qd compilo da o seguinte erro(está na imagem seguinte)
http://www.imageuploading.com/ims/pic.php?...7W&i=111356
E olha já refiz as duas chaves (primária e secundária), mas não funcionou!
Fenando Souza
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.