From: "Weitenberg, J.J.S." 
@Date: Fri, 7 Feb 2003 15:39:59 +0100
@Sender: semware-owner{at}sawasdi.apana.org.au



Thank you very much! it works perectly!

Jos Weitenberg

-----Original Message-----
From: Sammy Mitchell [mailto:sammy.mitchell{at}semware.com]
Sent: donderdag 6 februari 2003 17:29
To: tsepro{at}freelists.org
Subject: [TSEPro] Re: keyboard



Jos Weitenberg wrote:
>I am using a font for the Armenian language, where the
>Armenian signs occupy the high ASCII series (148 etc.). In
>order to type text I redefined the complete keyboard within
>TSEPRO with a macro. Pressing "a" then gives Armenian a
>(ASCII 148) etc; this may be clumsy but it works fine for
>simple text-entry. It does not work in the boxes for Find
>etc. where, regardless of the presence of the macro, the
>keyboard resumes its old state. So I am in trouble when I
>wish to find an Armenian word in my text. Does anyone know
>how to handle this problem? Thanks!

Since allowing macros to run in prompts can potentially mess
up the history file and potentially the integrity of the
editor, macros are not normally allowed to run in prompts.

However, if you follow the rules, you can use macros in
prompts.  The basic rule is to never add or delete lines in
a prompt buffer.  Only insert/delete characters in the
current line.

To run a macro (assigned to a key) in a prompt, you first
hook _PROMPT_STARTUP_.

In the _PROMPT_STARTUP_ event, you enable a keydef, with
your additional keystrokes.

Following is a simple example that redefines "a" to be
Chr(192):

keydef mykeys
 InsertText(Chr(192))
end

proc onPromptStartup()
    Enable(mykeys)
end

proc WhenLoaded()
    Hook(_PROMPT_STARTUP_, onPromptStartup)
end

To make this macro available all the time, you should
AutoLoad it.

--
Sammy Mitchell

--
TSEPro mailing list
--
TSEPro mailing list



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