Form1 DDDD@ DDDDDD DDDDI DDDDI DDDD@ DDDDDI DDDDD DDDDDI DDDDDDD DDDDDDDI DDDD@ DDDDDDD@ DDDDDDD DDDDDD@ DDDDDD DDDDD@ DDDDD DDDD@ DDDDDDDD DDDDDD@ DDDDDD DDDD@ Form1, MenuCombo Label2 &Group File1 *.exe;*.com;*.bat Button &Save MenuList Button Button &Configure... Button De&lete CaptionFrame Caption Option1 Option2 &Time Option3 Dat&eTime Button &Rename Button &Params Button &Help Timer1 Button A&bout... HistoryCombo HistoryCombo Label1 Histor&y Drive1 Frame1 Button &Normal Button &Maximized Button M&inimized MinMC Minimi&ze MC Button E&xit Label3 &File Label4 dri&ve Label5 Drive1_Change{ Dir1< Drive1| Drive Dir1_Change& File1 ListCounts ListIndex Frame1m Caption Dir1_ClickQ LastChangeD DIRSBOXCLICK Option1_Click Form_Click ConstantN FILEBOXCLICK Changei File1_Click Filename File1_DblClick Button_Click Frame1_DragDrop Source Command1_Click Index Button form1 Option2_ClickW Option3_Click Timer1_Timer TimeNow DateNowN CaptionType CaseCaptionTypeg @ Form_Load Option1e GotFocus* Option1_GotFocus Combo2_Change Combo1_Change5 HistoryCombo HistoryArray HISTORYBOXCLICKD HistoryCombo_Changec HistoryCombo_Click RunProg lastrunOK~ AddHistoryItem HistoryCombo_DblClick SelectCase History RunP' HistoryCombo_DragDrop HistoryCombo_DropDown HistoryCombo_GotFocus! CaptionFrame_DragDrop4 CaptionFrame Option2 valuen Option3- List1_Click` Frame2_DragDrop Llistcount Form2 MenuCtrlWord dialogbutton CurrentItem MenuCtrlExit] ProcessCtrlMenu CurrentGroupW Enabled False text1 Text MENULISTBOXCLICKi MenuList_Click MenuListu MenuArrayA MenuCombo& menulistcombo Default_Button MenuList_DblClick. NumberofGroups text1_setfocus MaxGroups MNumArray MenuCombo_Changea MenuCombo_Click; CurentGroupi printmenuarray Then6 ExitButton ShowItemsR DIRBOXCLICKT MenuA SaveCurrent EditItemz EditGroup MENUCOMBOBOXCLICK MENUCOMBOCLICK Form3 DummyS DummyStr WriteInis IniFileName TempItemp TempPrg MaxHistory| Prog LoadIni ProgramM OnErrorM BadDrive Drive1_DragDrop Drive1_DragOver State Drive1_GotFocus Drive1_KeyDown KeyCodee Shift Drive1_KeyPress KeyAscii Drive1_KeyUpD Drive1_LostFocusv OldDrive7 OldIndexJ ResumeNext Form_Unload Canceln ForeColor: Black RedZ Form4 CRLF^ TimeStrq DTPref DateOpt DateStr UpDateTimerC timer1 Interval nextmaxhistory DefaultLaunch MousePointer pattern hidebutton_click0 Form4_HideButton_Click Screenc params ErrorHandler- IsDirty FixPr FixProgram filechoicearray= VarProg FullItem HistroyArray form5\ itemname Form_KeyPress GetHelp MCase3 Button_KeyDown ConfButtonN ConfButton_Click> Dir1_KeyDown File1_KeyDown Form_KeyDown HistoryCombo_KeyDown MenuCombo_KeyDownU MenuList_KeyDown Option1_KeyDown Option2_KeyDown Option3_KeyDownG filecheck filecheckarray form6 TimeToGo CludgeTimer GetModuleHandle lpModuleName Form_LinkClose HistoryIsDirty hWndZ GetModuleUsage hModule count FromHistory7 NotFromHistory Dirty0 InitializeCombos InitializeValues$ hidebutton_clickForm4 ClearCombos HideTest comboj Button_KeyPress Button_KeyUp Button_LostFocus Label1_Click Label2_Click MinJaws_Click NoValidItem API calls used during loading of form1 to see if MC is already running Kernel3 Kernel Drive1_Change Error handler to cope with empty diskette drives Shouldn't be needed but there are persistent rumors of problems if you don't fix it Problem with Drive " Fix and Try Again (if you wish)" Restore Drive if chosen one unavailable Dir1_Change synchronizes diretory and file list boxess Dir1_Click File1_Click File1_DblClick Button_Click Run buttonso Handles Associations Handles Associations since item 0 is group name Handles Associations Exit3 Changes might not be saved!! Save Configuration?" History changes not saved!!" Save Configuration?" Params No Item Chosen You must click on an item first" since iten 0 is group name NOTADD No Group Chosen" Add or Choose a Group" DELETE RENAME index=7" Group/Item" &Group" &Item Configureo About button Option1_Click Option2_Click Option3_Click Timer1_Timer Form_Load Code below checks for the program already being loaded. Would be easy if VB didn't protect you from load info!!! MC.EXE MC is already running" Load another copy? turn on hour glass HistoryCombo_Click HistoryCombo_GotFocus MenuList_Click MenuList_DblClick MenuCombo_Click Drive1_GotFocus Form_Unload Changes might not be saved!! Save Configuration?" History changes not saved!!" Save Configuration?" CludgeTimer needed because you crash if you try to exit Windows with MC loaded if you try to unload directly!!! Button_KeyDown This needs to be repeated endlessly because of quirks in VB!!! Dir1_KeyDown Drive1_KeyDown File1_KeyDown Form_KeyDown HistoryCombo_KeyDown MenuCombo_KeyDown MenuList_KeyDown Option1_KeyDown Option2_KeyDown Option3_KeyDown