Context Navigation

source: trunk/dll/key.c@ 907

Visit:

Last change on this file since 907 was 907, checked in by Steven Levine, 18 years ago
Avoid out of memory traps in Compare Directories Rework Compare Directories progress display for 2 second update rate Start refactoring to reduce dependence on fm3dll.h Add timer services (IsITimerExpired etc.)
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 9.8 KB

Rev	Line
[2]	1
[119]	2	/***********************************************************************
	3
	4	$Id: key.c 907 2008-01-06 07:26:17Z stevenhl $
	5
	6	About dialogs
	7
	8	Copyright (c) 1993-98 M. Kimes
	9	Copyright (c) 2004 Steven H. Levine
	10
[793]	11	Revisions
[775]	12	01 Nov 04 SHL Rename SKULL? defines to avoid rc issues
	13	06 Aug 07 GKY Reduce DosSleep times (ticket 148)
[793]	14	20 Aug 07 GKY Move #pragma alloc_text to end for OpenWatcom compat
[119]	15
[775]	16
[119]	17	***********************************************************************/
	18
[907]	19	#include <string.h>
	20
[2]	21	#define INCL_DOS
	22	#define INCL_WIN
[907]	23	#define INCL_LONGLONG // dircnrs.h
[2]	24
	25	#include "fm3dlg.h"
	26	#include "fm3str.h"
	27	#include "version.h"
[907]	28	#include "errutil.h" // Dos_Error...
	29	#include "strutil.h" // GetPString
	30	#include "fm3dll.h"
[2]	31
	32	#pragma data_seg(DATA1)
	33
[551]	34	MRESULT EXPENTRY AuthorDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[119]	35	{
[551]	36	return WinDefDlgProc(hwnd, msg, mp1, mp2);
[2]	37	}
	38
[551]	39	MRESULT EXPENTRY AboutDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
[119]	40	{
[551]	41	SWP swp;
	42	static HAB hab = 0;
	43	BOOL no = FALSE;
[2]	44	static BOOL pause = FALSE;
[551]	45	static INT width, direction, ticktock, counter = 0;
	46	static HPOINTER stick1, stick2, stick3, stick4, stick12, stick22, stick32,
	47	stick42, stick5, stick52;
[2]	48
[551]	49	switch (msg) {
	50	case WM_INITDLG:
	51	if (hab) {
	52	WinDismissDlg(hwnd, 0);
[2]	53	break;
[551]	54	}
	55	if (mp2)
	56	pause = TRUE;
	57	else
	58	pause = FALSE;
	59	AboutBox = hwnd;
	60	hab = WinQueryAnchorBlock(hwnd);
	61	WinQueryWindowPos(hwnd, &swp);
	62	width = swp.cx;
	63	{
	64	CHAR s[81];
[2]	65
[551]	66	sprintf(s,
	67	"%s %d.%02d%s",
	68	GetPString(IDS_VERSIONTEXT), VERMAJOR, VERMINOR, VERREALMINOR);
	69	WinSetDlgItemText(hwnd, ABT_VERSION, s);
	70	}
	71	if (!strcmp(realappname, "FM/4"))
	72	WinSetDlgItemText(hwnd, ABT_PROGNAME, GetPString(IDS_FM2LITETEXT));
	73	if (!pause) {
	74	stick1 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, ID_STICK1);
	75	stick2 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, ID_STICK2);
	76	stick3 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, ID_STICK3);
	77	stick4 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, ID_STICK4);
	78	stick5 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, ID_STICK5);
	79	stick12 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, ID_STICK12);
	80	stick22 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, ID_STICK22);
	81	stick32 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, ID_STICK32);
	82	stick42 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, ID_STICK42);
	83	stick52 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, ID_STICK52);
	84	direction = 2;
	85	ticktock = 0;
	86	WinStartTimer(hab, hwnd, ID_TIMER, 164);
	87	PostMsg(hwnd, UM_SETUP, MPVOID, MPVOID);
	88	}
	89	break;
[2]	90
[551]	91	case UM_SETUP:
	92	if (counter++ > 1) {
[2]	93
[551]	94	HPOINTER hbm, sk0, sk1, sk2, sk3, sk4, sk5, sk6, sk7, sk8, sk9;
	95
	96	hbm = (HPOINTER) WinSendDlgItemMsg(hwnd,
	97	ABT_ICON,
	98	SM_QUERYHANDLE, MPVOID, MPVOID);
	99	if (hbm) {
	100	sk0 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, SKULL0_ICON);
	101	sk1 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, SKULL1_ICON);
	102	sk2 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, SKULL2_ICON);
	103	sk3 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, SKULL3_ICON);
	104	sk4 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, SKULL4_ICON);
	105	sk5 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, SKULL5_ICON);
	106	sk6 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, SKULL6_ICON);
	107	sk7 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, SKULL7_ICON);
	108	sk8 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, SKULL8_ICON);
	109	sk9 = WinLoadPointer(HWND_DESKTOP, FM3ModHandle, SKULL9_ICON);
	110	if (sk0 && sk1 && sk2 && sk3 && sk4 && sk5 && sk6 && sk7 &&
	111	sk8 && sk9) {
	112	WinShowWindow(WinWindowFromID(hwnd, ABT_ICON), FALSE);
	113	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	114	MPFROMLONG(sk0), MPVOID);
	115	WinShowWindow(WinWindowFromID(hwnd, ABT_ICON), TRUE);
[771]	116	DosSleep(16);
[551]	117	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	118	MPFROMLONG(sk1), MPVOID);
[814]	119	DosSleep(16);//05 Aug 07 GKY 33
[551]	120	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	121	MPFROMLONG(sk2), MPVOID);
[771]	122	DosSleep(16);//05 Aug 07 GKY 33
[551]	123	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	124	MPFROMLONG(sk3), MPVOID);
[771]	125	DosSleep(16);//05 Aug 07 GKY 33
[551]	126	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	127	MPFROMLONG(sk4), MPVOID);
[771]	128	DosSleep(16);//05 Aug 07 GKY 33
[551]	129	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	130	MPFROMLONG(sk5), MPVOID);
[771]	131	DosSleep(16);//05 Aug 07 GKY 33
[551]	132	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	133	MPFROMLONG(sk6), MPVOID);
[771]	134	DosSleep(16);//05 Aug 07 GKY 33
[551]	135	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	136	MPFROMLONG(sk7), MPVOID);
[771]	137	DosSleep(16);//05 Aug 07 GKY 33
[551]	138	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	139	MPFROMLONG(sk8), MPVOID);
[771]	140	DosSleep(16);//05 Aug 07 GKY 33
[551]	141	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	142	MPFROMLONG(sk9), MPVOID);
[771]	143	DosSleep(100);//05 Aug 07 GKY 257
[551]	144	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	145	MPFROMLONG(sk8), MPVOID);
[771]	146	DosSleep(16);//05 Aug 07 GKY 33
[551]	147	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	148	MPFROMLONG(sk7), MPVOID);
[771]	149	DosSleep(16);//05 Aug 07 GKY 33
[551]	150	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	151	MPFROMLONG(sk6), MPVOID);
[771]	152	DosSleep(16);//05 Aug 07 GKY 33
[551]	153	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	154	MPFROMLONG(sk5), MPVOID);
[771]	155	DosSleep(16);//05 Aug 07 GKY 33
[551]	156	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	157	MPFROMLONG(sk4), MPVOID);
[771]	158	DosSleep(16);//05 Aug 07 GKY 33
[551]	159	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	160	MPFROMLONG(sk3), MPVOID);
[771]	161	DosSleep(16);//05 Aug 07 GKY 33
[551]	162	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	163	MPFROMLONG(sk2), MPVOID);
[771]	164	DosSleep(16);//05 Aug 07 GKY 33
[551]	165	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	166	MPFROMLONG(sk1), MPVOID);
[771]	167	DosSleep(16);//05 Aug 07 GKY 33
[551]	168	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	169	MPFROMLONG(sk0), MPVOID);
[771]	170	DosSleep(16);//05 Aug 07 GKY 33
[551]	171	WinShowWindow(WinWindowFromID(hwnd, ABT_ICON), FALSE);
	172	WinSendDlgItemMsg(hwnd, ABT_ICON, SM_SETHANDLE,
	173	MPFROMLONG(hbm), MPVOID);
	174	WinShowWindow(WinWindowFromID(hwnd, ABT_ICON), TRUE);
	175	}
	176	if (sk0)
	177	WinDestroyPointer(sk0);
	178	if (sk1)
	179	WinDestroyPointer(sk1);
	180	if (sk2)
	181	WinDestroyPointer(sk2);
	182	if (sk3)
	183	WinDestroyPointer(sk3);
	184	if (sk4)
	185	WinDestroyPointer(sk4);
	186	if (sk5)
	187	WinDestroyPointer(sk5);
	188	if (sk6)
	189	WinDestroyPointer(sk6);
	190	if (sk7)
	191	WinDestroyPointer(sk7);
	192	if (sk8)
	193	WinDestroyPointer(sk8);
	194	if (sk9)
	195	WinDestroyPointer(sk9);
[2]	196	}
[551]	197	}
	198	if (counter > 4)
	199	WinDlgBox(HWND_DESKTOP,
	200	hwnd, AuthorDlgProc, FM3ModHandle, AUTHOR_FRAME, NULL);
	201	return 0;
[2]	202
[551]	203	case UM_SETDIR:
	204	WinSetFocus(HWND_DESKTOP, HWND_DESKTOP);
[771]	205	DosSleep(250);//05 Aug 07 GKY 2500
[551]	206	return 0;
[2]	207
[551]	208	case WM_TIMER:
	209	WinQueryWindowPos(WinWindowFromID(hwnd, ABT_STICK1), &swp);
	210	if (swp.x + (swp.cx * 3) > width - 3) {
	211	direction = -2;
	212	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK1), FALSE);
	213	WinSendDlgItemMsg(hwnd,
	214	ABT_STICK1, SM_SETHANDLE, MPFROMLONG(stick3), MPVOID);
	215	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK1), TRUE);
	216	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK2), FALSE);
	217	WinSendDlgItemMsg(hwnd,
	218	ABT_STICK2,
	219	SM_SETHANDLE, MPFROMLONG(stick32), MPVOID);
	220	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK2), TRUE);
	221	no = TRUE;
	222	}
	223	else if (swp.x < 3) {
	224	direction = 2;
	225	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK2), FALSE);
	226	WinSendDlgItemMsg(hwnd, ABT_STICK2,
	227	SM_SETHANDLE, MPFROMLONG(stick32), MPVOID);
	228	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK2), TRUE);
	229	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK1), FALSE);
	230	WinSendDlgItemMsg(hwnd,
	231	ABT_STICK1, SM_SETHANDLE, MPFROMLONG(stick3), MPVOID);
	232	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK1), TRUE);
	233	no = TRUE;
	234	}
	235	swp.x += direction;
	236	WinSetWindowPos(WinWindowFromID(hwnd, ABT_STICK1),
	237	HWND_TOP, swp.x, swp.y, swp.cx, swp.cy, SWP_MOVE);
	238	WinSetWindowPos(WinWindowFromID(hwnd, ABT_ICON),
	239	HWND_TOP,
	240	swp.x + swp.cx, swp.y, swp.cx, swp.cy, SWP_MOVE);
	241	WinSetWindowPos(WinWindowFromID(hwnd, ABT_STICK2),
	242	HWND_TOP,
	243	swp.x + (swp.cx * 2), swp.y, swp.cx, swp.cy, SWP_MOVE);
	244	if (!no) {
	245	if (direction > 0) {
	246	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK1), FALSE);
	247	WinSendDlgItemMsg(hwnd,
	248	ABT_STICK1,
	249	SM_SETHANDLE,
	250	MPFROMLONG((ticktock) ? stick1 : stick2), MPVOID);
	251	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK1), TRUE);
	252	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK2), FALSE);
	253	WinSendDlgItemMsg(hwnd,
	254	ABT_STICK2,
	255	SM_SETHANDLE,
	256	MPFROMLONG((ticktock) ? stick42 : stick52), MPVOID);
	257	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK2), TRUE);
[2]	258	}
[551]	259	else {
	260	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK2), FALSE);
	261	WinSendDlgItemMsg(hwnd,
	262	ABT_STICK2,
	263	SM_SETHANDLE,
	264	MPFROMLONG((ticktock) ? stick12 : stick22), MPVOID);
	265	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK2), TRUE);
	266	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK1), FALSE);
	267	WinSendDlgItemMsg(hwnd,
	268	ABT_STICK1,
	269	SM_SETHANDLE,
	270	MPFROMLONG((ticktock) ? stick4 : stick5), MPVOID);
	271	WinShowWindow(WinWindowFromID(hwnd, ABT_STICK1), TRUE);
[2]	272	}
[551]	273	}
	274	ticktock = (ticktock) ? 0 : 1;
	275	break;
	276
	277	case WM_COMMAND:
	278	switch (SHORT1FROMMP(mp1)) {
	279	case ABT_VERSION:
	280	case DID_CANCEL:
	281	WinDismissDlg(hwnd, 0);
[2]	282	break;
[551]	283	}
	284	return 0;
[2]	285
[551]	286	case WM_CLOSE:
	287	WinDestroyWindow(hwnd);
	288	return 0;
[2]	289
[551]	290	case WM_DESTROY:
	291	if (hab) {
	292	if (!pause) {
	293	WinStopTimer(hab, hwnd, ID_TIMER);
	294	WinDestroyPointer(stick1);
	295	WinDestroyPointer(stick2);
	296	WinDestroyPointer(stick3);
	297	WinDestroyPointer(stick4);
	298	WinDestroyPointer(stick5);
	299	WinDestroyPointer(stick12);
	300	WinDestroyPointer(stick22);
	301	WinDestroyPointer(stick32);
	302	WinDestroyPointer(stick42);
	303	WinDestroyPointer(stick52);
[2]	304	}
[551]	305	hab = 0;
	306	}
	307	AboutBox = (HWND) 0;
	308	break;
[2]	309	}
[551]	310	return WinDefDlgProc(hwnd, msg, mp1, mp2);
[2]	311	}
[793]	312
	313	#pragma alloc_text(ABOUT,AboutDlgProc,AuthorDlgProc)

Note: See TracBrowser for help on using the repository browser.

Download in other formats: