Fórum Mandar mensagem #144258

Não sei se é a melhor forma, mas acho que funciona.

Crie um form que funcione como uma messagebox, com text, botão, etc.

Então crie uma função Mesagem para ficar mais organizado, dentro das declarações públicas.

procedure Form1.Mensagem (Msg : String);
begin
EditMensagem.Text := Msg;
Show;
end;

Para que a janela não fique escondida, tem uma propriedade que você pode alterar. Eu não me lembro o nome dela, mas é facinho de achar. O valor default dela é [algumacoisa]Normal. [algumacoisa] acho que são duas letrinhas, mas eu também não me lembro quais são. Mude essa propeidade para [algumacoisa]StayOnTop.

Espero não ter confundido mais do que ajudado.

ESSA PÇÃO QUE VC D V MUDAR FI K NA OBJECT INSPECTOR, O NOME DELA É [FormStyle]

O VALOR DV C = fsStayOnTop :wink: