Não é pq no Application.MessageBox() os botões já aparecem traduzidos, e sim 
aparecem no idioma do Windows.
Sds.

________________________________
To: delphi-br@yahoogrupos.com.br
From: [EMAIL PROTECTED]
Date: Thu, 7 Aug 2008 12:44:48 -0700
Subject: Res: [delphi-br] Como traduzir o Caption dos botões no MessageDlg


Não seria mais simples passar a usar o Application.MessageBox()?

Já vem traduzido e tem muitas opções como Caption, Botões, Resultado ....

Luciano Calenzani Simões

----- Mensagem original ----
De: Adriano Santos (Yahoo) <[EMAIL PROTECTED]>
Para: delphi-br@yahoogrupos.com.br
Enviadas: Quinta-feira, 7 de Agosto de 2008 16:14:56
Assunto: Re: [delphi-br] Como traduzir o Caption dos botões no MessageDlg

Validando e re-validando o que o Rubem disse,

O que faço na minha função é dar um CreateMessageDialog associando seu
retorno a uma variável do tipo TForm. Se for estudar a função MessageDlg
original, verá que ela chama MessagedlgPosHelp e que por sua vez chama
CreateMessageDlg, ou seja, dá pra pintar em bordar. Inclusive, minha
função permite receber uma Procedure como parâmetro e executá-la.

//função
function MessageDlgCheck( ......Funcao: TProcedure): Word;

//exemplo de uso.
if Check.Checked then
Funcao;

--
Boa Leitura,

Adriano Santos
Development Manager SoftPark
Editor Técnico Revistas ClubeDelphi e WebMobile
www.delphitodelphi. blogspot. com
www.adrianosantos. pro.br
www.devmedia. com.br

Rubem Nascimento da Rocha respondeu:
>
>
> Informe-se sobre a função CreateMessageDialog (). Ela é usada
> internamente pela função MessageDlg() . Fuçe o código da função
> MessageDlg() e vai descobrir isso, além de tb descobrir (assim
> espero!) que vc poderá usar CreateMessageDialog () para fazer seu
> próprio "MessageDlg( )" já com os botões traduzidos. A função
> CreateMessageDialog () está definida na mesma unit da função
> MessageDlg() , a unit Dialogs.
>
> Boa sorte.
> Sds.
>
> ____________ _________ _________ _
> To: [EMAIL PROTECTED] os.com.br 
> From: eduardo.drd@ gmail.com 
> Date: Thu, 7 Aug 2008 15:00:55 -0300
> Subject: Re: [delphi-br] Como traduzir o Caption dos botões no MessageDlg
>
> isso deve ser modificado na unit que ficam as constantes.. procure no
> google
> por "Delphi mensagens traduzidas".
>
> 2008/8/7 Alison Zen >
>
>> Boa tarde galera, seguinte, estamos precisando traduzir o caption dos
>> botões
>> de um MessageDlg.
>>
>> Ex: de YES para SIM
>> de NO para NÃO
>>
>> E assim por diante.
>>
>> Isso eu devo alterar diretamente da Unit de Dialogs ou existe outra
> maneira
>> de fazer??.
>>
>> Abraços
>>
>> --
>> Atenciosamente
>> Alison Zen

_________________________________________________________________
Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger!
http://www.amigosdomessenger.com.br/

Responder a