Search found 204 matches

by KDJ
Tue Jun 26, 2018 6:48 pm
Forum: General
Topic: mouseover label
Replies: 29
Views: 1536

Re: mouseover label

A small improvement to avoid flickering: #include "hmg.ch" #define LABEL_NAME 1 #define LABEL_HWND 2 MEMVAR _HMG_SYSDATA FUNCTION Main() LOCAL aLabel := {{"LABEL1", NIL}, ; {"LABEL2", NIL}, ; {"LABEL3", NIL}} LOCAL n DEFINE WINDOW MainForm; WIDTH 300; HEIGHT 260; TITLE "Labels as buttons"; MAIN; ON ...
by KDJ
Mon Jun 25, 2018 8:48 pm
Forum: General
Topic: mouseover label
Replies: 29
Views: 1536

Re: mouseover label

Is this supposed to be something like that: #include "hmg.ch" #define LABEL_NAME 1 #define LABEL_HWND 2 MEMVAR _HMG_SYSDATA FUNCTION Main() LOCAL aLabel := {{"LABEL1", NIL}, ; {"LABEL2", NIL}, ; {"LABEL3", NIL}} LOCAL n DEFINE WINDOW MainForm; WIDTH 300; HEIGHT 260; TITLE "Labels as buttons"; MAIN; ...
by KDJ
Sun Jun 24, 2018 12:34 pm
Forum: General
Topic: mouseover label
Replies: 29
Views: 1536

Re: mouseover label

Hi Krzysztof! Your sample works fine till application has focus. When I switched to another application and return to Label Test, onMouseEvent stopped to work :-( When I leave mouse cursor over label - it becomes RED - I'm switching by Alt-Tab to another application and return to Test - label stays...
by KDJ
Wed Jun 20, 2018 6:32 pm
Forum: General
Topic: mouseover label
Replies: 29
Views: 1536

Re: mouseover label

Grigory ... Why WM_MOUSELEAVE in HMG Extended works and in classic HMG doesn't work? Krzysztof IMHO Because HMG Extended uses a Label subclassing on C-level 8-) Grigory I solved this problem. Before that I completely forgot about the function EventProcessAllHookMessage(). WM_MOUSELEAVE works also i...
by KDJ
Sun Jun 17, 2018 12:16 pm
Forum: Others
Topic: How to adopt function DeleteUrlCacheEntry in HMG
Replies: 3
Views: 323

Re: How to adopt function DeleteUrlCacheEntry in HMG

For example, in this way: #include "hmg.ch" MEMVAR _HMG_SYSDATA FUNCTION Main() LOCAL cURL := "http://myURL" LOCAL nError IF DeleteUrlCacheEntry(cURL, @nError) MsgBox("Deleted!") ELSE //System Error Codes: https://msdn.microsoft.com/en-us/library/windows/desktop/ms681381(v=vs.85).aspx MsgBox("Error ...
by KDJ
Sun Jun 10, 2018 8:31 pm
Forum: General
Topic: mouseover label
Replies: 29
Views: 1536

Re: mouseover label

Grigory, thank you very much for your explanation.
by KDJ
Sun Jun 10, 2018 4:36 pm
Forum: General
Topic: mouseover label
Replies: 29
Views: 1536

Re: mouseover label

Grigory Yes, thank you for the idea. This can also be done by processing WM_SETCURSOR message in main window event handler (example is here: http://www.hmgforum.com/viewtopic.php?f=9&t=4806&hilit=mouse+andyglez ). But WM_MOUSELEAVE is still not received. Why WM_MOUSELEAVE in HMG Extended works and ...
by KDJ
Sun Jun 10, 2018 12:19 pm
Forum: General
Topic: mouseover label
Replies: 29
Views: 1536

Re: mouseover label

Hi, Grigory SS_NOTIFY Sends the parent window STN_CLICKED, STN_DBLCLK, STN_DISABLE, and STN_ENABLE notification codes when the user clicks or double-clicks the control. So applying SS_NOTIFY style should not affect the WM_MOUSELEAVE message generation. In addition, this LABEL already has SS_NOTIFY s...
by KDJ
Sat Jun 09, 2018 8:09 pm
Forum: General
Topic: mouseover label
Replies: 29
Views: 1536

Re: mouseover label

Can somebody know why WM_MOUSELEAVE message is not generated for LABEL and another controls? Example of code: #include "hmg.ch" MEMVAR _HMG_SYSDATA FUNCTION Main() DEFINE WINDOW MainForm; WIDTH 300; HEIGHT 200; MAIN DEFINE LABEL Label1 ROW 10 COL 10 WIDTH 140 HEIGHT 45 VALUE "This is LABEL" ALIGNMEN...
by KDJ
Wed Jun 06, 2018 8:24 pm
Forum: GUI Basics
Topic: Form with console panel
Replies: 4
Views: 266

Re: Form with console panel

Chang
I don't understand what console you need.
Do you mean command console (cmd)?