[gelöst] Grösse eine MSGBOX bestimmen

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

mike6
*****
Beiträge: 479
Registriert: Sa, 06.03.2004 13:58

[gelöst] Grösse eine MSGBOX bestimmen

Beitrag von mike6 »

2.) Wie kann ich die Größe einer "MSG-Box" bestimmen? Z.B.

Code: Alles auswählen

Sub nachricht_anzeigen
	MsgBox  "Dies ist eine Meldung ......." _
	,  16,  "Wichtige Nachricht !!!"
End Sub
Zuletzt geändert von mike6 am Mo, 07.11.2011 06:44, insgesamt 1-mal geändert.
Mit freundlichen Grüßen
mike
Benutzeravatar
komma4
********
Beiträge: 5332
Registriert: Mi, 03.05.2006 23:29
Wohnort: Chon Buri Thailand Asia
Kontaktdaten:

Re: Grösse eine MSGBOX bestimmen

Beitrag von komma4 »

Das geht nicht...
Cheers
Winfried
aktuell: LO 5.3.5.2 30m0(Build:2) SUSE rpm, unter Linux openSuSE Leap 42.3 x86_64/KDE5
DateTime2 Einfügen von Datum/Zeit/Zeitstempel (als OOo Extension)
gogo
*****
Beiträge: 207
Registriert: Mi, 10.11.2010 13:11

Re: Grösse eine MSGBOX bestimmen

Beitrag von gogo »

Code: Alles auswählen

Sub Main
sInfo= "                                            T E S T                                                         "
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & sInfo
sTxt = sTxt & len(sInfo) & " Zeichen!" & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)
sTxt = sTxt & chr$(13)

msgbox sTxt,,"-                                     " & sInfo & "                                     -"

End Sub
... ab 109 Zeichen im Text gibt's einen Zeilenumbruch. Die Fensterbreite kann man über den Fenstertitel steuern ;)

g
g
LucidLynx/WinXP LibreOffice v3.3.2 ab 03/12 v3.3.2 & v3.4.5
mike6
*****
Beiträge: 479
Registriert: Sa, 06.03.2004 13:58

Re: Grösse eine MSGBOX bestimmen

Beitrag von mike6 »

Halo gogo,

das war's. Vielen Dank!
Mit freundlichen Grüßen
mike
Antworten