[b]Configurar botões no MessageBox[/b]

Delphi

10/02/2003

Dentro de um MessageBox, com os botões Sim e Não, o foco fica no primeiro botão (Sim).
Gostaria de saber se há como modificar para que o foco inicialmente fique no botão Não.

Alexandre Severo Vieira
xande7@hotmail.com


Alexandre Vieira

Alexandre Vieira

Curtidas 0

Respostas

Carnette

Carnette

10/02/2003

If Application.MessageBox(´Deseja Continuar??´,´Confirmação´,MB_ICONQUESTION+ MB_YESNO+MB_DEFBUTTON2)=idyes then


GOSTEI 0
Anonymous

Anonymous

10/02/2003

Caro amigo, a utilização correta do message box é assim:

if messagebox(handle,´Tem cereze que deseja continuar ?´,´Confirmação´,MB_YESNO or MB_ICONQUESTION or MB_DEFBUTTON2) = ID_YES then
begin
..
..
..
end

Se vc retirar o MB_DEFBUTTON2 o botão fica como foco no sim.

Segue abaixo a lista de ícones que vc pode colocar na aplicação.

MB_ICONQUESTION = Ícone de Interrogação
MB_ICONWARNING = Ícone de Exclamação
MB_ICONERROR = Ícone de Erro ( x )
MB_ICONINFORMATION = Ícone de Informação

Caso você queira utilizar alguma variável dentro do messagebox deve-se fazer o seguinte:

if messagebox(handle,PChar(´Tem cereze que deseja excluir o usuário´ + edit1.text + ´do sistema ?´),´Confirmação´,MB_YESNO or MB_ICONQUESTION or MB_DEFBUTTON2) = ID_YES then
begin
..
..
..
end

Também, dependendo de onde vc colocar o messagebox ( não me lembro direito ) vc precisa usar application.messagebox -> mas isso nem sempre.


GOSTEI 0
POSTAR