Re: Macro naming support

Hi James,



On 5/12/2010 12:39 PM, James Rich wrote:

I've looked through winterm.c and tn5250-win.c and I haven't found
anything that looks to me like macro menu code. I'm sure I'm just
missing something obvious. Could you point it out to me?

This is Windows code, it doesn't look like the rest of the world :)
For starters, you need to look at the tn5250-res.rc file. In there you should see something like this (I apologize in advance for the word wrapping problems inherant in e-mail):

POPUP "&Macro"
BEGIN
MENUITEM "&Record/Stop F1\tCtrl-S F1", IDM_MACRO_RECORD1
MENUITEM "&Record/Stop F2\tCtrl-S F2", IDM_MACRO_RECORD2
MENUITEM "&Record/Stop F3\tCtrl-S F3", IDM_MACRO_RECORD3
MENUITEM "&Record/Stop F4\tCtrl-S F4", IDM_MACRO_RECORD4
MENUITEM "&Execute F1\tCtrl-W F1", IDM_MACRO_EXEC1
MENUITEM "&Execute F2\tCtrl-W F2", IDM_MACRO_EXEC2
MENUITEM "&Execute F3\tCtrl-W F3", IDM_MACRO_EXEC3
MENUITEM "&Execute F4\tCtrl-W F4", IDM_MACRO_EXEC4
END

What the preceding code amounts to is that it will add the appropriate options to the menu. When you click them, it'll return an event to windows identified by the constant on the right (the ones starting with IDM_MACRO_xxx)

These constants are actually defined in resource.h -- but they aren't very interesting, they're just numbers that correspond to stuff like IDM_MACRO_EXEC1.

In winterm.c you should find code that's looking for that menu to be clicked -- and when it's clicked, I just have it stuffing keypresses into the system so that it'll act just like the corresponding keyboard input:

case IDM_MACRO_RECORD1:
case IDM_MACRO_RECORD2:
case IDM_MACRO_RECORD3:
case IDM_MACRO_RECORD4:
tn5250_display_kf_macro(globDisplay, K_MEMO);
if (tn5250_macro_rstate(globDisplay)) {
int key = LOWORD(wParam) - IDM_MACRO_RECORD1;
win32_terminal_queuekey(hwnd, globTerm, K_F1+key);
PostMessage(hwnd, WM_TN5250_KEY_DATA, 0, 0);
}
else {
win32_terminal_update(globTerm,globDisplay);
}
return 0;
case IDM_MACRO_EXEC1:
case IDM_MACRO_EXEC2:
case IDM_MACRO_EXEC3:
case IDM_MACRO_EXEC4: {
int key = LOWORD(wParam) - IDM_MACRO_EXEC1;
tn5250_display_kf_macro(globDisplay, K_EXEC);
win32_terminal_queuekey(hwnd, globTerm, K_F1+key);
PostMessage(hwnd, WM_TN5250_KEY_DATA, 0, 0);
return 0;