Fórum Problema com DataModule (ClientdataSet) #346394
21/09/2007
0
Pessoal,
Estou tendo um problema com as instruções abaixo:
Quando faço a pesquisa deste modo, recebo a mensagem que o banco está vazio.
Já quando mudo esta linha:
Para esta:
Recebo os dados sem problemas...
Estranho, pois não quer dizer que se [b:743950e1ab]NÃO[/b:743950e1ab] estiver vazio faça...
Se alguem puder ajudar :D
Obrigado
P.S. O FireBird 1.5 está configurado e com dados.[/code]
Estou tendo um problema com as instruções abaixo:
if not DMServer.cdsID.IsEmpty then
begin
DMServer.cdsID.Close;
DMServer.cdsID.Params.ParamByName(´ID´).AsString := parametro;
DMServer.cdsID.Open;
AThread.Connection.WriteLn(´Sua Senha é: ´+DMServer.cdsIDSENHA.Text);
memMonitor.Lines.Add(´Comando ID Recebido´);
end else
begin
AThread.Connection.WriteLn(´Banco vazio - Var: ´+parametro);
memMonitor.Lines.Add(´Banco vazio - Var: ´+parametro);
end;
Quando faço a pesquisa deste modo, recebo a mensagem que o banco está vazio.
Já quando mudo esta linha:
if not DMServer.cdsID.IsEmpty then
Para esta:
if DMServer.cdsID.IsEmpty then
Recebo os dados sem problemas...
Estranho, pois
if NOT DMServer.cdsID.IsEmpty then
Se alguem puder ajudar :D
Obrigado
P.S. O FireBird 1.5 está configurado e com dados.[/code]
Rodfernandes
Curtir tópico
+ 0
Responder
Posts
22/09/2007
Steve_narancic
provavelmente seu DMServer.cdsID está fechado então ele está vazio, tenta abrir DMServer.cdsID antes de testar, assim:
DMServer.cdsID.Close;
DMServer.cdsID.Params.ParamByName(´ID´).AsString := parametro;
DMServer.cdsID.Open;
if not DMServer.cdsID.IsEmpty then
begin
AThread.Connection.WriteLn(´Sua Senha é: ´+DMServer.cdsIDSENHA.Text);
memMonitor.Lines.Add(´Comando ID Recebido´);
end else
begin
AThread.Connection.WriteLn(´Banco vazio - Var: ´+parametro);
memMonitor.Lines.Add(´Banco vazio - Var: ´+parametro);
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)