Recent

Author Topic: [SOLVED] MessageDlg in laz 1.0.8 32b / win8 64b has no icons  (Read 2865 times)

pbruccoleri

  • New Member
  • *
  • Posts: 28
Hello..

this sentence:
 if (MessageDlg('Grabar', '¿Desea grabar?', mtConfirmation, mbYesNo, 0) = mrnO) then
....

It shows the buttons with Si/No respectively texts  (are translated to spanish), but without the corresponding icons (green accents and Red Cross).

why? can I help me?
any help is appreciated. Best regards

« Last Edit: June 15, 2013, 11:46:16 pm by pbruccoleri »

joseme

  • Full Member
  • ***
  • Posts: 128
    • Logosoft sistemas
Re: MessageDlg in laz 1.0.8 32b / win8 64b has no icons
« Reply #1 on: June 13, 2013, 04:17:20 am »
Hello Paola!
Go to http://www.lazarus.freepascal.org/index.php/topic,19860.msg113719.html#msg113719 and look at the second code chunk. I commented the code in Themes unit and now my buttons have icons.
un aporte a la comunidad:
http://pascalylazarus.blogspot.com/

pbruccoleri

  • New Member
  • *
  • Posts: 28
Re: MessageDlg in laz 1.0.8 32b / win8 64b has no icons
« Reply #2 on: June 13, 2013, 02:55:19 pm »
Hello Joseme..
very thanks!. Now it works.
But it is a pity having to modify the code of the lcl to get that effect. Be a bug or what will be the reason for this behavior?

Bart

  • Hero Member
  • *****
  • Posts: 5575
    • Bart en Mariska's Webstek
Re: MessageDlg in laz 1.0.8 32b / win8 64b has no icons
« Reply #3 on: June 15, 2013, 10:35:16 pm »
On Windows Vista and up Messagedlg simply calls the native Windows dialog.
If you disable themes, then a custom LCL form is cretaed with TBitButtons.

In your case, the native dialog seem to have no Icons, but our own create dialog will of course have them.

Bart

 

TinyPortal © 2005-2018