[sword-cvs] sword/apps/windoze/CBuilder5/BibleCS sword.cpp,1.43,1.44

sword@www.crosswire.org sword@www.crosswire.org
Thu, 19 Jun 2003 23:15:08 -0700


Update of /usr/local/cvsroot/sword/apps/windoze/CBuilder5/BibleCS
In directory www:/tmp/cvs-serv30517

Modified Files:
	sword.cpp 
Log Message:
minor private protocol fix?

Index: sword.cpp
===================================================================
RCS file: /usr/local/cvsroot/sword/apps/windoze/CBuilder5/BibleCS/sword.cpp,v
retrieving revision 1.43
retrieving revision 1.44
diff -C2 -d -r1.43 -r1.44
*** sword.cpp	12 Jun 2003 02:03:34 -0000	1.43
--- sword.cpp	20 Jun 2003 06:15:05 -0000	1.44
***************
*** 66,70 ****
--- 66,73 ----
  
  			 // see if there's a previous instance running
+                          AnsiString titleString = Application->Title;
+                          Application->Title = "";
  			 otherInst = ::FindWindow(NULL, "The SWORD Project");
+                          Application->Title = titleString;
  			 // if so, and we have an argument, send the argument to the other instance
  			 if (*lpCmdLine) {
***************
*** 101,105 ****
  				}
  				startVerse = buf;
- 				
  
  				// TODO 5: if we have a cmdline argument, figure we have to change directories.  BAD, FIX.
--- 104,107 ----
***************
*** 168,188 ****
  		Application->ProcessMessages();
  		Application->CreateForm(__classid(TForm1), &Form1);
! 		Application->CreateForm(__classid(TAboutBox), &AboutBox);
! 		Application->CreateForm(__classid(TbookmarkForm), &bookmarkForm);
! 		Application->CreateForm(__classid(TNewBMfrm), &NewBMfrm);
! 		Application->CreateForm(__classid(TOptionsfrm), &Optionsfrm);
! 		Application->CreateForm(__classid(TsearchForm), &searchForm);
! 		Application->CreateForm(__classid(TModInstFrm), &ModInstFrm);
! 		Application->CreateForm(__classid(TVerseListForm), &VerseListForm);
! 		Application->CreateForm(__classid(TEditEntryForm), &EditEntryForm);
! 		Application->CreateForm(__classid(TVerseSelFrm), &VerseSelFrm);
! 		Application->CreateForm(__classid(TRangeMaintForm), &RangeMaintForm);
! 		Application->CreateForm(__classid(TModVisForm), &ModVisForm);
! 		Application->CreateForm(__classid(TDevOfTheDay2), &DevOfTheDay2);
! 		Application->CreateForm(__classid(TForm3), &Form3);
! 		Application->CreateForm(__classid(TRTFHintForm), &RTFHintForm);
! 		Application->CreateForm(__classid(TPreviewForm), &PreviewForm);
! 		Application->CreateForm(__classid(TPrintForm), &PrintForm);
! 		Application->Run();
  	}
  	catch (Exception &exception) {
--- 170,190 ----
  		Application->ProcessMessages();
  		Application->CreateForm(__classid(TForm1), &Form1);
!                  Application->CreateForm(__classid(TAboutBox), &AboutBox);
!                  Application->CreateForm(__classid(TbookmarkForm), &bookmarkForm);
!                  Application->CreateForm(__classid(TNewBMfrm), &NewBMfrm);
!                  Application->CreateForm(__classid(TOptionsfrm), &Optionsfrm);
!                  Application->CreateForm(__classid(TsearchForm), &searchForm);
!                  Application->CreateForm(__classid(TModInstFrm), &ModInstFrm);
!                  Application->CreateForm(__classid(TVerseListForm), &VerseListForm);
!                  Application->CreateForm(__classid(TEditEntryForm), &EditEntryForm);
!                  Application->CreateForm(__classid(TVerseSelFrm), &VerseSelFrm);
!                  Application->CreateForm(__classid(TRangeMaintForm), &RangeMaintForm);
!                  Application->CreateForm(__classid(TModVisForm), &ModVisForm);
!                  Application->CreateForm(__classid(TDevOfTheDay2), &DevOfTheDay2);
!                  Application->CreateForm(__classid(TForm3), &Form3);
!                  Application->CreateForm(__classid(TRTFHintForm), &RTFHintForm);
!                  Application->CreateForm(__classid(TPreviewForm), &PreviewForm);
!                  Application->CreateForm(__classid(TPrintForm), &PrintForm);
!                  Application->Run();
  	}
  	catch (Exception &exception) {