Alert en una sola linea

Ir abajo

Alert en una sola linea

Mensaje por 1VANNA el Vie Sep 07, 2018 4:30 pm

Hola.
Tengo un problema tonto.
Necesito que un mensaje largo "alert" me salga en una sola linea.

(alert "ESTE MENSAJE ES MUY LARGO PERO NECESITO QUE SALGA EN UNA SOLA LINEA")

Alguien puede ayudarme?

Gracias,
Ivanna.

1VANNA

Mensajes : 23
Fecha de inscripción : 15/09/2016

Ver perfil de usuario

Volver arriba Ir abajo

Re: Alert en una sola linea

Mensaje por nolo el Sáb Sep 08, 2018 2:27 pm

A mime sale completo pero supongo que es por mi resolución de pantalla
Prueba con un dcl
Código:
(defun c:alert3( / men lon dcl_tem e_temporal Dcl_Id% Return#)
(setq men "ESTE MENSAJE ES MUY LARGO PERO NECESITO QUE SALGA EN UNA SOLA LINEA"
 lon (+ 10 (strlen men))
 dcl_tem (vl-filename-mktemp "ivana.dcl")
)

(write-line (strcat
"alerta2 : dialog {label = \"Mensaje de AutoCAD\"; spacer;
 :text {key = \"text_1\";alignment =centered; width = "(itoa lon) ";}
 :row{width=20;fixed_width=true;alignment = right;spacer;
        :button{label=\"&Cancelar\";key=\"fuera\";width=20;fixed_width=true;is_default = true;}
      } spacer;
}") (setq e_temporal (open dcl_tem "w")))
(close e_temporal)

(setq Dcl_Id% (load_dialog dcl_tem))
(if (not (new_dialog "alerta2" Dcl_Id%))
 (progn (alert "\n   Problemas en la llamada un dcl\n\t¡ No se cargará !")(exit))
)
 
(set_tile "text_1" men )
(action_tile "fuera" "(done_dialog 1)")
(setq Return# (start_dialog))

(if (findfile dcl_tem)(vl-file-delete dcl_tem))
Return#
)

Un saludo

nolo

Mensajes : 172
Fecha de inscripción : 17/03/2016

Ver perfil de usuario

Volver arriba Ir abajo

Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.