計算器外掛程式

2022-09-07 08:12:07 字數 3038 閱讀 7196

//

計算器.cpp : 定義應用程式的入口點。

//#include

"stdafx.h

"#include

"計算器.h

"#include

"resource.h

"#define max_loadstring 100

//全域性變數:

hinstance hinst; //

當前例項

tchar sztitle[max_loadstring]; //

標題欄文字

tchar szwindowclass[max_loadstring]; //

主視窗類名

//此**模組中包含的函式的前向宣告:

atom myregisterclass(hinstance hinstance);

bool initinstance(hinstance,

int);

lresult callback wndproc(hwnd, uint, wparam, lparam);

int_ptr callback about(hwnd, uint, wparam, lparam);

intapientry _twinmain(_in_ hinstance hinstance,

_in_opt_ hinstance hprevinstance,

_in_ lptstr lpcmdline,

_in_

intncmdshow)

//主訊息迴圈:

while (getmessage(&msg, null, 0, 0

))

return (int

) msg.wparam;}//

//函式: myregisterclass()

////

目的: 註冊視窗類。

//atom myregisterclass(hinstance hinstance)

////

函式: initinstance(hinstance, int)

////

目的: 儲存例項控制代碼並建立主視窗

////

注釋:

////

在此函式中,我們在全域性變數中儲存例項控制代碼並

//建立和顯示主程式視窗。

//bool initinstance(hinstance hinstance, int

ncmdshow)

showwindow(hwnd, ncmdshow);

updatewindow(hwnd);

return

true;}//

//函式: wndproc(hwnd, uint, wparam, lparam)

////

目的: 處理主視窗的訊息。

////

wm_command - 處理應用程式選單

//wm_paint - 繪製主視窗

//wm_destroy - 傳送退出訊息並返回

////

lresult callback wndproc(hwnd hwnd, uint message, wparam wparam, lparam lparam)

break

;

case

wm_command:

break

;

case

10004

:break

;

case

10005

:break

;

case

10006

:break

;

case

10007

:break

;

case

10008

:break

;

case

10009

:break

;

case

10010

:break

;

case

10011

:break

;

//+-*/

case

10012

:break

;

case

10013

:break

;

case

10014

:break

;

case

10015

:break

;

//case

10016

:break

;

case

10017

:break

;

case

idm_exit:

destroywindow(hwnd);

break

;

default

:

return

defwindowproc(hwnd, message, wparam, lparam);

}break

; }

case

wm_destroy:

postquitmessage(0);

break

;

default

:

return

defwindowproc(hwnd, message, wparam, lparam);

}return0;

}

實現計算器

dim boldot as boolean dim dblacc1,dblacc2 as double dim dblacc3 as double 10 dim strop as string private sub add num byval intnumber as integer if bol...

計算器修改

在做計算器介面修改這個專案中遇見的問題。先把需求說清楚,黑莓風格的計算器裡面有觸控和非觸控兩個流程。介面,功能,和座標是不一樣的。我是要在非觸控下做出觸控螢幕的介面,除了不能觸控以外,所有的功能都要和觸控螢幕下一樣。之前先是找到資源,然後替換資源,載入,調座標,調功能,調bug。資源很快就找到了,然...

簡單計算器

unit unit1 inte ce uses windows,messages,sysutils,variants,classes,graphics,controls,forms,dialogs,stdctrls,buttons,math math是數 算單元 type tform1 class ...