Context Navigation

source: trunk/dll/viewer.c@ 328

Visit:

Last change on this file since 328 was 328, checked in by root, 19 years ago
Use Runtime_Error
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 44.5 KB

Rev	Line
[2]	1
[130]	2	/***********************************************************************
	3
	4	$Id: viewer.c 328 2006-07-25 18:37:24Z root $
	5
	6	MLE text editor/viewer
	7
	8	Copyright (c) 1993-97 M. Kimes
[328]	9	Copyright (c) 2005, 2006 Steven H. Levine
[130]	10
	11	23 May 05 SHL Use QWL_USER
[328]	12	17 Jul 06 SHL Use Runtime_Error
[130]	13
	14	***********************************************************************/
	15
[2]	16	#define INCL_DOS
	17	#define INCL_WIN
[328]	18	#include <os2.h>
[2]	19
	20	#include <stdlib.h>
	21	#include <stdio.h>
	22	#include <string.h>
	23	#include <time.h>
	24	#include <io.h>
[328]	25
[2]	26	#include "fm3dll.h"
	27	#include "fm3dlg.h"
	28	#include "fm3str.h"
	29	#include "mle.h"
	30
	31	#pragma data_seg(DATA1)
[328]	32
	33	static PSZ pszSrcFile = __FILE__;
	34
[2]	35	#pragma alloc_text(VIEWER,MLEEditorProc,MLESubProc)
	36	#pragma alloc_text(STARTUP,StartMLEEditor)
	37
	38	#define hwndMLE WinWindowFromID(hwnd,MLE_MLE)
	39
	40	#define COLORS_MAX 2
	41
	42	#define COLORS_FOREGROUND 0
	43	#define COLORS_BACKGROUND 1
	44
	45	static LONG Colors[COLORS_MAX] = {COLR_BLACK,COLR_PALEGRAY};
	46	static BOOL Firsttime = TRUE;
	47
	48
	49	HWND StartMLEEditor (HWND hwndClient,INT flags,CHAR *filename,
	50	HWND hwndRestore) {
	51
	52	/*
	53	* create an editor window
	54	* bitmapped flags:
	55	* 1 = readonly
	56	* 2 = don't position window for non-desktop client
	57	* 4 = don't "kill app" when closed
	58	* 8 = as text
	59	* 16 = as binary
	60	*/
	61
	62	HWND hwndFrame,hwnd;
	63	XMLEWNDPTR *vw;
	64	ULONG flFrameFlags = FCF_SYSMENU \| FCF_SIZEBORDER \| FCF_ICON \|
	65	FCF_TITLEBAR \| FCF_MINMAX \| FCF_MENU \|
	66	FCF_ACCELTABLE \| FCF_NOBYTEALIGN;
	67
	68	if(fExternalViewer \|\| strcmp(realappname,FM3Str))
	69	hwndClient = HWND_DESKTOP;
	70	if((flags & 1) && fUseNewViewer)
	71	return StartViewer(hwndClient,(USHORT)flags,filename,hwndRestore);
	72
[328]	73	vw = xmallocz(sizeof(XMLEWNDPTR),pszSrcFile,__LINE__);
	74	if(!vw)
[2]	75	return (HWND)0;
	76	vw->size = sizeof(XMLEWNDPTR);
	77	if(flags & 1) {
	78	if(flags & 8)
	79	vw->hex = 2;
	80	else if(flags & 16)
	81	vw->hex = 1;
	82	else if(!fGuessType)
	83	vw->hex = 2;
	84	}
	85	else
	86	vw->hex = 2;
	87	vw->hwndParent = (hwndClient) ? hwndClient : HWND_DESKTOP;
	88	vw->srch.size = sizeof(SRCHPTR);
	89	if(flags & 4)
	90	vw->dontclose = TRUE;
	91	if(filename)
	92	strcpy(vw->exportfilename,filename);
	93	vw->hwndRestore = hwndRestore;
	94	if(ParentIsDesktop(hwndClient,hwndClient))
	95	flFrameFlags \|= FCF_TASKLIST;
	96	hwndFrame = WinCreateStdWindow(hwndClient,
	97	WS_VISIBLE,
	98	&flFrameFlags,
	99	GetPString(IDS_WCMLEEDITOR),
	100	NullStr,
	101	WS_VISIBLE \| fwsAnimate,
	102	FM3ModHandle,
	103	MLE_FRAME,
	104	&hwnd);
	105	if(hwndFrame) {
	106	vw->hwndFrame = hwndFrame;
	107	if(!ParentIsDesktop(hwndFrame,hwndClient) && !(flags & 2)) {
	108
	109	SWP swp;
	110
	111	FillClient(hwndClient,&swp,NULL,FALSE);
	112	WinSetWindowPos(hwndFrame,
	113	HWND_TOP,
	114	swp.x,
	115	swp.y,
	116	swp.cx,
	117	swp.cy,
	118	SWP_SIZE \| SWP_MOVE \| SWP_SHOW \| SWP_ACTIVATE \|
	119	SWP_ZORDER);
	120	}
	121	else if(flFrameFlags & FCF_TASKLIST) {
	122
	123	SWP swp,swpD;
	124	ULONG size = sizeof(swp);
	125	LONG cxScreen,cyScreen;
	126
	127	WinQueryTaskSizePos(WinQueryAnchorBlock(hwndFrame),
	128	0,
	129	&swp);
	130	if(PrfQueryProfileData(fmprof,
	131	appname,
	132	"ViewSizePos",
	133	&swpD,
	134	&size)) {
	135	cxScreen = WinQuerySysValue(HWND_DESKTOP,
	136	SV_CXSCREEN);
	137	cyScreen = WinQuerySysValue(HWND_DESKTOP,
	138	SV_CYSCREEN);
	139	if(swp.x + swpD.cx > cxScreen)
	140	swp.x = cxScreen - swpD.cx;
	141	if(swp.y + swpD.cy > cyScreen)
	142	swp.y = cyScreen - swpD.cy;
	143	swp.cx = swpD.cx;
	144	swp.cy = swpD.cy;
	145	}
	146	WinSetWindowPos(hwndFrame,
	147	HWND_TOP,
	148	swp.x,
	149	swp.y,
	150	swp.cx,
	151	swp.cy,
	152	SWP_SIZE \| SWP_MOVE \| SWP_SHOW \| SWP_ZORDER \|
	153	SWP_ACTIVATE);
	154	}
	155	MLEsetreadonly(hwndMLE,((flags & 1) != 0));
[130]	156	WinSetWindowPtr(hwnd,QWL_USER,(PVOID)vw);
[2]	157	if(!PostMsg(hwnd,
	158	UM_SETUP,
	159	MPVOID,
	160	MPFROMLONG(hwndClient)))
	161	WinSendMsg(hwnd,
	162	UM_SETUP,
	163	MPVOID,
	164	MPFROMLONG(hwndClient));
	165	}
	166	return hwndFrame;
	167	}
	168
	169
	170	MRESULT EXPENTRY MLESubProc (HWND hwnd,ULONG msg,MPARAM mp1,MPARAM mp2) {
	171
[130]	172	PFNWP oldproc = (PFNWP)WinQueryWindowPtr(hwnd,QWL_USER);
[2]	173	XMLEWNDPTR *vw;
	174
	175	switch(msg) {
	176	case WM_SETFOCUS:
	177	if(mp2)
	178	PostMsg(WinQueryWindow(hwnd,QW_PARENT),UM_SELECT,mp1,mp2);
	179	break;
	180
	181	case WM_CHAR:
[130]	182	vw = WinQueryWindowPtr(WinQueryWindow(hwnd,QW_PARENT),QWL_USER);
[2]	183	if(vw && vw->size == sizeof(XMLEWNDPTR) && vw->hex == 1) {
	184	if(!MLEgetreadonly(hwnd)) {
	185	WinSetSysValue(HWND_DESKTOP,SV_INSERTMODE,FALSE);
	186	if(vw->fWrap) {
	187	vw->fWrap = FALSE;
	188	MLEsetwrap(hwnd,FALSE);
	189	}
	190	MLEanctocur(hwnd);
	191	{
	192	static ULONG badoff[] = {11,14,17,20,23,26,29,32,35,38,41,44,
	193	47,0};
	194	ULONG line,pos,offset,len,x;
	195	MRESULT mr;
	196
	197	mr = oldproc(hwnd,msg,mp1,mp2);
	198
	199	len = MLEcurlinelen(hwnd);
	200	line = MLEcurline(hwnd);
	201	pos = MLEcurpos(hwnd);
	202	offset = len - MLElinelenleft(hwnd,pos);
	203	if(offset < 9) {
	204	if(!line \|\| offset == 8 \|\| line == MLEnumlines(hwnd) - 1)
	205	MLEsetcurpos(hwnd,pos + (9 - offset));
	206	else
	207	MLEsetcurpos(hwnd,MLEstartofline(hwnd,line + 1) + 9);
	208	}
	209	else if(offset >= 71) {
	210	if(vw->lastpos == offset - 1) {
	211	if(line < MLEnumlines(hwnd) - 1)
	212	MLEsetcurpos(hwnd,MLEstartofline(hwnd,line + 2) + 55);
	213	else
	214	MLEsetcurpos(hwnd,MLEstartofline(hwnd,line + 1) + 55);
	215	}
	216	else
	217	MLEsetcurpos(hwnd,MLEstartofline(hwnd,line) + 70);
	218	}
	219	else if(offset == 53) {
	220	if(line < MLEnumlines(hwnd) - 1)
	221	MLEsetcurpos(hwnd,MLEstartofline(hwnd,line + 1) + 9);
	222	else
	223	MLEsetcurpos(hwnd,MLEstartofline(hwnd,line) + 9);
	224	}
	225	else if(offset == 54) {
	226	if(line < MLEnumlines(hwnd) - 1)
	227	MLEsetcurpos(hwnd,MLEstartofline(hwnd,line + 1) + 70);
	228	else
	229	MLEsetcurpos(hwnd,MLEstartofline(hwnd,line) + 70);
	230	}
	231	else {
	232	for(x = 0;badoff[x];x++) {
	233	if(offset == badoff[x]) {
	234	if(vw->lastpos < pos)
	235	MLEsetcurpos(hwnd,pos + 1);
	236	else
	237	MLEsetcurpos(hwnd,pos - 1);
	238	}
	239	}
	240	}
	241	{
	242	CHAR s[80];
	243
	244	sprintf(s,
	245	GetPString(IDS_VIEWPOSSTUFFTEXT),
	246	len,
	247	line,
	248	pos,
	249	offset);
	250	if(hwndStatus)
	251	WinSetWindowText(hwndStatus,s);
	252	}
	253	vw->lastpos = MLEcurpos(hwnd);
	254	return mr;
	255	}
	256	}
	257	}
	258	break;
	259
	260	case WM_MENUEND:
[130]	261	vw = WinQueryWindowPtr(WinQueryWindow(hwnd,QW_PARENT),QWL_USER);
[2]	262	if(vw && vw->size == sizeof(XMLEWNDPTR)) {
	263	if(vw->hwndPopupMenu == (HWND)mp2) {
	264	WinDestroyWindow(vw->hwndPopupMenu);
	265	vw->hwndPopupMenu = (HWND)0;
	266	}
	267	}
	268	break;
	269
	270	case WM_CONTEXTMENU:
[130]	271	vw = WinQueryWindowPtr(WinQueryWindow(hwnd,QW_PARENT),QWL_USER);
[2]	272	if(vw && vw->size == sizeof(XMLEWNDPTR)) {
	273	if(!vw->hwndPopupMenu)
	274	vw->hwndPopupMenu = WinLoadMenu(HWND_DESKTOP,FM3ModHandle,MLE_POPUP);
	275	if(vw->hwndPopupMenu) {
	276	if(MLEgetreadonly(hwnd)) {
	277	WinEnableMenuItem(vw->hwndPopupMenu,MLE_UNDO,FALSE);
	278	WinEnableMenuItem(vw->hwndPopupMenu,MLE_CUTCLIP,FALSE);
	279	WinEnableMenuItem(vw->hwndPopupMenu,MLE_PASTECLIP,FALSE);
	280	WinEnableMenuItem(vw->hwndPopupMenu,MLE_CLEAR,FALSE);
	281	WinEnableMenuItem(vw->hwndPopupMenu,MLE_BLOCKMENU,FALSE);
	282	}
	283	else {
	284	WinEnableMenuItem(vw->hwndPopupMenu,MLE_UNDO,TRUE);
	285	WinEnableMenuItem(vw->hwndPopupMenu,MLE_CUTCLIP,TRUE);
	286	WinEnableMenuItem(vw->hwndPopupMenu,MLE_PASTECLIP,TRUE);
	287	WinEnableMenuItem(vw->hwndPopupMenu,MLE_CLEAR,TRUE);
	288	WinEnableMenuItem(vw->hwndPopupMenu,MLE_BLOCKMENU,TRUE);
	289	}
	290	if(!*ftprun)
	291	WinSendMsg(vw->hwndPopupMenu,MM_DELETEITEM,
	292	MPFROM2SHORT(MLE_VIEWFTP,FALSE),MPVOID);
	293	if(!*httprun)
	294	WinSendMsg(vw->hwndPopupMenu,MM_DELETEITEM,
	295	MPFROM2SHORT(MLE_VIEWHTTP,FALSE),MPVOID);
	296	PopupMenu(WinQueryWindow(hwnd,QW_PARENT),
	297	WinQueryWindow(hwnd,QW_PARENT),
	298	vw->hwndPopupMenu);
	299	}
	300	}
	301	break;
	302	}
	303	return oldproc(hwnd,msg,mp1,mp2);
	304	}
	305
	306
	307	MRESULT EXPENTRY MLEEditorProc (HWND hwnd,ULONG msg,MPARAM mp1,MPARAM mp2) {
	308
	309	XMLEWNDPTR *vw;
	310
	311	if(msg != WM_CREATE &&
	312	msg != UM_SETUP)
[130]	313	vw = (XMLEWNDPTR *)WinQueryWindowPtr(hwnd,QWL_USER);
[2]	314	else
	315	vw = NULL;
	316
	317	switch(msg) {
	318	case WM_CREATE:
	319	/* create MLE window */
	320	WinCreateWindow(hwnd,
	321	WC_MLE,
	322	(PSZ)NULL,
	323	MLS_HSCROLL \| MLS_VSCROLL \| MLS_BORDER \|
	324	WS_VISIBLE,
	325	0L,
	326	0L,
	327	0L,
	328	0L,
	329	hwnd,
	330	HWND_TOP,
	331	MLE_MLE,
	332	MPVOID,
	333	MPVOID);
	334	{
	335	PFNWP oldproc;
	336
	337	oldproc = WinSubclassWindow(WinWindowFromID(hwnd,MLE_MLE),
	338	(PFNWP)MLESubProc);
	339	if(oldproc)
	340	WinSetWindowPtr(WinWindowFromID(hwnd,MLE_MLE),
[186]	341	QWL_USER,
[2]	342	(PVOID)oldproc);
	343	}
	344	break;
	345
	346	case WM_INITMENU:
	347	switch(SHORT1FROMMP(mp1)) {
	348	case MLE_EDITMENU:
	349	{
	350	ULONG ret;
	351	CHAR lbl[162];
	352
	353	strcpy(lbl,GetPString(IDS_UNDOTEXT));
	354	ret = (ULONG)WinSendMsg(hwndMLE,MLM_QUERYUNDO,MPVOID,MPVOID);
	355	switch(HIUSHORT(ret)) {
	356	case WM_CHAR:
	357	case MLM_CUT:
	358	case MLM_CLEAR:
	359	case MLM_PASTE:
	360	WinEnableMenuItem((HWND)mp2,MLE_UNDO,TRUE);
	361	if(!LOUSHORT(ret))
	362	strcpy(lbl,GetPString(IDS_REDOTEXT));
	363	switch(HIUSHORT(ret)) {
	364	case WM_CHAR:
	365	strcat(lbl,GetPString(IDS_KEYSTROKEMENUTEXT));
	366	break;
	367	case MLM_CUT:
	368	strcat(lbl,GetPString(IDS_CUTTOCLIPMENUTEXT));
	369	break;
	370	case MLM_CLEAR:
	371	strcat(lbl,GetPString(IDS_CLEARSELMENUTEXT));
	372	break;
	373	case MLM_PASTE:
	374	strcat(lbl,GetPString(IDS_PASTEFROMCLIPMENUTEXT));
	375	break;
	376	}
	377	WinSetMenuItemText((HWND)mp2,MLE_UNDO,lbl);
	378	break;
	379	default:
	380	WinEnableMenuItem((HWND)mp2,MLE_UNDO,FALSE);
	381	break;
	382	}
	383	}
	384	break;
	385	}
	386	break;
	387
	388	case UM_SETUP2:
[130]	389	vw = WinQueryWindowPtr(hwnd,QWL_USER);
[2]	390	if(vw) {
	391
	392	CHAR s[CCHMAXPATH + 8];
	393
	394	sprintf(s,
	395	"%s: %s",
	396	FM2Str,
	397	(*vw->exportfilename) ?
	398	vw->exportfilename :
	399	GetPString(IDS_UNTITLEDTEXT));
	400	WinSetWindowText(WinQueryWindow(hwnd,
	401	QW_PARENT),
	402	s);
	403	if(WinQueryWindow(hwnd,QW_PARENT) ==
	404	WinQueryActiveWindow(WinQueryWindow(WinQueryWindow(hwnd,
	405	QW_PARENT),
	406	QW_PARENT)) &&
	407	!ParentIsDesktop(WinQueryWindow(hwnd,QW_PARENT),(HWND)0)) {
	408	if(hwndStatus2)
	409	WinSetWindowText(hwndStatus2,
	410	(*vw->exportfilename) ?
	411	vw->exportfilename :
	412	GetPString(IDS_UNTITLEDTEXT));
	413	if(fMoreButtons) {
	414	WinSetWindowText(hwndName,
	415	(*vw->exportfilename) ?
	416	vw->exportfilename :
	417	GetPString(IDS_UNTITLEDTEXT));
	418	WinSetWindowText(hwndDate,NullStr);
	419	WinSetWindowText(hwndAttr,NullStr);
	420	}
	421	if(hwndStatus)
	422	WinSetWindowText(hwndStatus,
	423	GetPString(IDS_INTERNALVIEWEREDITORTITLETEXT));
	424	}
	425	}
	426	return 0;
	427
	428	case UM_SETUP:
[130]	429	vw = WinQueryWindowPtr(hwnd,QWL_USER);
[2]	430	if(vw) {
	431	vw->hab = WinQueryAnchorBlock(hwnd);
	432	WinSendMsg(hwnd,UM_SETUP2,MPVOID,MPVOID);
	433	/* set up initial MLE conditions */
	434	vw->srch.hwndmle = hwndMLE;
	435	MLEsetcurpos(hwndMLE,0L);
	436	MLEclearall(hwndMLE);
	437	MLEsetlimit(hwndMLE,-1L);
	438	MLEsetformat(hwndMLE,MLFIE_NOTRANS);
	439	WinSetSysValue(HWND_DESKTOP,SV_INSERTMODE,TRUE);
	440	vw->fWrap = TRUE;
	441	vw->fStripTrail = TRUE;
	442	vw->fStripTrailLines = TRUE;
	443	vw->srch.fInsensitive = TRUE;
	444	vw->ExpandTabs = 4;
	445	vw->TabStops = 32;
	446	{
	447	ULONG size;
	448
	449	size = sizeof(BOOL);
	450	PrfQueryProfileData(fmprof,
	451	FM3Str,
	452	"MLEWrap",
	453	(PVOID)&vw->fWrap,
	454	&size);
	455	size = sizeof(BOOL);
	456	PrfQueryProfileData(fmprof,
	457	FM3Str,
	458	"MLEstriptrail",
	459	(PVOID)&vw->fStripTrail,
	460	&size);
	461	size = sizeof(BOOL);
	462	PrfQueryProfileData(fmprof,
	463	FM3Str,
	464	"MLEstriptraillines",
	465	(PVOID)&vw->fStripTrailLines,
	466	&size);
	467	size = sizeof(BOOL);
	468	PrfQueryProfileData(fmprof,
	469	FM3Str,
	470	"MLEInsensitve",
	471	(PVOID)&vw->srch.fInsensitive,
	472	&size);
	473	size = sizeof(INT);
	474	PrfQueryProfileData(fmprof,
	475	FM3Str,
	476	"MLEExpandTabs",
	477	(PVOID)&vw->ExpandTabs,
	478	&size);
	479	size = sizeof(INT);
	480	PrfQueryProfileData(fmprof,
	481	FM3Str,
	482	"MLETabStops",
	483	(PVOID)&vw->TabStops,
	484	&size);
	485	}
	486	vw->accel = WinQueryAccelTable(vw->hab,
	487	WinQueryWindow(hwnd,QW_PARENT));
	488	vw->hwndMenu = WinWindowFromID(WinQueryWindow(hwnd,QW_PARENT),
	489	FID_MENU);
	490	vw->ch = FALSE;
	491	MLEsetchanged(hwndMLE,FALSE);
	492	{
	493	MRESULT ret = 0;
	494
	495	if(vw->hwndMenu) {
	496	SetMenuCheck(vw->hwndMenu,
	497	MLE_TOGWRAP,
	498	&vw->fWrap,
	499	FALSE,
	500	NULL);
	501	SetMenuCheck(vw->hwndMenu,
	502	MLE_STRIPTRAILBLANKS,
	503	&vw->fStripTrail,
	504	FALSE,
	505	NULL);
	506	SetMenuCheck(vw->hwndMenu,
	507	MLE_STRIPTRAILLINES,
	508	&vw->fStripTrailLines,
	509	FALSE,
	510	NULL);
	511	{
	512	BOOL tempbool = (vw->ExpandTabs != 0);
	513
	514	SetMenuCheck(vw->hwndMenu,
	515	MLE_EXPANDTABS,
	516	&tempbool,
	517	FALSE,
	518	NULL);
	519	}
	520	SetMenuCheck(vw->hwndMenu,
	521	MLE_SENSITIVE,
	522	&vw->srch.fInsensitive,
	523	FALSE,
	524	NULL);
	525	}
	526	MLEsetwrap(hwndMLE,vw->fWrap);
	527	{
	528	ULONG CpList[2];
	529	ULONG CpSize;
	530
	531	if(!DosQueryCp(sizeof(CpList),
	532	CpList,
	533	&CpSize) &&
	534	CpSize)
	535	vw->cp = CpList[0];
	536	}
	537	{
	538	ULONG size = sizeof(FATTRS),cps[50],len,x;
	539	HMQ hmq;
	540
	541	if(!PrfQueryProfileData(fmprof,
	542	FM3Str,
	543	"MLEFont",
	544	&vw->fattrs,
	545	&size) \|\| size != sizeof(FATTRS)) {
	546	vw->fattrs.usRecordLength = sizeof(FATTRS);
	547	vw->fattrs.lMaxBaselineExt = 16;
	548	vw->fattrs.lAveCharWidth = 8;
	549	strcpy(vw->fattrs.szFacename,
	550	GetPString(IDS_SYSMONOTEXT));
	551	vw->fattrs.usCodePage = (USHORT)vw->cp;
	552	}
	553	else
	554	vw->cp = vw->fattrs.usCodePage;
	555	if(!DosQueryCp(sizeof(cps),
	556	cps,
	557	&len)) {
	558	for(x = 0;x < len / sizeof(ULONG);x++) {
	559	if(cps[x] == (ULONG)vw->cp) {
	560	hmq = WinQueryWindowULong(hwnd,
	561	QWL_HMQ);
	562	WinSetCp(hmq,vw->cp);
	563	break;
	564	}
	565	}
	566	}
	567	DosSetProcessCp(vw->cp);
	568	WinSendMsg(hwndMLE,
	569	MLM_SETFONT,
	570	MPFROMP(&vw->fattrs),
	571	MPVOID);
	572	}
	573	if(Firsttime) {
	574
	575	ULONG size;
	576
	577	Firsttime = FALSE;
	578	size = sizeof(ULONG);
	579	PrfQueryProfileData(fmprof,
	580	FM3Str,
	581	"MLEBackgroundcolor",
	582	&Colors[COLORS_BACKGROUND],
	583	&size);
	584	size = sizeof(ULONG);
	585	PrfQueryProfileData(fmprof,
	586	FM3Str,
	587	"MLEForegroundcolor",
	588	&Colors[COLORS_FOREGROUND],
	589	&size);
	590	}
	591	WinSendMsg(hwndMLE,
	592	MLM_SETBACKCOLOR,
	593	MPFROMLONG(standardcolors[Colors[COLORS_BACKGROUND]]),
	594	MPVOID);
	595	WinSendMsg(hwndMLE,
	596	MLM_SETTEXTCOLOR,
	597	MPFROMLONG(standardcolors[Colors[COLORS_FOREGROUND]]),
	598	MPVOID);
	599	if(*vw->exportfilename)
	600	if(MLEbackgroundload(hwnd,
	601	UM_CONTAINER_FILLED,
	602	hwndMLE,
	603	vw->exportfilename,vw->hex) !=
	604	-1) {
	605	vw->busy = TRUE;
	606	WinEnableWindow(vw->hwndMenu,
	607	FALSE);
	608	}
	609	if(vw->busy \|\| MLEgetreadonly(hwndMLE)) {
	610	disable_menuitem(vw->hwndMenu,
	611	MLE_FILEMENU,
	612	FALSE);
	613	disable_menuitem(vw->hwndMenu,
	614	MLE_CUTCLIP,
	615	FALSE);
	616	disable_menuitem(vw->hwndMenu,
	617	MLE_PASTECLIP,
	618	FALSE);
	619	disable_menuitem(vw->hwndMenu,
	620	MLE_CLEAR,
	621	FALSE);
	622	disable_menuitem(vw->hwndMenu,
	623	MLE_CUTLINE,
	624	FALSE);
	625	disable_menuitem(vw->hwndMenu,
	626	MLE_BLOCKMENU,
	627	FALSE);
	628	}
	629	return ret;
	630	}
	631	}
	632	return 0;
	633
	634	case UM_CONTAINER_FILLED: /* file was loaded */
	635	WinEnableWindow(vw->hwndMenu,
	636	TRUE);
	637	vw->busy = FALSE;
	638	if(vw->killme) {
	639	PostMsg(hwnd,
	640	WM_CLOSE,
	641	MPVOID,
	642	MPVOID);
	643	return 0;
	644	}
	645	if(!MLEgetreadonly(hwndMLE)) {
	646	disable_menuitem(vw->hwndMenu,
	647	MLE_FILEMENU,
	648	TRUE);
	649	disable_menuitem(vw->hwndMenu,
	650	MLE_CUTCLIP,
	651	TRUE);
	652	disable_menuitem(vw->hwndMenu,
	653	MLE_PASTECLIP,
	654	TRUE);
	655	disable_menuitem(vw->hwndMenu,
	656	MLE_CLEAR,
	657	TRUE);
	658	disable_menuitem(vw->hwndMenu,
	659	MLE_CUTLINE,
	660	TRUE);
	661	disable_menuitem(vw->hwndMenu,
	662	MLE_BLOCKMENU,
	663	TRUE);
	664	}
	665	if(mp1) {
	666	if(mp2) {
	667	vw->ch = FALSE;
	668	strcpy(vw->exportfilename,(CHAR *)mp2);
	669	}
	670	}
	671	else {
	672	vw->ch = FALSE;
	673	*vw->exportfilename = 0;
	674	}
	675	WinSendMsg(hwnd,UM_SETUP2,MPVOID,MPVOID);
	676	return 0;
	677
	678	case WM_SIZE:
	679	WinSetWindowPos(hwndMLE,
	680	HWND_TOP,
	681	0,
	682	0,
	683	SHORT1FROMMP(mp2),
	684	SHORT2FROMMP(mp2),
	685	SWP_MOVE \| SWP_SIZE);
	686	break;
	687
	688	case UM_SELECT:
	689	case WM_SETFOCUS: /* sling focus to MLE */
	690	if(mp2) {
	691	if(hwndMain && fAutoView)
	692	PostMsg(hwndMain,
	693	UM_LOADFILE,
	694	MPVOID,
	695	MPVOID);
	696	WinSendMsg(hwnd,UM_SETUP2,MPVOID,MPVOID);
	697	if(msg != UM_SELECT)
	698	PostMsg(hwnd,
	699	UM_FOCUSME,
	700	MPVOID,
	701	MPVOID);
	702	}
	703	if(msg == WM_SETFOCUS)
	704	break;
	705	return 0;
	706
	707	case UM_FOCUSME:
	708	WinSetFocus(HWND_DESKTOP, hwndMLE);
	709	return 0;
	710
	711	case WM_ERASEBACKGROUND:
	712	WinFillRect((HPS)mp1,(PRECTL)mp2,0x00d0d0d0);
	713	return 0;
	714
	715	case WM_PAINT:
	716	{
	717	RECTL rcl;
	718	HPS hps;
	719
	720	hps = WinBeginPaint(hwnd,(HPS)0,NULL);
	721	WinQueryWindowRect(hwnd,&rcl);
	722	WinFillRect(hps,&rcl,CLR_PALEGRAY);
	723	WinEndPaint(hps);
	724	}
	725	break;
	726
	727	case UM_LOADFILE:
	728	if((CHAR *)mp1) {
	729	// switch_to(mp1);
	730	if(MLEbackgroundload(hwnd,
	731	UM_CONTAINER_FILLED,
	732	hwndMLE,
	733	(CHAR *)mp1,
	734	vw->hex) !=
	735	-1) {
	736	vw->busy = TRUE;
	737	WinEnableWindow(vw->hwndMenu,
	738	FALSE);
	739	}
	740	}
	741	return 0;
	742
	743	case WM_CONTROL:
	744	switch(SHORT1FROMMP(mp1)) {
	745	case MLE_MLE:
	746	switch(SHORT2FROMMP(mp1)) {
	747	case MLN_CHANGE:
	748	if(!vw->ch)
	749	vw->ch = TRUE;
	750	break;
	751	}
	752	break;
	753	}
	754	return 0;
	755
	756	case WM_COMMAND:
	757	if(vw->busy && SHORT1FROMMP(mp1) != MLE_QUIT) {
	758	DosBeep(50,100);
	759	return 0;
	760	}
	761	switch(SHORT1FROMMP(mp1)) {
[328]	762	/*
[2]	763	case MLE_PREVIEW:
	764	preview_text(hwndMLE);
	765	break;
[328]	766	*/
[2]	767	case MLE_VIEWFTP:
	768	MLEinternet(hwndMLE,TRUE);
	769	break;
	770
	771	case MLE_VIEWHTTP:
	772	MLEinternet(hwndMLE,FALSE);
	773	break;
	774
	775	case IDM_NEXTWINDOW:
	776	WinSendMsg(hwndMLE,
	777	WM_CHAR,
	778	MPFROM2SHORT((KC_CHAR \| KC_VIRTUALKEY),
	779	MAKEUSHORT(1,9)),
	780	MPFROM2SHORT(9,VK_TAB));
	781	break;
	782
	783	case IDM_COLORPALETTE:
	784	{
	785	COLORS co;
	786	LONG temp[COLORS_MAX];
	787
	788	memset(&co,0,sizeof(co));
	789	co.size = sizeof(co);
	790	co.numcolors = COLORS_MAX;
	791	co.colors = Colors;
	792	co.descriptions = IDS_EDCOLORS1TEXT;
	793	co.origs = temp;
	794	co.prompt = IDS_EDCOLORSPROMPTTEXT;
	795	memcpy(temp,
	796	Colors,
	797	sizeof(LONG) * COLORS_MAX);
	798	if(WinDlgBox(HWND_DESKTOP,
	799	hwnd,
	800	ColorDlgProc,
	801	FM3ModHandle,
	802	COLOR_FRAME,
	803	(PVOID)&co)) {
	804	WinSendMsg(hwndMLE,
	805	MLM_SETTEXTCOLOR,
	806	MPFROMLONG(standardcolors[Colors[COLORS_FOREGROUND]]),
	807	MPVOID);
	808	PrfWriteProfileData(fmprof,
	809	FM3Str,
	810	"MLEForegroundcolor",
	811	&Colors[COLORS_FOREGROUND],
	812	sizeof(LONG));
	813	WinSendMsg(hwndMLE,
	814	MLM_SETBACKCOLOR,
	815	MPFROMLONG(standardcolors[Colors[COLORS_BACKGROUND]]),
	816	MPVOID);
	817	PrfWriteProfileData(fmprof,
	818	FM3Str,
	819	"MLEBackgroundcolor",
	820	&Colors[COLORS_BACKGROUND],
	821	sizeof(LONG));
	822	}
	823	}
	824	break;
	825
	826	case IDM_HELP:
	827	if(hwndHelp)
	828	WinSendMsg(hwndHelp,HM_DISPLAY_HELP,
	829	MPFROM2SHORT(HELP_EDITOR,0),
	830	MPFROMSHORT(HM_RESOURCEID));
	831	break;
	832
	833	case MLE_CODEPAGE:
	834	vw->cp = PickCodepage(hwnd);
	835	vw->fattrs.usCodePage = (USHORT)vw->cp;
	836	WinSendMsg(hwndMLE,
	837	MLM_SETFONT,
	838	MPFROMP(&vw->fattrs),
	839	MPVOID);
	840	PrfWriteProfileData(fmprof,
	841	FM3Str,
	842	"MLEFont",
	843	&vw->fattrs,
	844	sizeof(FATTRS));
	845	break;
	846
	847	case MLE_NEWFILE:
	848	if(!MLEgetreadonly(hwndMLE)) {
	849	if(vw->ch) {
	850
	851	APIRET temp;
	852
	853	temp = saymsg(MB_YESNOCANCEL \| MB_ICONEXCLAMATION,
	854	hwnd,
	855	NullStr,
	856	GetPString(IDS_SAVECHANGESTEXT));
	857	if(temp == MBID_CANCEL)
	858	break;
	859	if(temp == MBID_YES)
	860	WinSendMsg(hwnd,
	861	WM_COMMAND,
	862	MPFROM2SHORT(MLE_EXPORTFILE,0),
	863	MPVOID);
	864	}
	865	MLEclearall(hwndMLE);
	866	*vw->exportfilename = 0;
	867	vw->ch = FALSE;
	868	MLEsetchanged(hwndMLE,
	869	FALSE);
	870	WinSendMsg(hwnd,UM_SETUP2,MPVOID,MPVOID);
	871	}
	872	break;
	873
	874	case MLE_TOGGLEREADONLY:
[328]	875	if (vw->busy \|\| vw->hex == 1) {
	876	DosBeep(50,100);
	877	}
	878	else {
	879	/* I dunno why I gotta reset the colors... */
[2]	880	BOOL ro;
	881	LONG fColor,bColor;
	882
	883	fColor = (LONG)WinSendMsg(hwndMLE,
	884	MLM_QUERYTEXTCOLOR,
	885	MPVOID,
	886	MPVOID);
	887	bColor = (LONG)WinSendMsg(hwndMLE,
	888	MLM_QUERYBACKCOLOR,
	889	MPVOID,
	890	MPVOID);
	891	ro = MLEgetreadonly(hwndMLE);
	892	ro = (ro) ? FALSE : TRUE;
	893	MLEsetreadonly(hwndMLE,ro);
	894	disable_menuitem(vw->hwndMenu,
	895	MLE_FILEMENU,
	896	!ro);
	897	disable_menuitem(vw->hwndMenu,
	898	MLE_CUTCLIP,
	899	!ro);
	900	disable_menuitem(vw->hwndMenu,
	901	MLE_PASTECLIP,
	902	!ro);
	903	disable_menuitem(vw->hwndMenu,
	904	MLE_CLEAR,
	905	!ro);
	906	disable_menuitem(vw->hwndMenu,
	907	MLE_CUTLINE,
	908	!ro);
	909	disable_menuitem(vw->hwndMenu,
	910	MLE_BLOCKMENU,
	911	!ro);
	912	WinSendMsg(hwndMLE,
	913	MLM_SETTEXTCOLOR,
	914	MPFROMLONG(fColor),
	915	MPVOID);
	916	WinSendMsg(hwndMLE,
	917	MLM_SETBACKCOLOR,
	918	MPFROMLONG(bColor),
	919	MPVOID);
	920	}
	921	break;
	922
	923	case IDM_RENAME:
	924	case MLE_SETEXPORTFILE:
	925	if(vw && !MLEgetreadonly(hwndMLE)) {
	926
	927	CHAR filename[1027];
	928
	929	strcpy(filename,vw->exportfilename);
	930	if(export_filename(hwnd,filename,1)) {
	931	if(stricmp(filename,vw->exportfilename)) {
	932	vw->ch = TRUE;
	933	MLEsetchanged(hwndMLE,TRUE);
	934	strcpy(vw->exportfilename,filename);
	935	WinSendMsg(hwnd,UM_SETUP2,MPVOID,MPVOID);
	936	}
	937	}
	938	}
	939	break;
	940
	941	case MLE_EXPORTFILE:
	942	if(!MLEgetreadonly(hwndMLE)) {
	943
	944	LONG oldsize;
	945
	946	if(!*vw->exportfilename \|\|
	947	strchr(vw->exportfilename,'?') \|\|
	948	strchr(vw->exportfilename,'*')) {
	949	WinSendMsg(hwnd,
	950	WM_COMMAND,
	951	MPFROM2SHORT(MLE_SETEXPORTFILE,0),
	952	MPVOID);
	953	if(!*vw->exportfilename \|\|
	954	strchr(vw->exportfilename,'?') \|\|
	955	strchr(vw->exportfilename,'*'))
	956	break;
	957	}
[328]	958	{
	959	/* zero file length instead of unlink (protects EAs from loss) */
[2]	960	FILE *fp;
	961
[328]	962	fp = xfopen(vw->exportfilename,"r+",pszSrcFile,__LINE__);
	963	if (fp) {
[2]	964	oldsize = filelength(fileno(fp));
	965	DosSetFileSize(fileno(fp),0L);
	966	fclose(fp);
	967	}
	968	}
[328]	969	if (!MLEexportfile(hwndMLE,
[2]	970	vw->exportfilename,
	971	vw->ExpandTabs,
	972	vw->fStripTrailLines,
	973	vw->fStripTrail)) {
	974	FILE *fp;
[328]	975	Runtime_Error(pszSrcFile, __LINE__, "MLEexportfile");
	976	fp = xfopen(vw->exportfilename,"r+",pszSrcFile,__LINE__);
	977	if (fp) {
[2]	978	DosSetFileSize(fileno(fp),oldsize);
	979	fclose(fp);
	980	}
	981	}
	982	else {
	983	vw->ch = FALSE;
	984	MLEsetchanged(hwndMLE,FALSE);
	985	}
	986	}
	987	break;
	988
	989	case IDM_EDIT:
	990	case IDM_VIEW:
	991	case MLE_LOADFILE:
	992	if(vw->ch && !MLEgetreadonly(hwndMLE)) {
	993
	994	APIRET temp;
	995
	996	temp = saymsg(MB_YESNO,
	997	hwnd,
	998	NullStr,
	999	GetPString(IDS_LOADOVERTEXT));
	1000	if(temp != MBID_YES)
	1001	break;
	1002	}
	1003	/* intentional fallthru */
	1004	case MLE_INSERTFILE:
	1005	if(!MLEgetreadonly(hwndMLE)) {
	1006
	1007	CHAR filename[1027];
	1008
	1009	strcpy(filename,vw->importfilename);
	1010	if(insert_filename(hwnd,
	1011	filename,
	1012	(SHORT1FROMMP(mp1) == MLE_INSERTFILE) ?
	1013	FALSE :
	1014	TRUE,
	1015	FALSE)) {
	1016	strcpy(vw->importfilename,filename);
	1017	if(SHORT1FROMMP(mp1) == MLE_INSERTFILE)
	1018	MLEinsertfile(hwndMLE,filename);
	1019	else {
	1020	// switch_to(filename);
	1021	if(MLEbackgroundload(hwnd,
	1022	UM_CONTAINER_FILLED,
	1023	hwndMLE,
	1024	filename,
	1025	vw->hex) !=
	1026	-1) {
	1027	vw->busy = TRUE;
	1028	WinEnableWindow(vw->hwndMenu,
	1029	FALSE);
	1030	}
	1031	}
	1032	}
	1033	}
	1034	break;
	1035
	1036	case MLE_STRIPTRAILBLANKS:
	1037	SetMenuCheck(vw->hwndMenu,
	1038	MLE_STRIPTRAILBLANKS,
	1039	&vw->fStripTrail,
	1040	TRUE,
	1041	"MLEstriptrail");
	1042	break;
	1043
	1044	case MLE_STRIPTRAILLINES:
	1045	SetMenuCheck(vw->hwndMenu,
	1046	MLE_STRIPTRAILLINES,
	1047	&vw->fStripTrailLines,
	1048	TRUE,
	1049	"MLEstriptraillines");
	1050	break;
	1051
	1052	case MLE_TAB:
	1053	{
	1054	STRINGINPARMS sip;
	1055	CHAR s[35];
	1056
	1057	sip.help = GetPString(IDS_TABSTOPHELPTEXT);
	1058	sip.ret = s;
	1059	sprintf(s,
	1060	"%u",
	1061	vw->TabStops);
	1062	sip.prompt = GetPString(IDS_TABSTOPPROMPTTEXT);
	1063	sip.inputlen = 34;
	1064	sip.title = GetPString(IDS_TABSTOPTITLETEXT);
	1065	WinDlgBox(HWND_DESKTOP,
	1066	hwnd,
	1067	InputDlgProc,
	1068	FM3ModHandle,
	1069	STR_FRAME,
	1070	&sip);
	1071	if(*s && atoi(s) > -1 && atoi(s) < 512) {
	1072	vw->TabStops = atoi(s);
	1073	WinSendMsg(hwndMLE,
	1074	MLM_SETTABSTOP,
	1075	MPFROMLONG(vw->TabStops),
	1076	MPVOID);
	1077	PrfWriteProfileData(fmprof,
	1078	FM3Str,
	1079	"MLETabStops",
	1080	&vw->TabStops,
	1081	sizeof(INT));
	1082	}
	1083	}
	1084	break;
	1085
	1086	case MLE_EXPANDTABS:
	1087	{
	1088	BOOL tempbool;
	1089	STRINGINPARMS sip;
	1090	CHAR s[35];
	1091
	1092	sip.help = GetPString(IDS_EXTABHELPTEXT);
	1093	sip.ret = s;
	1094	sprintf(s,
	1095	"%u",
	1096	vw->ExpandTabs);
	1097	sip.prompt = GetPString(IDS_EXTABPROMPTTEXT);
	1098	sip.inputlen = 34;
	1099	sip.title = GetPString(IDS_EXTABTITLETEXT);
	1100	WinDlgBox(HWND_DESKTOP,
	1101	hwnd,
	1102	InputDlgProc,
	1103	FM3ModHandle,
	1104	STR_FRAME,
	1105	&sip);
	1106	if(*s && atoi(s) > -1 && atoi(s) < 33) {
	1107	vw->ExpandTabs = atoi(s);
	1108	tempbool = (vw->ExpandTabs != 0);
	1109	SetMenuCheck(vw->hwndMenu,
	1110	MLE_EXPANDTABS,
	1111	&tempbool,
	1112	FALSE,
	1113	NULL);
	1114	PrfWriteProfileData(fmprof,
	1115	FM3Str,
	1116	"MLEExpandTabs",
	1117	&vw->ExpandTabs,
	1118	sizeof(INT));
	1119	}
	1120	}
	1121	break;
	1122
	1123	case MLE_APPENDCLIP:
	1124	MLEdoblock(hwndMLE,
	1125	APPENDCLIP,
	1126	NULL);
	1127	break;
	1128
	1129	case MLE_WRITEBLOCK:
	1130	{
	1131	CHAR filename[1027];
	1132
	1133	strcpy(filename,vw->exportfilename);
	1134	if(export_filename(hwnd,filename,1))
	1135	MLEdoblock(hwndMLE,
	1136	WRITE,
	1137	filename);
	1138	}
	1139	break;
	1140
	1141	case MLE_FORMAT:
	1142	if(!MLEgetreadonly(hwndMLE))
	1143	MLEdoblock(hwndMLE,
	1144	FORMAT,
	1145	NULL);
	1146	break;
	1147
	1148	case MLE_XOR:
	1149	if(!MLEgetreadonly(hwndMLE))
	1150	MLEdoblock(hwndMLE,
	1151	XOR,
	1152	NULL);
	1153	break;
	1154
	1155	case MLE_ROT13:
	1156	if(!MLEgetreadonly(hwndMLE))
	1157	MLEdoblock(hwndMLE,
	1158	ROT13,
	1159	NULL);
	1160	break;
	1161
	1162	case MLE_UPPERCASE:
	1163	if(!MLEgetreadonly(hwndMLE))
	1164	MLEdoblock(hwndMLE,
	1165	UPPERCASE,
	1166	NULL);
	1167	break;
	1168
	1169	case MLE_LOWERCASE:
	1170	if(!MLEgetreadonly(hwndMLE))
	1171	MLEdoblock(hwndMLE,
	1172	LOWERCASE,
	1173	NULL);
	1174	break;
	1175
	1176	case MLE_TOGGLECASE:
	1177	if(!MLEgetreadonly(hwndMLE))
	1178	MLEdoblock(hwndMLE,
	1179	TOGGLECASE,
	1180	NULL);
	1181	break;
	1182
	1183	case MLE_JUMP:
	1184	{
	1185	ULONG numlines,linenum;
	1186	CHAR s[35],ss[133];
	1187	STRINGINPARMS sip;
	1188
	1189	sip.help = GetPString(IDS_NVLINEJUMPTEXT);
	1190	sip.ret = s;
	1191	*s = 0;
	1192	sip.prompt = ss;
	1193	sip.inputlen = 34;
	1194	sip.title = GetPString(IDS_NVLINEJUMPTITLETEXT);
	1195	numlines = MLEnumlines(hwndMLE);
[328]	1196	if(!numlines)
	1197	DosBeep(50,100);
	1198	else {
[2]	1199	sprintf(sip.prompt,
	1200	GetPString(IDS_NVJUMPTEXT),
	1201	GetPString(IDS_LINETEXT),
	1202	1,
	1203	numlines);
	1204	WinDlgBox(HWND_DESKTOP,
	1205	hwnd,
	1206	InputDlgProc,
	1207	FM3ModHandle,
	1208	STR_FRAME,
	1209	&sip);
[328]	1210	if (*s) {
[2]	1211	linenum = atol(s);
[328]	1212	if (linenum > 0 && linenum <= numlines) {
[2]	1213	MLEsettopline(hwndMLE,
	1214	MLEstartofline(hwndMLE,
	1215	linenum));
	1216	MLEsetcurpos(hwndMLE,
	1217	MLEstartofline(hwndMLE,
	1218	linenum));
	1219	}
	1220	}
	1221	}
	1222	}
	1223	break;
	1224
	1225	case MLE_CUTLINE: /* delete current line */
	1226	if(!MLEgetreadonly(hwndMLE))
	1227	MLEdeletecurline(hwndMLE);
	1228	break;
	1229
	1230	case IDM_DELETE:
	1231	case MLE_CLEAR:
	1232	if(!MLEgetreadonly(hwndMLE))
	1233	MLEclear(hwndMLE);
	1234	break;
	1235
	1236	case DID_CANCEL: /* escape */
	1237	if(MLEgetreadonly(hwndMLE))
	1238	PostMsg(hwnd,
	1239	WM_CLOSE,
	1240	MPVOID,
	1241	MPVOID);
	1242	else
	1243	PostMsg(hwnd,
	1244	WM_COMMAND,
	1245	MPFROM2SHORT(MLE_DESELECTALL,0),
	1246	MPVOID);
	1247	break;
	1248
	1249	case MLE_QUIT: /* outtahere */
	1250	MLEsetchanged(hwndMLE,
	1251	FALSE);
	1252	vw->ch = FALSE;
	1253	/* intentional fallthru */
	1254	case MLE_END:
	1255	PostMsg(hwnd,
	1256	WM_CLOSE,
	1257	MPVOID,
	1258	MPVOID);
	1259	break;
	1260
	1261	case MLE_SETFONT: /* select a new font */
	1262	SetMLEFont(hwndMLE,
	1263	&vw->fattrs,
	1264	0);
	1265	PrfWriteProfileData(fmprof,
	1266	FM3Str,
	1267	"MLEFont",
	1268	&vw->fattrs,
	1269	sizeof(FATTRS));
	1270	break;
	1271
	1272	case MLE_SELECTALL:
	1273	MLEselectall(hwndMLE);
	1274	break;
	1275
	1276	case MLE_DESELECTALL:
	1277	MLEsetcurpos(hwndMLE,
	1278	MLEcurpos(hwndMLE));
	1279	break;
	1280
	1281	case MLE_UNDO:
	1282	if(!MLEgetreadonly(hwndMLE))
	1283	MLEundo(hwndMLE);
	1284	break;
	1285
	1286	case IDM_SAVETOCLIP:
	1287	case MLE_COPYCLIP:
	1288	MLEcopy(hwndMLE);
	1289	break;
	1290
	1291	case MLE_CUTCLIP:
	1292	if(!MLEgetreadonly(hwndMLE))
	1293	MLEcut(hwndMLE);
	1294	break;
	1295
	1296	case IDM_COLLECTFROMCLIP:
	1297	case MLE_PASTECLIP:
	1298	if(!MLEgetreadonly(hwndMLE))
	1299	MLEpaste(hwndMLE);
	1300	break;
	1301
	1302	case MLE_SENSITIVE:
	1303	SetMenuCheck(vw->hwndMenu,
	1304	MLE_SENSITIVE,
	1305	&vw->srch.fInsensitive,
	1306	TRUE,
	1307	"MLEInsensitive");
	1308	break;
	1309
	1310	case MLE_FINDFIRST: /* search */
	1311	if(MLEfindfirst(hwnd,&vw->srch))
	1312	PostMsg(hwnd,
	1313	WM_COMMAND,
	1314	MPFROM2SHORT(MLE_FINDNEXT,0),
	1315	MPVOID);
	1316	break;
	1317
	1318	case IDM_GREP:
	1319	case MLE_FINDNEXT:
	1320	{
	1321	INT temp;
	1322
	1323	temp = MLEfindnext(hwnd,&vw->srch);
	1324	if(temp < 0)
	1325	PostMsg(hwnd,
	1326	WM_COMMAND,
	1327	MPFROM2SHORT(MLE_FINDFIRST,0),
	1328	MPVOID);
	1329	else if(temp > 0)
	1330	PostMsg(hwnd,
	1331	WM_COMMAND,
	1332	MPFROM2SHORT(MLE_FINDNEXT,0),
	1333	MPVOID);
	1334	}
	1335	break;
	1336
	1337	case MLE_TOGWRAP: /* toggle wrap mode */
	1338	if(vw->hex != 1) {
	1339	SetMenuCheck(vw->hwndMenu,
	1340	MLE_TOGWRAP,
	1341	&vw->fWrap,
	1342	TRUE,
	1343	"MLEWrap");
	1344	MLEsetwrap(hwndMLE,
	1345	vw->fWrap);
	1346	}
	1347	break;
	1348
	1349	case IDM_ABOUT:
	1350	case MLE_ABOUT:
	1351	saymsg(MB_ENTER \| MB_ICONASTERISK,
	1352	hwnd,
	1353	GetPString(IDS_VIEWABOUTTITLETEXT),
	1354	GetPString(IDS_VIEWABOUTTEXT));
	1355	break;
	1356	}
	1357	return 0;
	1358
	1359	case WM_SAVEAPPLICATION:
	1360	if(vw &&
	1361	ParentIsDesktop(hwnd,vw->hwndParent)) {
	1362
	1363	SWP swp;
	1364
	1365	WinQueryWindowPos(vw->hwndFrame,
	1366	&swp);
	1367	if(!(swp.fl & (SWP_HIDE \| SWP_MINIMIZE \| SWP_MAXIMIZE)))
	1368	PrfWriteProfileData(fmprof,
	1369	appname,
	1370	"ViewSizePos",
	1371	&swp,
	1372	sizeof(swp));
	1373	}
	1374	break;
	1375
	1376	case WM_CLOSE: /* outtahere */
	1377	WinSendMsg(hwnd,
	1378	WM_SAVEAPPLICATION,
	1379	MPVOID,
	1380	MPVOID);
	1381	if(vw) {
	1382	if(vw->busy) {
	1383	vw->killme = TRUE;
	1384	return 0;
	1385	}
	1386	if(vw->ch &&
	1387	!MLEgetreadonly(hwndMLE)) {
	1388
	1389	APIRET temp;
	1390
	1391	temp = saymsg(MB_YESNOCANCEL \| MB_ICONEXCLAMATION,
	1392	hwnd,
	1393	NullStr,
	1394	GetPString(IDS_SAVECHANGESTEXT));
	1395	if(temp == MBID_CANCEL)
	1396	return 0;
	1397	if(temp == MBID_YES)
	1398	WinSendMsg(hwnd,
	1399	WM_COMMAND,
	1400	MPFROM2SHORT(MLE_EXPORTFILE,0),
	1401	MPVOID);
	1402	}
	1403	}
	1404	WinDestroyWindow(WinQueryWindow(hwnd,QW_PARENT));
	1405	return 0;
	1406
	1407	case WM_DESTROY:
	1408	DosPostEventSem(CompactSem);
	1409	{
	1410	BOOL dontclose = FALSE;
	1411
	1412	if(vw) {
	1413	if(vw->hwndPopupMenu)
	1414	WinDestroyWindow(vw->hwndPopupMenu);
	1415	if(vw->accel)
	1416	WinDestroyAccelTable(vw->accel);
	1417	dontclose = vw->dontclose;
[130]	1418	WinSetWindowPtr(hwnd,QWL_USER,NULL);
[2]	1419	if(vw->hwndRestore) {
	1420
	1421	ULONG fl = SWP_SHOW \| SWP_ACTIVATE \| SWP_ZORDER;
	1422	SWP swp;
	1423
	1424	if(WinQueryWindowPos(vw->hwndRestore,
	1425	&swp)) {
	1426	if(!(swp.fl & SWP_MAXIMIZE))
	1427	fl \|= SWP_RESTORE;
	1428	WinSetWindowPos(vw->hwndRestore,
	1429	HWND_TOP,
	1430	0,
	1431	0,
	1432	0,
	1433	0,
	1434	fl);
	1435	}
	1436	}
	1437	free(vw);
	1438	}
	1439	if(!dontclose &&
	1440	ParentIsDesktop(hwnd,WinQueryWindow(WinQueryWindow(hwnd,
	1441	QW_PARENT),QW_PARENT))) {
	1442	if(!PostMsg((HWND)0,
	1443	WM_QUIT,
	1444	MPVOID,
	1445	MPVOID))
	1446	DosExit(EXIT_PROCESS,1);
	1447	}
	1448	}
	1449	break;
	1450	}
	1451	return WinDefWindowProc(hwnd,msg,mp1,mp2);
	1452	}
	1453

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

Download in other formats: