Fórum sql query dbgrid = ? #209172
24/01/2004
0
Iniciei um projeto com a finalidade de ler uma instrucao sql de um arquivo texto e execurar e apresentar os resultados em um grid. Toda vez que muda a instrucao no arquivo, repete o processo.
Inclui no form1 um query1, um datasource e em dataset=query1, um grid1 e em datasource=datasource1, um timer1 que executa o codigo abaixo:
begin
If FileExists(´consulta.sql´) then
begin
Timer1.Enabled:=False;
try
memo1.Lines.LoadFromFile(´consulta.sql´);
query1.Active:=False;
query1.SQL.Clear;
query1.SQL.Add(Memo1.Lines.Text);
query1.Prepare;
query1.Open; // ExecSQL ;
query1.Active:=True;
ShowMessage(´Fim´);
// DeleteFile(´consulta.sql´);
finally
end;
end;
end;
Porem nao aparece nada no grid. Oque esta errado ???
[]´s
Everson
Inclui no form1 um query1, um datasource e em dataset=query1, um grid1 e em datasource=datasource1, um timer1 que executa o codigo abaixo:
begin
If FileExists(´consulta.sql´) then
begin
Timer1.Enabled:=False;
try
memo1.Lines.LoadFromFile(´consulta.sql´);
query1.Active:=False;
query1.SQL.Clear;
query1.SQL.Add(Memo1.Lines.Text);
query1.Prepare;
query1.Open; // ExecSQL ;
query1.Active:=True;
ShowMessage(´Fim´);
// DeleteFile(´consulta.sql´);
finally
end;
end;
end;
Porem nao aparece nada no grid. Oque esta errado ???
[]´s
Everson
Evecar
Curtir tópico
+ 0
Responder
Posts
24/01/2004
Vinicius2k
Everson, acredito que e o erro esteja aqui...
Suponho que vc já tenha isolado o processo até o ponto em que o memo é preenchido, então tente substituir por :
ou carregue as linhas da query direto do seu arquivo ´consulta.sql´...
espero ter ajudado...
query1.SQL.Add(Memo1.Lines.Text);
Suponho que vc já tenha isolado o processo até o ponto em que o memo é preenchido, então tente substituir por :
query1.sql.lines:= Memo1.Lines
ou carregue as linhas da query direto do seu arquivo ´consulta.sql´...
espero ter ajudado...
Responder
Gostei + 0
26/01/2004
Evecar
O motivo para nao atualizar o Grid era a propriedade enabled do datasource que estava false e eu nao tinha visto.
Mesmo assim obrigado a todos que tentaram ajudar
[]´s
Mesmo assim obrigado a todos que tentaram ajudar
[]´s
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)