Hola!

Esta instrucci�n:
if (MessageDlg('Grabar', '�Desea grabar?', mtConfirmation, mbYesNo,
0) = mrnO) then .....

muestra esto (lazaruz 1.0.8):

La diferencia q veo con el lazarus anterior q usaba (0.9.31) es que no aparecen iconos en los botones (tilde verde y cruz roja respectivamente)

No se si a todos les pasa lo mismo o hay que agregar algo en algun lado.

Adem�s, tengo indicado q me traduzca a espa�ol todos esos textos de esta manera:
en el lpr: (en el uses est� la unidad translations)

procedure TranslateLCL;
var
   PODirectory, Lang, FallbackLang: String;
begin
   PODirectory:='f:\lazarus\lcl\languages\';
   Lang:='es';
   FallbackLang:='';
   LCLGetLanguageIDs(Lang,FallbackLang); // in unit LCLProc
   Translations.TranslateUnitResourceStrings('LCLStrConsts',
PODirectory+'lclstrconsts.%s.po',Lang,FallbackLang);
   // ... add here a TranslateUnitResourceStrings call for every po file ...
end;
begin
   TranslateLCL;
   Application.Initialize;
   Application.CreateForm(TfrmMain, frmMain);
   Application.CreateForm(TData, Data);
   Application.CreateForm(TfrmHackForm, frmHackForm);
   Application.Run;
end.

Bueno, se agradece cq ayuda
byeeeeeeeeeeee

------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20130612/c1a79dde/attachment.html> ------------ pr�xima parte ------------
A non-text attachment was scrubbed...
Name: gjgigjab.png
Type: image/png
Size: 4633 bytes
Desc: no disponible
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20130612/c1a79dde/attachment.png>

El 17/06/2013 21:22, "H�ctor F. Fiandor Rosario" <hfiandor en infomed.sld.cu> escribi�:

me pone los botones en Yes y No.

quisiera recibir alguna informacion para mejorar mi programa, si le fuera

posible.

Deben usar application.messagebox aque usa los iconos y botones del sistema ------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20130617/c5e3bf69/attachment.html>

Estimada Paola y demas colegas:

la saludo por primera vez y le deseo todo genero de suerte.

me ha parecido muy interesante su ejemplo, que no conocia anteriormente.

Yo uso un MsgDialog para pedir confirmaci�n antes de vaciar una tabla y me pone los botones en Yes y No.

quisiera recibir alguna informacion para mejorar mi programa, si le fuera posible.

saludos y agradecimientos

Ing. H�ctor F. Fiandor Rosario
hfiandor en infomed.sld.cu

El 17/06/2013 22:22, Maxi escribi�:

Hola Maxi..
alg�n tiempo atr�s, otro listero: Carlos Germ�n Tejero me suger�a esto, x eso es q uso MessageDlg:

------------------------------
A otra cosa, no esta muy bien visto el uso de:

if Application.MessageBox('�Deseas Salir del
PB> Programa?','Salida',MB_YESNO + MB_ICONEXCLAMATION) = IDYES

es muy viejo y orientado a windows, en su reemplazo deberias usar la unidad Dialogs:

if(MessageDlg('Salida', '�Deseas Salir del PB> Programa?', mtConfirmation, mbYesNo, 0) = mrYes))then

Saludos.

Estimada Paola y colegas de la lista:

ya resolvi el problema y pude utilizar el comando translations para poner los mensajes en espa�ol.

muchas gracias de todas formas.

saludos,

Ing. H�ctor F. Fiandor Rosario
hfiandor en infomed.sld.cu