source: branches/MKIMES/vdir.c@ 868

Last change on this file since 868 was 2, checked in by root, 23 years ago

Initial revision

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 2.1 KB
Line 
1#define INCL_DOS
2#define INCL_WIN
3
4#include <os2.h>
5#include <stdarg.h>
6#include <stdio.h>
7#include <stdlib.h>
8#include <string.h>
9#include <ctype.h>
10#include "dll\fm3dll.h"
11
12
13int main (int argc,char *argv[]) {
14
15 HAB hab;
16 HMQ hmq;
17 QMSG qmsg;
18 HWND hwndFrame;
19 CHAR fullname[CCHMAXPATH],*thisarg = NULL;
20 INT x;
21
22 strcpy(appname,"VDIR");
23 DosError(FERR_DISABLEHARDERR);
24 for(x = 1;x < argc;x++) {
25 if(!strchr("/;,`\'",*argv[x]) &&
26 (IsRoot(argv[x]) ||
27 !IsFile(argv[x]))) {
28 thisarg = argv[x];
29 break;
30 }
31 }
32
33 if(thisarg) {
34 if(DosQueryPathInfo(thisarg,
35 FIL_QUERYFULLNAME,
36 fullname,
37 sizeof(fullname)))
38 strcpy(fullname,thisarg);
39 }
40 else
41 save_dir(fullname);
42 hab = WinInitialize(0);
43 if(hab) {
44 hmq = WinCreateMsgQueue(hab,
45 1024);
46 if(hmq) {
47 if(InitFM3DLL(hab,argc,argv)) {
48 hwndFrame = StartDirCnr(HWND_DESKTOP,
49 fullname,
50 (HWND)0,
51 0);
52 if(hwndFrame) {
53 if(hwndHelp)
54 WinAssociateHelpInstance(hwndHelp,
55 hwndFrame);
56 for(;;) {
57 if(!WinGetMsg(hab,
58 &qmsg,
59 (HWND)0,
60 0,
61 0)) {
62 if(qmsg.hwnd)
63 qmsg.msg = WM_CLOSE;
64 else
65 break;
66 }
67 if(hwndBubble &&
68 ((qmsg.msg > (WM_BUTTON1DOWN - 1) &&
69 qmsg.msg < (WM_BUTTON3DBLCLK + 1)) ||
70 (qmsg.msg > (WM_CHORD - 1) &&
71 qmsg.msg < (WM_BUTTON3CLICK + 1))) &&
72 WinIsWindowVisible(hwndBubble))
73 WinShowWindow(hwndBubble,
74 FALSE);
75 WinDispatchMsg(hab,
76 &qmsg);
77 }
78 }
79 }
80 DosSleep(125L);
81 WinDestroyMsgQueue(hmq);
82 }
83 WinTerminate(hab);
84 }
85 return 0;
86}
87
Note: See TracBrowser for help on using the repository browser.