fc-tourmaline: src/ui/bmi/AUICalcEditor.c annotate

annotate src/ui/bmi/AUICalcEditor.c @ 135:70ea7526b59e

bmi/AUI*.c: bogotab fixes

author	Mychaela Falconia <falcon@freecalypso.org>
date	Sat, 14 Nov 2020 03:18:11 +0000
parents	c0052fe355d3
children

rev	line source
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	1 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	2
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	3 CONDAT (UK)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	4
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	5 ********************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	6
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	7 This software product is the property of Condat (UK) Ltd and may not be
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	8 disclosed to any third party without the express permission of the owner.
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	9
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	10 ********************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	11
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	12 $Project name: Basic MMI
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	13 $Project code: BMI (6349)
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	14 $Module: MMI
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	15 $File: AUICalcEditor.c
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	16 $Revision: 1.0
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	17
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	18 $Author: Condat(UK)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	19 $Date: 22/02/01
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	20
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	21 ********************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	22
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	23 Description: Editor for calculator, or generic floating-point number input
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	24
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	25
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	26 ********************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	27
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	28 $History: AUICalcEditor.c
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	29
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	30 xrashmic 20 Oct, 2005 MMI-SPR-33845
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	31 To display BACK softkey when no more character are left in the calculator editor
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	32
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	33 14/11/02 Original Condat(UK) BMI version.
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	34 $End
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	35
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	36 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	37
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	38 #define ENTITY_MFW
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	39
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	40 /* includes */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	41 #include <string.h>
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	42 #include <stdio.h>
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	43 #include <stdlib.h>
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	44
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	45 #if defined (NEW_FRAME)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	46
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	47 #include "typedefs.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	48 #include "vsi.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	49 #include "pei.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	50 #include "custom.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	51 #include "gsm.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	52
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	53 #else
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	54
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	55 #include "STDDEFS.H"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	56 #include "custom.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	57 #include "gsm.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	58 #include "vsi.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	59
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	60 #endif
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	61
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	62 #include "mfw_mfw.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	63 #include "mfw_win.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	64 #include "mfw_kbd.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	65 #include "mfw_tim.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	66 #include "mfw_phb.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	67 #include "mfw_sms.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	68 #include "mfw_ss.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	69 #include "mfw_icn.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	70 #include "mfw_mnu.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	71 #include "mfw_lng.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	72 #include "mfw_sat.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	73 #include "mfw_kbd.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	74 #include "mfw_nm.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	75 #include "mfw_cm.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	76
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	77 #include "dspl.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	78
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	79 #include "ksd.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	80 #include "psa.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	81
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	82 #include "MmiDummy.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	83 #include "MmiMmi.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	84
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	85 #include "MmiDialogs.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	86 #include "MmiLists.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	87 #include "MmiMenu.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	88 #include "MmiSoftKeys.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	89 #include "MmiIdle.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	90 #include "MmiResources.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	91
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	92 #include "cus_aci.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	93 #include "prim.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	94 #ifndef PCM_2_FFS
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	95 #include "pcm.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	96 #endif
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	97
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	98 #include "mmiColours.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	99
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	100 #include "ATBCommon.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	101 #include "ATBDisplay.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	102 #include "ATBEditor.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	103 #include "AUIEditor.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	104 #include "AUITextEntry.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	105
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	106 #include "AUICalcEditor.h"
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	107
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	108 typedef struct
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	109 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	110 T_MMI_CONTROL mmi_control;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	111 T_MFW_HND parent; // The parent window
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	112 T_MFW_HND win; // The edit window
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	113 T_MFW_HND kbd; // The keyboard handler
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	114 T_MFW_HND kbd_long; // The longpress keyboard handler
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	115 T_MFW_HND timer; // The timer for timeouts
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	116
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	117 T_ED_DATA editor; / The ATB editor */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	118 T_AUI_EDITOR_DATA editor_data; /* The MMI editor data, provided by caller */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	119 T_AUI_ENTRY_DATA entry_data; / The MMI text entry data */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	120
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	121 BOOL haveTitle; /* TRUE if a title is supplied */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	122 T_ATB_TEXT title; /* Title of editor */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	123 BOOL haveResult; /* TRUE if a result is supplied */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	124 T_ATB_TEXT result; /* Text of result */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	125
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	126 BOOL doNextLongPress; /* Flag used to notice/not notice long keypress */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	127 BOOL hasDecimalPoint; /* Ensures only one decimal point per number */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	128 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	129 T_AUI_CALC_DATA;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	130
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	131 /* LOCAL FUNCTION PROTOTYPES */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	132 static T_MFW_HND AUI_calc_Create(T_MFW_HND parent, T_AUI_EDITOR_DATA *editor_data);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	133 static void AUI_calc_ExecCb(T_MFW_HND win, USHORT event, SHORT value, void *parameter);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	134 static int AUI_calc_WinCb(T_MFW_EVENT event, T_MFW_WIN *win_data);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	135 static int AUI_calc_KbdCb(T_MFW_EVENT event, T_MFW_KBD *keyboard);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	136 static int AUI_calc_KbdLongCb(T_MFW_EVENT event, T_MFW_KBD *keyboard);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	137
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	138
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	139 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	140
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	141 $Function: AUI_calc_Start
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	142
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	143 $Description: Start the Calc editor.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	144
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	145 $Returns: None.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	146
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	147 $Arguments: None.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	148
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	149 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	150
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	151 T_MFW_HND AUI_calc_Start(T_MFW_HND parent, T_AUI_EDITOR_DATA *editor_data)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	152 {
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	153 T_MFW_HND win;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	154
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	155 TRACE_FUNCTION ("AUI_calc_Start()");
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	156 win = AUI_calc_Create(parent, editor_data);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	157
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	158 return win;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	159 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	160
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	161
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	162 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	163
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	164 $Function: AUI_calc_Create
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	165
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	166 $Description: Create the Calc editor.
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	167
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	168 $Returns: Pointer to the editor's window.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	169
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	170 $Arguments: parent - The parent window.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	171
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	172 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	173
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	174 static T_MFW_HND AUI_calc_Create(T_MFW_HND parent, T_AUI_EDITOR_DATA *editor_data)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	175 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	176 T_AUI_CALC_DATA data = (T_AUI_CALC_DATA )ALLOC_MEMORY(sizeof (T_AUI_CALC_DATA));
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	177 T_MFW_WIN *win_data;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	178
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	179 TRACE_FUNCTION ("AUI_calc_Create()");
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	180
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	181 /* Create window handler */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	182
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	183 data->win = win_create(parent, 0, E_WIN_VISIBLE, (T_MFW_CB)AUI_calc_WinCb); // Create window
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	184
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	185 if (data->win==NULL) // Make sure window exists
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	186 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	187 return NULL;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	188 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	189
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	190 /* Connect the dialog data to the MFW-window */
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	191
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	192 data->mmi_control.dialog = (T_DIALOG_FUNC)AUI_calc_ExecCb; /* Setup the destination for events */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	193 data->mmi_control.data = data;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	194 data->parent = parent;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	195 win_data = ((T_MFW_HDR *)data->win)->data;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	196 win_data->user = (void *)data;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	197
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	198 data->kbd = kbd_create(data->win, KEY_ALL,(T_MFW_CB)AUI_calc_KbdCb);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	199 data->kbd_long = kbd_create(data->win, KEY_ALL\|KEY_LONG,(T_MFW_CB)AUI_calc_KbdLongCb);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	200 data->editor = ATB_edit_Create(&data->editor_data.editor_attr,0);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	201
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	202 data->editor_data = *editor_data;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	203 data->entry_data = AUI_entry_Create(data->win, data->editor, E_CALC_UPDATE);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	204
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	205 SEND_EVENT(data->win, E_CALC_INIT, 0, 0);
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	206
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	207 /* Return window handle */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	208
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	209 return data->win;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	210 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	211
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	212
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	213 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	214
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	215 $Function: AUI_calc_Destroy
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	216
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	217 $Description: Destroy the Calc editor.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	218
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	219 $Returns: None.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	220
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	221 $Arguments: window - The editor window.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	222
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	223 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	224
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	225 void AUI_calc_Destroy(T_MFW_HND win)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	226 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	227 T_MFW_WIN win_data = ((T_MFW_HDR )win)->data;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	228 T_AUI_CALC_DATA data = (T_AUI_CALC_DATA )win_data->user;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	229
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	230 if (data)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	231 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	232 AUI_entry_Destroy(data->entry_data);
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	233
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	234 win_delete (data->win);
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	235
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	236 /* Free memory allocated to store result */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	237
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	238 if (data->haveResult)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	239 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	240 FREE_MEMORY(data->result.data, data->result.len*sizeof(char));
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	241 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	242
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	243 /* Free editor memory */
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	244
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	245 ATB_edit_Destroy(data->editor);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	246 FREE_MEMORY ((void *)data, sizeof (T_AUI_CALC_DATA));
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	247 }
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	248
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	249 return;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	250 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	251
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	252
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	253 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	254
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	255 $Function: AUI_calc_ExecCb
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	256
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	257 $Description: Dialog function for Calc editor.
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	258
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	259 $Returns: None.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	260
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	261 $Arguments: None.
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	262
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	263 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	264
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	265 static void AUI_calc_ExecCb(T_MFW_HND win, USHORT event, SHORT value, void *parameter)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	266 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	267 T_MFW_WIN win_data = ((T_MFW_HDR )win)->data;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	268 T_AUI_CALC_DATA data = (T_AUI_CALC_DATA )win_data->user;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	269 T_MFW_HND parent_win = data->parent;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	270 USHORT textIndex;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	271 T_ATB_TEXT text;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	272 /* Store these in case editor is destroyed on callback */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	273 USHORT Identifier = data->editor_data.Identifier;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	274 T_AUI_EDIT_CB Callback = data->editor_data.Callback;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	275 UBYTE destroyEditor = data->editor_data.destroyEditor;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	276
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	277 TRACE_FUNCTION ("AUI_calc_ExecCb()");
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	278
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	279 switch (event)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	280 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	281 /* Initialise */
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	282
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	283 case E_CALC_INIT:
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	284 TRACE_EVENT("E_CALC_INIT");
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	285 ATB_edit_Init(data->editor);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	286
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	287 data->haveTitle = FALSE;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	288 data->haveResult = FALSE;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	289
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	290 /* If we require an output line, shrink editor to fit it at bottom
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	291 * NB TitleString is assumed here to be a numeric string of ascii digits */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	292
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	293 if (data->editor_data.TitleString)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	294 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	295 data->haveResult = TRUE;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	296 text.dcs = ATB_DCS_ASCII;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	297 text.data = data->editor_data.TitleString;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	298 text.len = ATB_string_Length(&text);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	299
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	300 data->result.data = ALLOC_MEMORY(text.len*sizeof(char));
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	301 ATB_string_Copy(&data->result, &text);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	302
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	303 /* Change size of editor to fit result line in */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	304 data->editor_data.editor_attr.win_size.sy -= ATB_display_StringHeight(&data->result, NULL);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	305 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	306
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	307 /* Set up title */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	308
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	309 if (data->editor_data.TitleId!=NULL)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	310 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	311 data->haveTitle = TRUE;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	312 data->title.data = (UBYTE *)MmiRsrcGetText(data->editor_data.TitleId);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	313 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	314
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	315 /* If title exists, get its dcs and length */
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	316
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	317 if (data->haveTitle)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	318 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	319 if (data->title.data[0]==0x80)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	320 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	321 data->title.data += 2; /* Skip over two unicode indicator bytes */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	322 data->title.dcs = ATB_DCS_UNICODE;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	323 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	324 #ifdef EASY_TEXT_ENABLED
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	325 else if (Mmi_getCurrentLanguage() == CHINESE_LANGUAGE)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	326 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	327 data->title.dcs = ATB_DCS_UNICODE;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	328 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	329 #endif
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	330 else
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	331 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	332 data->title.dcs = ATB_DCS_ASCII;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	333 }
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	334
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	335 data->title.len = ATB_string_Length(&data->title);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	336 }
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	337
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	338 /* Check to see if number already has decimal point */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	339
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	340 data->hasDecimalPoint = FALSE;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	341
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	342 for (textIndex = 0; textIndex<data->editor->attr->text.len; textIndex++)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	343 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	344 if (ATB_string_GetChar(&data->editor->attr->text, textIndex)==UNICODE_FULLSTOP)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	345 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	346 data->hasDecimalPoint = TRUE;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	347 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	348 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	349
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	350 /* Show the window */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	351 win_show(data->win);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	352 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	353
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	354 case E_CALC_UPDATE:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	355 TRACE_EVENT("E_CALC_UPDATE");
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	356 win_show(data->win);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	357 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	358
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	359 case E_CALC_DEINIT:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	360 TRACE_EVENT("E_CALC_DEINIT");
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	361
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	362 if (Callback)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	363 (Callback) (parent_win, Identifier, value);
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	364
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	365 if (destroyEditor)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	366 AUI_calc_Destroy(data->win);
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	367
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	368 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	369
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	370 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	371
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	372 return;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	373 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	374
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	375 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	376
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	377 $Function: AUI_calc_WinCb
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	378
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	379 $Description: Calc editor window event handler.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	380
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	381 $Returns: None.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	382
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	383 $Arguments: event - the event
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	384 win - the editor window
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	385
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	386 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	387
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	388 static int AUI_calc_WinCb(T_MFW_EVENT event, T_MFW_WIN *win_data)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	389 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	390 T_AUI_CALC_DATA data = (T_AUI_CALC_DATA )win_data->user;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	391 T_ED_DATA *editor = data->editor;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	392 T_ATB_WIN_SIZE *win_size = &data->editor->attr->win_size;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	393 T_DS_TEXTFORMAT format;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	394 // USHORT titleLen; // RAVI
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	395
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	396 TRACE_EVENT("AUI_calc_WinCb");
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	397
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	398 if (!data)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	399 return MFW_EVENT_CONSUMED;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	400
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	401 switch(event)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	402 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	403 case E_WIN_VISIBLE: /* window is visible */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	404 if (win_data->flags & E_WIN_VISIBLE)
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	405 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	406 if (editor->update==ED_UPDATE_TRIVIAL)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	407 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	408 TRACE_EVENT("Only updating editor.");
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	409 ATB_edit_Show(data->editor);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	410 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	411 else
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	412 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	413 TRACE_EVENT("Updating whole screen.");
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	414
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	415 ATB_edit_Show(data->editor);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	416
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	417 /* Set the colour for drawing title */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	418
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	419 resources_setTitleColour(COLOUR_EDITOR);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	420
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	421 /* TITLE */
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	422
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	423 dspl_Clear(0,0, SCREEN_SIZE_X-1, win_size->py-1);
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	424
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	425 if (data->haveTitle)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	426 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	427 ATB_display_SetFormatAttr(&format, 0, FALSE);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	428 ATB_display_Text(0,0,&format, &data->title);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	429 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	430
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	431 /* RESULT */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	432
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	433 if (data->haveResult)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	434 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	435 resources_setHLColour(COLOUR_EDITOR);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	436 ATB_display_SetFormatAttr(&format, 0, FALSE);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	437 dspl_Clear( win_size->px, win_size->py+win_size->sy, win_size->px+win_size->sx,
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	438 win_size->py+win_size->sy+ATB_display_StringHeight(&data->result, &format));
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	439
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	440 ATB_display_Text(win_size->px+win_size->sx-ATB_display_StringWidth(&data->result, &format),
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	441 win_size->py+win_size->sy,&format, &data->result);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	442 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	443
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	444 /* Display Soft Keys */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	445 //xrashmic 20 Oct, 2005 MMI-SPR-33845
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	446 //Need to display the alternate right softkey when the editor is does not contain any character other than 0.
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	447 if (data->editor_data.editor_attr.text.len == data->editor_data.min_enter && (data->editor_data.editor_attr.text.data[0] == '0'))
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	448 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	449 /* entered less than the required number of chars: Alternate Softkey appears */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	450 displaySoftKeys(data->editor_data.LeftSoftKey,data->editor_data.AltRightSoftKey);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	451 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	452 else
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	453 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	454 /* entered sufficient number of chars: Normal Softkey appears */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	455 displaySoftKeys(data->editor_data.LeftSoftKey, data->editor_data.RightSoftKey);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	456 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	457 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	458 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	459 break;
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	460 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	461
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	462 data->editor->update = ED_UPDATE_DEFAULT;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	463
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	464 return MFW_EVENT_CONSUMED;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	465 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	466
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	467
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	468 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	469
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	470 $Function: AUI_calc_KbdCb
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	471
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	472 $Description: Calc editor keyboard event handler
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	473
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	474 $Returns: None.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	475
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	476 $Arguments: event - The keyboard event
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	477 keyboard - The keypress info
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	478
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	479 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	480
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	481 static int AUI_calc_KbdCb(T_MFW_EVENT event, T_MFW_KBD *keyboard)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	482 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	483 T_MFW_HND win = mfw_parent (mfw_header());
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	484 T_MFW_WIN win_data = ((T_MFW_HDR )win)->data;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	485 T_AUI_CALC_DATA data = (T_AUI_CALC_DATA )win_data->user;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	486 ED_RES result;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	487
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	488 TRACE_FUNCTION("AUI_calc_KbdCb()");
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	489
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	490 /* Suppress unwanted long keypresses */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	491
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	492 data->doNextLongPress = TRUE; /* next Key_long event is correct */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	493 data->editor->update = ED_UPDATE_DEFAULT; /* Default behaviour is just to update text */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	494
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	495 switch (keyboard->code)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	496 {
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	497 #ifdef COLOURDISPLAY
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	498 case KCD_MNUSELECT:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	499 if (data->editor_data.Callback)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	500 (data->editor_data.Callback) (data->parent, data->editor_data.Identifier, INFO_KCD_SELECT);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	501 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	502
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	503 #endif /* COLOURDISPLAY */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	504
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	505 case KCD_STAR:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	506 if (data->editor_data.Callback)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	507 (data->editor_data.Callback) (data->parent, data->editor_data.Identifier, INFO_KCD_STAR);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	508 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	509
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	510 case KCD_HASH:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	511 /* Insert decimal point, if the number doesn't have one already */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	512 if (!data->hasDecimalPoint)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	513 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	514 data->hasDecimalPoint = TRUE;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	515 AUI_entry_EditChar(data->entry_data, UNICODE_FULLSTOP, FALSE);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	516 win_show(data->win);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	517 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	518 break;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	519
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	520 case KCD_LEFT:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	521 if (data->editor_data.editor_attr.text.len < data->editor_data.min_enter)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	522 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	523 /* Entered less than the required number of chars */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	524 if (data->editor_data.AltLeftSoftKey!=TxtNull)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	525 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	526 /* an alternate softkey is defined: execute it */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	527 SEND_EVENT (win, E_CALC_DEINIT, INFO_KCD_ALTERNATELEFT, NULL);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	528 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	529 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	530 else if (data->editor_data.LeftSoftKey!=TxtNull)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	531 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	532 /* Left Softkey is enabled (and entered sufficient number of chars): execute it */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	533 SEND_EVENT (win, E_CALC_DEINIT, INFO_KCD_LEFT, NULL);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	534 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	535 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	536
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	537 case KCD_HUP:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	538 SEND_EVENT(data->win, E_CALC_DEINIT, INFO_KCD_HUP, 0);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	539 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	540
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	541 case KCD_RIGHT:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	542 /* If we're deleting the decimal point... */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	543 if (ATB_edit_GetCursorChar(data->editor, -1)==UNICODE_FULLSTOP)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	544 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	545 data->hasDecimalPoint = FALSE;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	546 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	547
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	548 /* If we've just got a zero, delete it so we can exit with next call to ATB_edit_DeleteLeft() */
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	549
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	550 if (ATB_edit_GetCursorChar(data->editor, -1)==ATB_char_Unicode('0'))
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	551 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	552 ATB_edit_DeleteLeft(data->editor, FALSE); /* SPR#2342 - SH */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	553 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	554
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	555 /* Perform normal delete */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	556 result = ATB_edit_DeleteLeft(data->editor, TRUE); /* SPR#2342 - SH */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	557
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	558 /* If buffer is now empty, insert '0' */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	559 if (data->editor->attr->text.len==0 && result!=ED_DONE)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	560 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	561 AUI_entry_EditChar(data->entry_data, ATB_char_Unicode('0'), FALSE);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	562 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	563
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	564 /* If we've deleted on an empty buffer, exit editor */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	565 if (result==ED_DONE)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	566 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	567 SEND_EVENT(data->win, E_CALC_DEINIT, INFO_KCD_RIGHT, 0);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	568 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	569 else
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	570 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	571 win_show(data->win);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	572 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	573 break;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	574
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	575 /* 0 - 9 */
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	576
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	577 case KCD_0:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	578 case KCD_1:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	579 case KCD_2:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	580 case KCD_3:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	581 case KCD_4:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	582 case KCD_5:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	583 case KCD_6:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	584 case KCD_7:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	585 case KCD_8:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	586 case KCD_9:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	587 /* Remove leading zero */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	588 if (data->editor->attr->text.len==1 && ATB_edit_GetCursorChar(data->editor, -1)==ATB_char_Unicode('0'))
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	589 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	590 ATB_edit_DeleteLeft(data->editor, FALSE); /* SPR#2342 - SH */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	591 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	592
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	593 /* Insert the digit */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	594 AUI_entry_EventKey(data->entry_data, event, keyboard);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	595 win_show(data->win);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	596 break;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	597 }
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	598
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	599 return MFW_EVENT_CONSUMED;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	600 }
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	601
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	602
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	603 /*******************************************************************************
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	604
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	605 $Function: AUI_calc_KbdLongCb
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	606
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	607 $Description: Calc editor long keypress event handler
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	608
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	609 $Returns: None.
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	610
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	611 $Arguments: event - The keyboard event
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	612 keyboard - The keypress info
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	613
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	614 *******************************************************************************/
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	615
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	616 static int AUI_calc_KbdLongCb(T_MFW_EVENT event, T_MFW_KBD *keyboard)
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	617 {
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	618 T_MFW_HND win = mfw_parent (mfw_header());
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	619 T_MFW_WIN win_data = ((T_MFW_HDR )win)->data;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	620 T_AUI_CALC_DATA data = (T_AUI_CALC_DATA )win_data->user;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	621 ED_RES result;
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	622
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	623 /* Suppress unwanted long keypresses */
67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	624
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	625 if ( data->doNextLongPress )
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	626 data->doNextLongPress = FALSE; /* mark Key_long event as consumed but do current long press */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	627 else
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	628 return MFW_EVENT_CONSUMED; /* don't do current long press */
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	629
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	630 switch (keyboard->code)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	631 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	632 case KCD_RIGHT:
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	633 /* Long press of RSK deletes buffer */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	634 result = ATB_edit_ClearAll(data->editor);
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	635
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	636 /* If buffer is now empty, insert '0' */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	637 if (data->editor->attr->text.len==0 && result!=ED_DONE)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	638 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	639 AUI_entry_EditChar(data->entry_data, ATB_char_Unicode('0'), FALSE);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	640 }
92 c0052fe355d3 src/ui/bmi/.[ch]: rm trailing white space Mychaela Falconia <falcon@freecalypso.org>* parents: 3 diff changeset	641
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	642 /* If we've deleted on an empty buffer, exit editor */
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	643 if (result==ED_DONE)
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	644 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	645 SEND_EVENT(data->win, E_CALC_DEINIT, INFO_KCD_RIGHT, 0);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	646 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	647 else
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	648 {
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	649 win_show(data->win);
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	650 }
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	651 break;
70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	652 }
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	653
135 70ea7526b59e bmi/AUI.c: bogotab fixes Mychaela Falconia <falcon@freecalypso.org>* parents: 92 diff changeset	654 return MFW_EVENT_CONSUMED;
3 67bfe9f274f6 src/ui: import of src/ui3 from Magnetite Mychaela Falconia <falcon@freecalypso.org> parents: diff changeset	655 }

FreeCalypso > hg > fc-tourmaline

annotate src/ui/bmi/AUICalcEditor.c @ 135:70ea7526b59e