From: "Carlo Hogeveen" 
@Date: Wed, 15 Jan 2003 00:51:31 +0100
@Sender: semware-owner{at}sawasdi.apana.org.au





Darn! Foiled again! Lets hide it behind a web-link then.
Try either http://www.xs4all.nl/~hyphen/tse/files/MyUi.s
or http://www.xs4all.nl/~hyphen/tse/files/MyUi.zip .
It is the same file.

Carlo



-----Original Message-----
From: tsepro-bounce{at}freelists.org [mailto:tsepro-bounce{at}freelists.org]On
Behalf Of Carlo Hogeveen
Sent: dinsdag 14 januari 2003 23:49
To: tsepro{at}freelists.org
Subject: [TSEPro] Re: Overiding UI Menus



Ok, a retry with a zipped file.
I didn't realise the .s extension was a danger to world peace :-)

Carlo



-----Original Message-----
From: tsepro-bounce{at}freelists.org [mailto:tsepro-bounce{at}freelists.org]On
Behalf Of Carlo Hogeveen
Sent: dinsdag 14 januari 2003 22:53
To: tsepro{at}freelists.org
Subject: [TSEPro] Re: Overiding UI Menus



Well Sammy, here it is.

Carlo



-----Original Message-----
From: tsepro-bounce{at}freelists.org [mailto:tsepro-bounce{at}freelists.org]On
Behalf Of Sammy Mitchell
Sent: dinsdag 14 januari 2003 14:53
To: tsepro{at}freelists.org
Subject: [TSEPro] Re: Overiding UI Menus

>I want to write a macro that temporarily overides some but
>not all of the standard UI menus and key bindings. Is there
>any way to do this without duplicating tne entire menu
>system with all of the procedures, menus, helpdefs and
>keydefs that I'm *not* changing?

Overriding the key bindings is doable, and, especially in
v4, you don't have to duplicate a lot of code.

You can override the menu system (using SetMenuBar()), but
there isn't any clean (or dirty that I can think of) way to
reference the existing menus.

--
Sammy Mitchell

--
TSEPro mailing list



-- Binary/unsupported file stripped by Ecartis --
-- Type: application/octet-stream
-- File: MyUi.s


--
TSEPro mailing list



-- Binary/unsupported file stripped by Ecartis --
-- Type: application/x-zip-compressed
-- File: MyUi.zip


--
TSEPro mailing list


--
TSEPro mailing list



---
[sawasdi.apana.org.au] (3:800/846.13)