Buttons and manifest
lazarus / 7-LCL

----------------------------------------------------------------------
Leledumbo · 2008-02-04 08:00

Lazarus revision: 13811
FPC: 2.2.0
Platform: Windows XP SP 2

Trying to run this program, all dialogs' buttons doesn't show any
caption or bitmap, unless manifest is used.

Code: [Select]
program DialogTest;

{$mode objfpc}{$H+}

{$IFDEF MSWINDOWS}
{$R manifest.rc}
{$APPTYPE GUI}
{$ENDIF}

uses
  Interfaces,Forms,Dialogs,Controls;

var
  s: String;
begin
  Application.Initialize;
  QuestionDlg('QuestionDlg Test','A Question',mtConfirmation,[
    mrYes,mrNo,mrOK,mrCancel,
    mrAbort,mrRetry,mrIgnore,
    mrAll,mrNoToAll,mrYesToAll
  ],0);
  InputBox('InputBox Test','Enter something','Default value');
  InputQuery('InputQuery Test','Enter something',s);
  MessageDlg('MessageDlg Test','A
Message',mtInformation,[mbYes,mbNo,mbCancel],0);
  PasswordBox('PasswordBox Test','Enter something');
  ShowMessage('ShowMessage Test');
  SelectDirectory('Select a directory','',s);
end.

----------------------------------------------------------------------
Paul Ishenin · 2008-02-07 07:51

cant confirm. use bugtracker next time.