Abrir várias mensagens ao mesmo tempo

Delphi

12/05/2005

Amigos...

Gostaria de abrir ao mesmo tempo varias mensagens em um programa.
Por exemplo, fazer um loop até 5 e abrir 5 ´Showmessages´ na tela, para o usuário olha as 5 msgs e dar ok nelas. :wink:

Desde já, obrigado.


Replicante

Replicante

Curtidas 0

Respostas

Edilcimar

Edilcimar

12/05/2005

for i = 1 to 5 do
showmessage(´esta é a mensagem: ´ + inttostr(i));


GOSTEI 0
Replicante

Replicante

12/05/2005

O loop não pode parar na para o usuário dar ´ok´ na msg, ele tem que abrir todas as msgs de uma vez.


GOSTEI 0
Rjun

Rjun

12/05/2005

Acho que você teria que criar uma função que criasse forms dinamicamente e exibisse as mensagens.


GOSTEI 0
Beppe

Beppe

12/05/2005

ShowMessage é modal(usa ShowModal).

Vc tem duas opções:
- Usar a função da VCL(unit Dialogs) chamada CreateMessageDialog. Esta função apenas criar o form da msg e vc pode exibí-lo com .Show, lembrar de dar Free depois.
- Usar a API do Windows MessageBox(), e.g. MessageBox(0, ´Texto´, ´Título´, 0)


GOSTEI 0
POSTAR