How to create syslink in msgbox

Question

0.00/5 (No votes)

See more:

Hi,

I'm trying to add a link to a static control, but I could not. Furthermore it does not appear in the area I want it to.

I want to remove a static control and recreate it with my own dimensions because it has a very small height and if the font size changes, some characters do not show.

Thanks.

What I have tried:

VB

first in HCBT_ACTIVATE
hFont=SendMessageA(hStatic,WM_GETFONT,0,0
GetClientRect hStatic,r
p.x=r.left : p.y=r.top
ScreenToClient wparam,p
DestroyWindow hStatic
MoveWindow hLink.......
SendMessageA hLink,WM_SETFONT,hFont,1

in HCBT_CREATEWND
hLink=CreateWindow(0,"SysLink",&H40000000+&H10000000,0,0,0,0,wparam,0&,0&)

'Msgbox raised without crashing but static area is blank

Posted 21-Jan-22 1:33am

Member 11803607

Updated 21-Jan-22 5:22am

v7

Add a Solution

1 solution

Add a Solution

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Richard MacCutchan · Answer 1 · 2022-01-21T02:41:00

Solution 1

Rather than use a simple message box for these extra features, the Task Dialog - Win32 apps | Microsoft Docs[^] offers far more flexibility for your purpose. This probably also applies to your other question on this subject.

Posted 21-Jan-22 2:41am

Richard MacCutchan

Comments

[no name] 21-Jan-22 11:11am

whats the problem of following code
Select Case uMsg
Case WM_NOTIFY
Dim nmh As NMHDR
CopyMemory nmh, ByVal lParam, Len(nmh)
Select Case lParam.uCode
Case NM_CLICK
Case NM_RETURN
Dim nml As NMLINK
CopyMemory nml,ByVal lParam,Len(nml)
If nml.hdr.hwndFrom=hLink And nml.item.ilink=0 Then
ShellExecute 0,"open",nml.item.szUrl,0,0,1
Elseif Instr(1,nml.item.szID,"idinfo")>0 Then
MessageBox wparam,"This is not much help","Example",MB_OK
End If
End Select
End Select

Richard MacCutchan 21-Jan-22 11:20am

I do not know what is wrong with it. However, as I already suggested, it would be better to use controls that are designed to do what you want.

[no name] 4-Feb-22 11:25am

because i set parametrs Of x,y,cx,cy in CreateWindowEx to Zero

Richard MacCutchan 4-Feb-22 12:00pm

I have no idea what that is supposed to mean. And the main problem with this (and your other questions) is that you are not providing any context or real detail. A few lines of random code do not give anywhere near enough information to be able to help you.

How to create syslink in msgbox

1 solution

Solution 1

Add your solution here

Preview 0

How to create syslink in msgbox

1 solution

Solution 1

Add your solution here

Preview 0

Existing Members

...or Join us