mirror of
https://github.com/reactos/reactos.git
synced 2024-08-30 15:18:33 +00:00
256 lines
6.2 KiB
C
256 lines
6.2 KiB
C
/*
|
|
* ReactOS calc
|
|
*
|
|
* calc.c
|
|
*
|
|
* Copyright (C) 2002 Robert Dickenson <robd@reactos.org>
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
*/
|
|
|
|
#define WIN32_LEAN_AND_MEAN // Exclude rarely-used stuff from Windows headers
|
|
#include <windows.h>
|
|
#include <tchar.h>
|
|
|
|
#include "main.h"
|
|
#include "button.h"
|
|
#include "settings.h"
|
|
|
|
|
|
// Global Variables:
|
|
HINSTANCE hInst;
|
|
HWND hDlgWnd;
|
|
TCHAR szTitle[MAX_LOADSTRING];
|
|
CALC_TYPES CalcType;
|
|
HACCEL hAccel;
|
|
|
|
BOOL bDigitGrouping = FALSE;
|
|
|
|
|
|
#define BEGIN_CMD_MAP(a) switch(##a) {
|
|
#define CMD_MAP_ENTRY(a, b) case a: b(); break;
|
|
#define END_CMD_MAP(a) }
|
|
|
|
|
|
BOOL OnCreate(HWND hWnd)
|
|
{
|
|
HMENU hMenu;
|
|
HMENU hViewMenu;
|
|
|
|
hMenu = GetMenu(hDlgWnd);
|
|
hViewMenu = GetSubMenu(hMenu, ID_MENU_VIEW);
|
|
if (bDigitGrouping) {
|
|
CheckMenuItem(hViewMenu, ID_VIEW_DIGIT_GROUPING, MF_BYCOMMAND|MF_CHECKED);
|
|
}
|
|
|
|
//SendMessage(hDlgWnd, WM_SETICON, ICON_BIG, (LPARAM)LoadIcon(hInst, MAKEINTRESOURCE(IDI_CALC)));
|
|
|
|
// Initialize the Windows Common Controls DLL
|
|
//InitCommonControls();
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
void OnEditCopy(void)
|
|
{
|
|
SendMessage(GetDlgItem(hDlgWnd, IDC_RESULT), WM_COMMAND, MAKELONG(ID_EDIT_COPY, 0), 0);
|
|
}
|
|
|
|
void OnEditPaste(void)
|
|
{
|
|
SendMessage(GetDlgItem(hDlgWnd, IDC_RESULT), WM_COMMAND, MAKELONG(ID_EDIT_PASTE, 0), 0);
|
|
}
|
|
|
|
void OnViewStandard(void)
|
|
{
|
|
CalcType = STANDARD;
|
|
DestroyWindow(hDlgWnd);
|
|
}
|
|
|
|
void OnViewScientific(void)
|
|
{
|
|
CalcType = SCIENTIFIC;
|
|
DestroyWindow(hDlgWnd);
|
|
}
|
|
|
|
void OnViewDigitGrouping(void)
|
|
{
|
|
HMENU hMenu = GetMenu(hDlgWnd);
|
|
HMENU hViewMenu = GetSubMenu(hMenu, ID_MENU_VIEW);
|
|
bDigitGrouping = !bDigitGrouping;
|
|
if (bDigitGrouping) {
|
|
CheckMenuItem(hViewMenu, ID_VIEW_DIGIT_GROUPING, MF_BYCOMMAND|MF_CHECKED);
|
|
} else {
|
|
CheckMenuItem(hViewMenu, ID_VIEW_DIGIT_GROUPING, MF_BYCOMMAND|MF_UNCHECKED);
|
|
}
|
|
}
|
|
|
|
void OnViewHex(void)
|
|
{
|
|
}
|
|
|
|
void OnViewDecimal(void)
|
|
{
|
|
}
|
|
|
|
void OnViewOctal(void)
|
|
{
|
|
}
|
|
|
|
void OnViewBinary(void)
|
|
{
|
|
}
|
|
|
|
void OnViewDegrees(void)
|
|
{
|
|
}
|
|
|
|
void OnViewRadians(void)
|
|
{
|
|
}
|
|
|
|
void OnViewGrads(void)
|
|
{
|
|
}
|
|
|
|
void OnHelpTopics(void)
|
|
{
|
|
WinHelp(hDlgWnd, _T("calc"), HELP_CONTENTS, 0);
|
|
}
|
|
|
|
void OnHelpAbout(void)
|
|
{
|
|
}
|
|
|
|
// Message handler for dialog box.
|
|
LRESULT CALLBACK CalcWndProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
|
|
{
|
|
switch (message) {
|
|
case WM_INITDIALOG:
|
|
hDlgWnd = hDlg;
|
|
InitColours();
|
|
return OnCreate(hDlg);
|
|
|
|
case WM_DRAWITEM:
|
|
DrawItem((LPDRAWITEMSTRUCT)lParam);
|
|
return TRUE;
|
|
|
|
case WM_COMMAND:
|
|
if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL) {
|
|
EndDialog(hDlg, LOWORD(wParam));
|
|
return TRUE;
|
|
}
|
|
|
|
if (HIWORD(wParam) == BN_CLICKED) {
|
|
switch (LOWORD(wParam)) {
|
|
// case IDC_OWNERDRAW:
|
|
// // application-defined processing
|
|
// break;
|
|
}
|
|
}
|
|
|
|
BEGIN_CMD_MAP(LOWORD(wParam))
|
|
CMD_MAP_ENTRY(ID_EDIT_COPY, OnEditCopy)
|
|
CMD_MAP_ENTRY(ID_EDIT_PASTE, OnEditPaste)
|
|
CMD_MAP_ENTRY(ID_VIEW_STANDARD, OnViewStandard)
|
|
CMD_MAP_ENTRY(ID_VIEW_SCIENTIFIC, OnViewScientific)
|
|
CMD_MAP_ENTRY(ID_VIEW_DIGIT_GROUPING, OnViewDigitGrouping)
|
|
CMD_MAP_ENTRY(ID_VIEW_HEX, OnViewHex)
|
|
CMD_MAP_ENTRY(ID_VIEW_DECIMAL, OnViewDecimal)
|
|
CMD_MAP_ENTRY(ID_VIEW_OCTAL, OnViewOctal)
|
|
CMD_MAP_ENTRY(ID_VIEW_BINARY, OnViewBinary)
|
|
CMD_MAP_ENTRY(ID_VIEW_DEGREES, OnViewDegrees)
|
|
CMD_MAP_ENTRY(ID_VIEW_RADIANS, OnViewRadians)
|
|
CMD_MAP_ENTRY(ID_VIEW_GRADS, OnViewGrads)
|
|
CMD_MAP_ENTRY(ID_HELP_TOPICS, OnHelpTopics)
|
|
CMD_MAP_ENTRY(ID_HELP_ABOUT, OnHelpAbout)
|
|
END_CMD_MAP(0)
|
|
break;
|
|
/*
|
|
case WM_KEYUP:
|
|
case WM_KEYDOWN:
|
|
{
|
|
MSG msg;
|
|
msg.hwnd = hDlg;
|
|
msg.message = message;
|
|
msg.wParam = wParam;
|
|
msg.lParam = lParam;
|
|
// msg.time;
|
|
// msg.pt;
|
|
if (TranslateAccelerator(hDlg, hAccel, &msg)) return 0;
|
|
}
|
|
break;
|
|
*/
|
|
case WM_NOTIFY:
|
|
{
|
|
int idctrl;
|
|
LPNMHDR pnmh;
|
|
idctrl = (int)wParam;
|
|
pnmh = (LPNMHDR)lParam;
|
|
/*
|
|
if ((pnmh->hwndFrom == hTabWnd) &&
|
|
(pnmh->idFrom == IDC_TAB) &&
|
|
(pnmh->code == TCN_SELCHANGE))
|
|
{
|
|
_OnTabWndSelChange();
|
|
}
|
|
*/
|
|
}
|
|
break;
|
|
|
|
case WM_DESTROY:
|
|
WinHelp(hDlgWnd, _T("regedit"), HELP_QUIT, 0);
|
|
return DefWindowProc(hDlg, message, wParam, lParam);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int APIENTRY WinMain(HINSTANCE hInstance,
|
|
HINSTANCE hPrevInstance,
|
|
LPSTR lpCmdLine,
|
|
int nCmdShow)
|
|
{
|
|
CALC_TYPES CurrentCalcType;
|
|
|
|
// Initialize global variables
|
|
hInst = hInstance;
|
|
LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
|
|
|
|
// Load our settings from the registry
|
|
LoadSettings();
|
|
|
|
hAccel = LoadAccelerators(hInstance, (LPCTSTR)IDR_ACCELERATOR);
|
|
|
|
do {
|
|
CurrentCalcType = CalcType;
|
|
switch (CalcType) {
|
|
case HP42S:
|
|
break;
|
|
case SCIENTIFIC:
|
|
DialogBox(hInst, (LPCTSTR)IDD_SCIENTIFIC, NULL, (DLGPROC)CalcWndProc);
|
|
break;
|
|
case STANDARD:
|
|
default:
|
|
DialogBox(hInst, (LPCTSTR)IDD_STANDARD, NULL, (DLGPROC)CalcWndProc);
|
|
break;
|
|
}
|
|
} while (CalcType != CurrentCalcType);
|
|
|
|
// Save our settings to the registry
|
|
SaveSettings();
|
|
return 0;
|
|
}
|
|
|