View previous topic :: View next topic |
Author |
Message |
Bartl
Joined: 16 Oct 2009 Posts: 58 Location: München
|
Posted: Thu Jul 26, 2012 12:25 pm Post subject: call back in %rs with mouse click |
|
|
Code: |
winapp
program mouse_test
include <windows.ins>
external test
character*10 data
data = ' '
i=winio@('%ac[Enter]&',test)
i=winio@('%^rs',data,test)
end
integer*4 function test()
include <windows.ins>
test=1
write(*,*)"call back test called"
end
|
Hello,
with %^rs the call back "test" works fine with characters and with [ENTER] .
Is it possible to call the call back function in %^rs with the right mouse click?
Thanks
Johann |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7924 Location: Salford, UK
|
Posted: Thu Jul 26, 2012 5:08 pm Post subject: |
|
|
The short answer is no, not without a lot of messing about (sub-classing the default message handling procedure for the Microsoft edit control). |
|
Back to top |
|
|
LitusSaxonicum
Joined: 23 Aug 2005 Posts: 2388 Location: Yateley, Hants, UK
|
Posted: Thu Jul 26, 2012 5:58 pm Post subject: |
|
|
Bartl,
There is a format code %bk to allow right mouse button clicks on a %bt button (I don't know if it works on a %bb button), and there is also a subroutine call to change the button text (change_button_text@). Button text can also be specified with an @ to make it change dynamically like you do with a caption %ca. Hence you might be able to get the effect you want with a button, although you won't be able to edit the text character-by-character at runtime.
Eddie |
|
Back to top |
|
|
|