| |
| |
|
Georg
Teles | good evening,
be thereby one of my programs "upzudaten" and me fell now first on, Why the ButtonKlick sometimes not at all reacted having:
there my Program (XTraBar) The Buttons first at Start definiert, can I no absoluten variables inquire, there according to Konfiguration any 50 or only 1 Button prepares becomes.
 behaviour:
"normaler Button": %Message = 78 (klick) or = 32 (wisch)
SKControl erstellter Button: %Message = 272 (klick) or = 32 (wisch)
= 78 / 272 step, if one these Buttons normal anklickt.
= 32 exit on (both Buttons involved), once one whom Button anklickt (without loszulassen) and a direction "wischt" without this To leave and the Mouse button then loslässt.
the can I me half-way explain, if I The meanings the Messages in the subesquent list anschaue...
32 = WM_SETCURSOR (wisch normal Button UND SKConrtol Button)
78 = WM_NOTIFY (klick normal Button)
272 = WM_COMMAND (klick SKControl Button)
but ...
the trouble:
The upper Screenshot watts under Win10 shut.
Win XP, 7 and 8:
plainer Button: %Message = 78 or = 32 (means same How Win10)
SKConrtol Button: %Message = 32 (always)
possible has the something with the Fensterobjekten and How windows these treats zutun - I suspect, under Win 10 go The activities here rather ausgewertet ? 
Solution: One Workarea to have I here [...]  tuned, what now quite well functions.
View source to that Screenshot supra, this needed one The SKControl:
$I SKControl.inc
declare hdll&
'Dll loading & initialisieren
let hdll& = UseDll("SKControl.dll")
SKCtrl_InitDll()
Window Style 2+4+16+20+512
Window 200,200-500,600
Window Title "Test"
declare normalBmp#,hoverBmp#,clickedBmp#
dim normalBmp#,200
string normalBmp#,0 = ($ GetDir("@")+"\\1.bmp")
dim hoverBmp#,200
string hoverBmp#,0 = ($ GetDir("@")+"\\2.bmp")
dim clickedBmp#,200
string clickedBmp#,0 = ($ GetDir("@")+"\\3.bmp")
var b% = Create("Button",%hWnd,"einfacher Button",250,20,200,40)
var tb11& = SKCtrl_CreateUserButton(%hwnd,0,normalBmp#,hoverBmp#,clickedBmp#,250,80,200,40,%hInstance)
locate 0,0
print "einfacher Button = 78 ODER =32"
print "User def. Button =273 ODER =32"
print
While 1=1
WaitInput
print %Message
SetFocus(%hWnd)
Case %Key = 2:Break
EndWhile
'memory enable...
dispose normalBmp#
dispose hoverBmp#
dispose clickedBmp#
'Dll deinitialisieren (important!) and enable
SKCtrl_DeInitDll()
FreeDll hdll&
END
Regards
Georg |
|
| |
| |
| |
|
|
H.Brill | I thought always, that Clicked() both auswertet :
wm_lButtonDown + wm_LButtonUp
means pressing and release.
the Wischen know I do not. Höchstens with Drag&Drop,
where to the Control with the mouse festhält and anywhere
zieht.
what do you need because very ? |
|
| |
| Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.
Was die Borg können, können wir schon lange. | 06/12/20 ▲ |
|
| |
|
|
Matthias
Arlt | | with Wischen is well the bloße Überfahren the Controls with the mouse meant. thereby becomes WM_SETCURSOR=32 together with WM_MOUSEMOVE=512 triggered. |
|
| |
| WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia | 06/12/20 ▲ |
|
| |
|
|
Georg
Teles | H.Brill (12.06.2020)
I thought always, that Clicked() both auswertet :
wm_lButtonDown + wm_LButtonUp
means pressing and release.
Yes that's right, functions here as should - if one between wm_lButtonDown + wm_LButtonUp now "wischt", means attempts whom Button quasi To "markieren" is the %Message then 32 = WM_SETCURSOR against which the normal Click 78 = WM_NOTIFY - the fit too everything
H.Brill (12.06.2020)
what do you need because very ?
me would sooner interested, How the SKControl prepares becomes or sooner a %Message-list the Verhaltens of SK-Controls, there the Button zB to that enfachen Button others %Messages supply
Matthias Arlt (12.06.2020)
with Wischen is well the bloße Überfahren the Controls with the mouse meant. thereby becomes WM_SETCURSOR=32 together with WM_MOUSEMOVE=512 triggered.
Yes so similar 
Regards |
|
| |
| |
| |
|
|
Matthias
Arlt | | in the SKControl finds one complete Subclassing all encompassed Controls instead of. XProfan self knew these Possibility then not yet. During the Creation z.B. the Buttons becomes on WM_PAINT reacted and drawing to Userangaben implemented. any on these point erstellten Controls go in a DLL-internen list manages. from the, what furthermore in the Subclassing happens, becomes vmtl. not everything to profane or. The Original-procedure durchgereicht (or comes there also on), separate only, take off whom then Profan-Funktionsumfang (Messagehandling) relevant was. The zwischenzeitlich aufgekommene XP-Style (Theme), whom it with the SKControl not gives, brought dahingehend further differences with itself. |
|
| |
| WinXP SP2, Win7 - XProfan 10/11/FreeProfan32 - Xpia | 06/13/20 ▲ |
|
| |
|
|
H.Brill | Perhaps can one what rausbekommen, if one
The Messagebehandlung abschaltet (Help : Messageverwaltung
self take) and then with GetMessage probiert.
I know but the SKControl not, or. have not yet
with the worked.
I would find it too rather, if XProfan all Messages
durchreichen would. the xprofane Messagehandling can Yes
so stay. |
|
| |
| Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.
Was die Borg können, können wir schon lange. | 06/13/20 ▲ |
|
| |
|
|
Georg
Teles | Hi,
Yes through Messagehandling get one The right Messages, so coming I on The 2 Rückgabewerte. Dass any Controls DLL-intern manages go was I do not deliberate.
thanks for Info, that will do me   |
|
| |
| |
| |
|
(956)
Deutsch
English
Français
Español
Italia