Texto cortado en MessageBox

[[nlsgarcia]]

doctorhd,

!!! Bienvenido al Club Delphi ¡¡¡

Empezado por doctorhd

...desplegando un mensaje por pantalla utilizando Application.MessageBox, el tema es que el texto original se corta en 2 lineas...

Revisa este código:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
   i : Integer;
   Msg : String;
   
begin

   for i := 1 to 80 do
      Msg := Msg + IntToStr(i);

   MessageDlg(Msg,mtInformation,[mbOK],0);

   ShowMessage(Msg);

end;

El código anterior permite visualizar un Msg por pantalla sin ruptura de líneas con MessageDlg y ShowMessage.

Revisa esta información:

Empezado por Delphi Help MessageBox method (TApplication):

...The value of the Text parameter is the message, which can be longer than 255 characters if necessary. Long messages are automatically wrapped in the message box

The value of the Caption parameter is the caption that appears in the title bar of the dialog box. Captions can be longer than 255 characters, but don't wrap. A long caption results in a wide message box...

Espero sea útil

Nelson.