Сообщение в MsgBox. Можно ли сделать кликабельной ссылку на email?

[Suppir]

MsgBox(64, "Информация о программе", "Арчилинк, версия 1.0 beta      " & @CRLF & @CRLF & "Автор - Suppir," & @CRLF & "[email protected]")

Можно ли сделать email в MsgBox'е кликабельным?



Добавлено:

Сообщение автоматически объединено: 25 Дек 2009

Про вариант создать GUI с RichEdit'ом в виде MsgBox'а я знаю

 

[CreatoR]

Suppir [?]

Можно ли сделать email в MsgBox'е кликабельным?

Только если построить собственный MsgBox.

 

[Guezt]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <INet.au3>


$Address = "some [email protected]"
$Subject = "Тема сообщения"
$Body ="текст сообщения"


$Form1 = GUICreate("Form1", 326, 112, -1, -1, BitOR($WS_SYSMENU,$WS_CAPTION,$WS_POPUP,$WS_POPUPWINDOW,$WS_BORDER,$WS_CLIPSIBLINGS), BitOR($WS_EX_TOPMOST,$WS_EX_WINDOWEDGE))
$Button1 = GUICtrlCreateButton("OK", 232, 72, 75, 25, $WS_GROUP)
$Label1 = GUICtrlCreateLabel("some [email protected]", 56, 32, 119, 20)
GUICtrlSetFont(-1, 10, 800, 6, "Arial")
GUICtrlSetColor(-1, 0x0000FF)
GUICtrlSetCursor (-1, 0)
GUISetState(@SW_SHOW)

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

		Case $Button1
			Exit
		Case $Label1
			_INetMail($address, $subject, $body)

	EndSwitch
WEnd

не шедевр конечно, так что сильно не пинать

 

[Suppir]

Спасибо!