On 10/08/2016 00:01, pjwitte wrote:
On 06/08/2016 15:09, pjwitte wrote:
On 06/08/2016 13:13, Giorgio Garabello wrote:
<>
This was not quite what Giorgio had in mind, as he doesnt use APPAn,
but the following construct (which I had forgotten about):
MDRAW#ch; 'my_menu'
ie MDRAW takes the menu name directly from an appended binary. The
solution then became:
ch = fopen('con')
rem Get the WD directly via the WWD
adr = mwdef(#ch): madr = peek_l(adr + 4)
xmin% = peek_w(madr): ymin% = peek_w(madr + 2)
..
mdraw#ch; 'my_menu',..
Arguments and provisos as previously noted.
Per
I know its of no interest to anyone but the person who asked the
original question (else there would have been howls of derision at my
typo!) but just for the record, a line went missing in the above:
ch = fopen('con')
msetup#ch; 'my_menu'
rem Get the WD directly via the WWD
adr = mwdef(#ch): madr = peek_l(adr + 4)
xmin% = peek_w(madr): ymin% = peek_w(madr + 2)
..
mdraw#ch; 'my_menu',..
P
_______________________________________________
QL-Users Mailing List
