Buscar por:

Traduzindo o messagedlg

Código

{1º: faça backup de TUDO que você for modificar, recompilar ou substituir, sob pena de ter que instalar o Delphi novamente;

digamos que você deseja traduzir a unit "consts.pas". Ela encontra-se no diretório do Delphi, no subdiretório "SourceVCL";

2º: traduza a unit e salve-a (faça cópia de segurança!); vá até o diretório do Delphi, no subdiretório "lib"; apague o arquivo

"consts.dcu" (faça cópia de segurança!)

3º: abra um projeto qualquer e tente compilar; vai acusar um erro dizendo que falta o arquivo "consts.dcu"; clique no menu "TOOLS =>

ENVIRONMENT OPTIONS"; na guia "LIBRARY" adicione o caminho do Delphi mais o subdiretório "SourceVCL"

4º: se tudo ocorrer bem, ele vai recompilar a unit "consts.pas" gerando um novo arquivo "consts.dcu" já traduzido, porém o .DCU vai

estar no diretório "sourceVCL"... aí depende se você quiser colocá-lo no seu lugar de origem em "lib" ou deixá-lo por lá mesmo,

para futuras traduções.

ah, e não esqueça:

FAÇA BACKUP DE TUDO QUE MEXER!!!

}

MessageDlg(

`Todos os Botões estão traduzidos!! (Delphi 7)`,

mtInformation,

[mbYes, mbNo, mbOK, mbCancel, mbAbort, mbRetry,

mbIgnore, mbAll, mbNoToAll, mbYesToAll, mbHelp],

0);