Texto cortado en MessageBox

[ozsWizzard]

Supongo que si recorres el texto como si fuese un array y buscas los caracteres "13" y /o "10" y los quitas, o los reemplazas por un espacio, debería funcionar.

[[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.

[Neftali [Germán.Estévez]]

Estaría bien que enseñaras cómo estás mostrando (código) el texto y cómo se está viendo.