Fácil mesmo é usar as unit's traduzidas.

2008/8/7 Rubem Nascimento da Rocha <[EMAIL PROTECTED]>

>
> 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 <delphi-br%40yahoogrupos.com.br>
> From: [EMAIL PROTECTED] <simoesluciano%40yahoo.com.br>
> 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]<falecom%40adrianosantos.pro.br>
> >
> Para: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.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/
> 
>



-- 
.......................................................
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
MSN: [EMAIL PROTECTED]
Site: http://www.drdsistemas.com.br/
.......................................................


[As partes desta mensagem que não continham texto foram removidas]

Responder a