Re: Prendendo_o_fluxo_do_cï¿½digo

Simone Freire Fri, 26 Feb 1999 07:00:43 -0500
Cleto,
eu conheco muito bem o comando Application.ProcessMessages, pois
programei em 
Delphi por tres anos.

Sempre usei o comando no final de um loop que executava
um processamento longo, para atualizar um TGauge que
indicava o progresso do processamento.

Em Java, eh um pouco diferente. Uma vez que voce dispara um evento
dentro de um manipular de eventos, se
dentro da rotina do metodo manipulador voce inserir um
loop while onde no final voce insira um componente como
um gauge que indique progresso, nao vai funcionar. O problema tem a
ver com Threads. Se nao me engano, os despachos de eventos ocorrem na
mesma thread onde ocorre a pintura de tela, me parece que o nome eh
AWTThread. Como o gauge tem que ser repintado na mesma Thread onde o
evento gerado esta sendo tratado, o metodo paint() do gauge fica
bloqueado. A solucao eh
voce criar uma nova thread para processar o seu codigo,
e a partir desta thread, invocar a atualizacao do gauge, que ocorrera
em uma outra thread, independente.
Ai funciona, com certeza, pois ja fiz isso.
Se voce usa os componentes SWING, me parece que tem uma classe chamada
Timer que auxilia na atualizacao da interface grafica em
processamentos longos.
Da uma pesquisada.
Um abraco.
ANDRE.






---Cleto Henrique Andrade Silva <[EMAIL PROTECTED]> wrote:
>
> Oi pessoal,
> 
> gostaria de saber se existe em java algo equivalente ao mï¿½todo
ProcessMessages da classe TApplication do Delphi. Isto ï¿½, alguma forma
de a minha aplicaï¿½ï¿½o continuar trabalhando enquanto estou esperando
que algo aconteï¿½a.
> 
> Tenho uma classe em Delphi que ï¿½ assim (uma descriï¿½ï¿½o superficial da
classe):
> 
> 
> // TEditor ï¿½ um componente grï¿½fico como por exemplo um frame
> 
> TEditor = class(TGraphicControl)                
> private
>     Clicou: boolean;
>     xclique, yclique: double;
>     procedure ClicouMouse(x, y: double);
> public
>     function DigitalizarPonto: TPonto;
> end;        
> 
> // Descriï¿½ï¿½o dos mï¿½todos
> 
> // Este mï¿½todo ï¿½ chamado sempre que ocorrer o evento do clique do
mouse
> // Entï¿½o, quando o mouse ï¿½ clicado eu recebo a coordenada onde foi o
clique
> procedure ClicouMouse(x, y: double);
> begin
>     xclique := x;
>     yclique := y;                                                   
      // armazena a coordenada onde foi clicado o mouse
>     Clicou := true;
> end;
> 
> function DigitalizarPonto: TPonto;
> var PontoClique: TPonto;
> begin
>     Clicou := false;
>     while (not Clicou) do
>         Application.ProcessMessages;                            //
aguarda atï¿½ que seja clicado o mouse
>     PontoClique := TPonto.Create(xclique, yclique);
>     Result := PontoClique;                                          
 // retorna o ponto do clique
> end;
> 
> 
> Obs: O mï¿½todo ProcessMessages permite que a Fila de tarefas do
windows continue a ser processada enquanto eu estou preso no loop,
assim a aplicaï¿½ï¿½o continua a fazer outras coisas inclusive o clique do
mouse.
> 
>     
> Eu poderia fazer este retorno do ponto clicado como um evento, mas
isto nï¿½o ï¿½ interessante. O que desejo ï¿½ prender o fluxo de uma
sequï¿½ncia de cï¿½digo atï¿½ que algo ocorra sem travar a aplicaï¿½ï¿½o.
> 
>     Alguï¿½m sabe como fazer algo equivalente a isto em java? Aguardo
ancioso!
> 
> 
> Obrigado!
> 
> 
> 
<HR>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD>

<META content=text/html;charset=iso-8859-1 http-equiv=Content-Type>
<META content='"MSHTML 4.71.1712.3"' name=GENERATOR>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT color=#000000 face=Arial size=2>Oi pessoal,</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT face=Arial size=2>gostaria de saber se existe em java algo 
equivalente ao mï¿½todo ProcessMessages da classe TApplication do Delphi. 
Isto ï¿½, alguma forma de a minha aplicaï¿½ï¿½o continuar 
trabalhando enquanto estou esperando que algo aconteï¿½a.</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT face=Arial size=2>Tenho uma classe em Delphi que ï¿½ assim
(uma 
descriï¿½ï¿½o superficial da classe):</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>ï¿½</DIV>
<DIV>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>
<DIV><FONT color=#000000 face=Arial size=2>// TEditor ï¿½ um componente 
grï¿½fico como por exemplo um frame</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>TEditor = 
<STRONG>class</STRONG>(TGraphicControl)ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ 
</FONT></DIV>
<DIV><FONT face=Arial size=2><STRONG>private</STRONG></FONT></DIV>
<DIV><FONT face=Arial size=2></FONT><FONT color=#000000 face=Arial 
size=2>ï¿½ï¿½ï¿½ <FONT color=#000000>Clicou: 
boolean;</FONT></FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2><FONT 
color=#000000></FONT>ï¿½ï¿½ï¿½ xclique, yclique: 
double;</FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>ï¿½ï¿½ï¿½ 
<STRONG>procedure</STRONG> ClicouMouse(x, y: double);</FONT></DIV>
<DIV><FONT face=Arial size=2><STRONG>public</STRONG></FONT></DIV>
<DIV><FONT face=Arial size=2></FONT><FONT color=#000000 face=Arial 
size=2>ï¿½ï¿½ï¿½ <STRONG>function</STRONG> DigitalizarPonto: 
TPonto;</FONT></DIV>
<DIV><FONT color=#000000 face=Arial 
size=2><STRONG>end</STRONG>;ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ 
</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>// Descriï¿½ï¿½o dos 
mï¿½todos</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>// Este mï¿½todo ï¿½ 
chamado sempre que ocorrer o evento do clique do mouse</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT><FONT face=Arial
size=2>// 
Entï¿½o, quando o mouse ï¿½ clicado eu recebo a coordenada onde foi o 
clique</FONT></DIV>
<DIV><FONT face=Arial size=2><STRONG>procedure</STRONG> ClicouMouse(x,
y: 
double);</FONT></DIV>
<DIV><FONT face=Arial size=2><STRONG>begin</STRONG></FONT></DIV>
<DIV><FONT face=Arial size=2></FONT><FONT color=#000000 face=Arial 
size=2>ï¿½ï¿½ï¿½ <FONT color=#000000>xclique := x;</FONT></FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2><FONT 
color=#000000></FONT>ï¿½ï¿½ï¿½ yclique := 
y;ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ 
// armazena a coordenada onde foi clicado o mouse</FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>ï¿½ï¿½ï¿½ Clicou := 
true;</FONT>ï¿½</DIV>
<DIV><FONT face=Arial size=2><STRONG>end</STRONG>;</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2><STRONG>function</STRONG> 
DigitalizarPonto: TPonto;</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT><FONT face=Arial
size=2>var 
PontoClique: TPonto;</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT><FONT face=Arial 
size=2><STRONG>begin</STRONG></FONT></DIV>
<DIV><FONT face=Arial size=2></FONT><FONT color=#000000 face=Arial 
size=2>ï¿½ï¿½ï¿½ Clicou := false;</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2>ï¿½ï¿½ï¿½ <FONT 
color=#000000>while (not Clicou) do</FONT></FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2><FONT 
color=#000000></FONT>ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ 
Application.ProcessMessages;ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ 
// aguarda atï¿½ que seja clicado o mouse</FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>ï¿½ï¿½ï¿½ PontoClique := 
TPonto.Create(xclique, yclique);</FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>ï¿½ï¿½ï¿½ Result := 
PontoClique;ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ï¿½ 
// retorna o ponto do clique</FONT>ï¿½</DIV>
<DIV><FONT face=Arial size=2><STRONG>end</STRONG>;</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>Obs: O mï¿½todo
ProcessMessages 
permite que a Fila de tarefas do windows continue a ser processada
enquanto eu 
estou preso no loop, assim a aplicaï¿½ï¿½o continua a fazer outras 
coisas inclusive o clique do mouse.</FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>ï¿½ï¿½ï¿½ </FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2>Eu poderia fazer este
retorno do 
ponto clicado como um evento, mas isto nï¿½o ï¿½ interessante. O que 
desejo ï¿½ prender o fluxo de uma sequï¿½ncia de cï¿½digo 
atï¿½ que algo ocorra sem travar a 
aplicaï¿½ï¿½o.</FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>ï¿½ï¿½ï¿½ Alguï¿½m sabe 
como fazer algo equivalente a isto em java? Aguardo
ancioso!</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2>Obrigado!</FONT></DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV>
<DIV><FONT color=#000000 face=Arial size=2></FONT>ï¿½</DIV></BODY></HTML>


_________________________________________________________
DO YOU YAHOO!?
Get your free @yahoo.com address at http://mail.yahoo.com

* Para nao receber mais e-mails da lista, acesse 
<http://www.sun.com.br:8080/guest/RemoteAvailableLists>, coloque seu e-mail, escolha a 
lista <[EMAIL PROTECTED]> e de um <submit>.
Re: Prendendo_o_fluxo_do_cï¿½digo

Responder a
