Ir al contenido


Foto

Texto de botones de MessageDlg en castellano


  • Por favor identifícate para responder
4 respuestas en este tema

#1 robert01

robert01

    Advanced Member

  • Miembros
  • PipPipPip
  • 162 mensajes
  • LocationArgentina

Escrito 09 febrero 2011 - 07:48

Hola, tengo el siguiente cuadro de diálogo que aparece cuando voy a salir del programa. La variable "Pegunta" se define antes



delphi
  1.   if Pregunta = True then
  2.       if MessageDlg('¿Desea salir del programa?',mtInformation,[mbYes,mbNo], 0 ) = mrNo then
  3.         Application.Run;                                                                                                             



¿De que forma puedo hacer para que el texto en los botones salga en castellano: "Si, No, Aceptar, Cancelar,etc en vez de Yes, Ok, Cancel, etc

Se como se hace en Delphi pero no se me ocurre como hacerlo en lazarus

Saludos y gracias
  • 0

#2 German

German

    Member

  • Miembros
  • PipPip
  • 40 mensajes

Escrito 09 febrero 2011 - 08:30

Yo te cuento una forma simple de hacerlo para tu aplicacion en windows, para una lectura y conocimiento mas detallado lee http://wiki.lazarus....s_for_programs.

1.- Agrega en la clausula uses de tu modulo de programa la unidad "DefaultTranslator"
2.- En el directorio de tu ejecutable crea la carpeta "es"
3.- Adentro de la carpeta recien creada copia el archivo "C:\lazarus\lcl\languages\lclstrconsts.es.po" y renombralo como "tuprograma.po"

y se feliz!!!

Saludos!
  • 0

#3 German

German

    Member

  • Miembros
  • PipPip
  • 40 mensajes

Escrito 09 febrero 2011 - 09:18

A otra cosa, una expresion booleana puede ser una simple variable booleana. A lo que voy es que queda medio obvio y feo "if Pregunta = True then", en su lugar iria un "if Pregunta then" directamente.

Saludos!


  • 0

#4 cokocool

cokocool

    Newbie

  • Miembros
  • Pip
  • 2 mensajes

Escrito 02 febrero 2012 - 11:29

excelente German, gracias
  • 0

#5 cokocool

cokocool

    Newbie

  • Miembros
  • Pip
  • 2 mensajes

Escrito 23 abril 2013 - 05:47

Gracias German, con tu explicacion me bastó.

  • 0




IP.Board spam blocked by CleanTalk.