Fórum O q eu to fazendo de errado? #212408

08/02/2004

0

Oi galera, to tentando fazer um programinha para uma biblioteca mas estacionei no seguinte erro:
eu crio o Alias dinamicamente, mas quando clico no botão pra pesquisar usuário ele diz que a tabela não está aberta.
O código é o seguinte:
{Código do botão de consulta}
frmConsulta.dbgdConsulta.DataSource:= frmCadUsuario.dsUsuario;
frmConsulta.ShowModal;


{Código do botão pesquisa}
if dbgdConsulta.DataSource = frmCadUsuario.dsUsuario then
begin
case rgConsulta.ItemIndex of
{Consulta por Código do Usuario}
0: if frmCadUsuario.tabelausuarios.Locate(´Codigo´,edConsulta.Text,[]) then
begin
frmEmprestimo.dbeCodigoUsuario.Text:=
frmCadUsuario.tabelausuarios.FieldValues[´Codigo´];
end;
{Consulta pelo nome}
1: if frmCadUsuario.tabelausuarios.Locate(´Nome´,edConsulta.Text,[])then
begin
frmEmprestimo.dbeCodigoUsuario.text:=
frmCadUsuario.tabelausuarios.FieldValues[´Codigo´];
end; { fim do case dos usuarios!}

Espero ter sido clara, to meio confusa!
Por favor alguma sugestão? To perdida!
Um grande abraço pra todos!


Senhorita_allegro

Senhorita_allegro

Responder

Posts

08/02/2004

Ari

Tenta antes da rotina de clicar no botão colocar

NomedaTabela.Active := True;


Responder

Gostei + 0

09/02/2004

Tnaires

Ou ainda:
NomeDaTabela.Open;


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar