The caption, prompt and buttons are cut off, it appears the dialog is a fix width.

Am I doing something wrong?


procedure TForm2.Button1Click(Sender: TObject);
var
  TempButtons: TMsgDlgBtns=[mbOk,mbYes,mbNo];
begin                                                                                                  

 Application.Desktop.MessageDlg('Test Prompt Here:','Test Caption Here', mtInformation, TempButtons, mbOk);

end;


Walter

Walter,

<< The caption, prompt and buttons are cut off, it appears the dialog is a
fix width. >>

It resizes based upon the text - I need to add code to check the button
widths also.

--
Tim Young
Elevate Software
www.elevatesoft.com