progress bae em consulta SQL
e ai pessoal , blz? alguem aki sabe como eu coloco uma progress bar pra mostrar o avaço de uma consulta em sql????
pro SQL to usando o sequinte codigo:
//***************************************************
procedure TFormLocaliza.BitBtn1Click(Sender: TObject);
begin
Query1.Close;
Query1.SQL.Text:=
´Select * From Dados Where Upper(Nome) Like ´´¬´+AnsiUpperCase(Edit1.Text)+´¬´´ ´;
Query1.Open;
if Query1.RecordCount=0 then
Begin
ShowMessage(´Nenhum registro encontrado!´);
end;
end;
//**************************************************
valew!!!!
pro SQL to usando o sequinte codigo:
//***************************************************
procedure TFormLocaliza.BitBtn1Click(Sender: TObject);
begin
Query1.Close;
Query1.SQL.Text:=
´Select * From Dados Where Upper(Nome) Like ´´¬´+AnsiUpperCase(Edit1.Text)+´¬´´ ´;
Query1.Open;
if Query1.RecordCount=0 then
Begin
ShowMessage(´Nenhum registro encontrado!´);
end;
end;
//**************************************************
valew!!!!
Pedrohventura
Curtidas 0
Respostas
Uildenei
10/07/2004
Amigo,
me corrijam se eu estiver errado, mas o componente da paleta DBExpress SQLMonitor nao tem como fazer algo parecido?
me corrijam se eu estiver errado, mas o componente da paleta DBExpress SQLMonitor nao tem como fazer algo parecido?
GOSTEI 0
Beppe
10/07/2004
ACHO que não será possível. Remover o WHERE e usar filtro no dataset resolve, mas não será tão eficiente.
GOSTEI 0
Pedrohventura
10/07/2004
putz...sera entao q nao vai ter jeito de fazer isso???? :-(
GOSTEI 0
Pistesil
10/07/2004
Ninguém tem alguma idéia? Eu queria fazer algo parecido com isso.
Grato pela atenção.
Grato pela atenção.
GOSTEI 0