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 <mailto:delphi- br%40yahoogrupos .com.br> > From: eduardo.drd@ gmail.com <mailto:eduardo. drd%40gmail. 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 <[EMAIL PROTECTED] com <mailto:galvaozen% 40gmail.com> > > > > 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 > > ____________ _________ _________ _________ _________ _________ _ > Cansado de espaço para só 50 fotos? Conheça o Spaces, o site de > relacionamentos com até 6,000 fotos! > http://www.amigosdo messenger. com.br <http://www.amigosdo messenger. com.br> > > > No virus found in this incoming message. > Checked by AVG - http://www.avg. com > Version: 8.0.138 / Virus Database: 270.5.12/1596 - Release Date: 6/8/2008 > 16:55 > Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
