Como animar a Ampuleta nas consultas
25/08/2004
0
Estou usando Delphi 7 + DbExpress + FB 1.5
Quando faço pesquisa via SQL, como faço para mudar o apontador do Mouse para ampuleta e animá-la.
Emery
Quando faço pesquisa via SQL, como faço para mudar o apontador do Mouse para ampuleta e animá-la.
Emery
Emery
Curtir tópico
+ 0
Responder
Posts
26/08/2004
Oscar Candido
Quando vc chamar sua pesquisa tente usar o código :
Espero ter ajudado
Um abraço
Form1.Cursor := crHourGlass;
Espero ter ajudado
Um abraço
Responder
26/08/2004
Mkoch
Cuide apenas, se ocorrer algum erro para o cursor voltar ao Normal.
try
Screen.Cursor := crSQLWait;
//Sua consulta aqui.
finally
//Garantimos que o cursor volte ao normal após a operação.
Screen.Cursor := crDefault;
end;
try
Screen.Cursor := crSQLWait;
//Sua consulta aqui.
finally
//Garantimos que o cursor volte ao normal após a operação.
Screen.Cursor := crDefault;
end;
Responder
Clique aqui para fazer login e interagir na Comunidade :)