[sword-cvs] sword/apps/windoze/CBuilder5/BibleCS mainfrm.cpp,1.118,1.119 mainfrm.dfm,1.42,1.43

[sword@www.crosswire.org]

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

Modified Files:
	mainfrm.cpp mainfrm.dfm 
Log Message:
Added check marks to show the current modules selected for parralel display
Added Refresh on lookup change
Needs fixing: The back button doesn't log correctly :(

Index: mainfrm.cpp
===================================================================
RCS file: /usr/local/cvsroot/sword/apps/windoze/CBuilder5/BibleCS/mainfrm.cpp,v
retrieving revision 1.118
retrieving revision 1.119
diff -C2 -d -r1.118 -r1.119
*** mainfrm.cpp	13 Jun 2003 12:18:21 -0000	1.118
--- mainfrm.cpp	14 Jun 2003 23:13:57 -0000	1.119
***************
*** 432,436 ****
  			if (pc == LexDictPageControl)
  				FillDictKeys();
! 		}
  	}
  }
--- 432,444 ----
  			if (pc == LexDictPageControl)
  				FillDictKeys();
! 		}else if(pc->ActivePage->Caption == "PARALLEL")
!                 {
!                         parallelDisp->Display();
!                         pc->Hint = "PARALLEL";
! 			if (logmodstate)
! 				modstates.insert(modstates.begin(), new ModState(pc, pc->ActivePage, *DefaultStrKey));
! 			if (pc == LexDictPageControl)
! 				FillDictKeys();
!                 }
  	}
  }
***************
*** 2731,2734 ****
--- 2739,2744 ----
  				newitem = new TMenuItem(menu);
  				newitem->Caption = it->second->Name();
+                                 if(!strcmp(parallelDisp->mod[i].c_str(), newitem->Caption.c_str()))
+                                         newitem->Checked = true;
  				newitem->Hint = it->second->Description();
  				newitem->OnClick = ParallelMenuItemClick;

Index: mainfrm.dfm
===================================================================
RCS file: /usr/local/cvsroot/sword/apps/windoze/CBuilder5/BibleCS/mainfrm.dfm,v
retrieving revision 1.42
retrieving revision 1.43
diff -C2 -d -r1.42 -r1.43
*** mainfrm.dfm	12 Jun 2003 02:03:34 -0000	1.42
--- mainfrm.dfm	14 Jun 2003 23:13:57 -0000	1.43
***************
*** 1,5 ****
  object Form1: TForm1
!   Left = 505
!   Top = 214
    Width = 635
    Height = 475
--- 1,5 ----
  object Form1: TForm1
!   Left = 271
!   Top = 145
    Width = 635
    Height = 475
***************
*** 143,147 ****
      Top = 246
      Width = 627
!     Height = 168
      Align = alClient
      BevelOuter = bvNone
--- 143,147 ----
      Top = 246
      Width = 627
!     Height = 160
      Align = alClient
      BevelOuter = bvNone
***************
*** 154,158 ****
        Top = 0
        Width = 5
!       Height = 168
        Cursor = crHSplit
        Align = alRight
--- 154,158 ----
        Top = 0
        Width = 5
!       Height = 160
        Cursor = crHSplit
        Align = alRight
***************
*** 162,166 ****
        Top = 0
        Width = 437
!       Height = 168
        Hint = 'Lexicons / Dictionaries'
        Align = alClient
--- 162,166 ----
        Top = 0
        Width = 437
!       Height = 160
        Hint = 'Lexicons / Dictionaries'
        Align = alClient
***************
*** 182,186 ****
        Top = 0
        Width = 185
!       Height = 168
        Align = alRight
        Caption = 'Panel2'
--- 182,186 ----
        Top = 0
        Width = 185
!       Height = 160
        Align = alRight
        Caption = 'Panel2'
***************
*** 210,214 ****
          Top = 25
          Width = 183
!         Height = 142
          Align = alClient
          ItemHeight = 13
--- 210,214 ----
          Top = 25
          Width = 183
!         Height = 134
          Align = alClient
          ItemHeight = 13
***************
*** 220,224 ****
    object StatusBar1: TStatusBar
      Left = 0
!     Top = 414
      Width = 627
      Height = 15
--- 220,224 ----
    object StatusBar1: TStatusBar
      Left = 0
!     Top = 406
      Width = 627
      Height = 15
***************
*** 790,793 ****
--- 790,794 ----
    end
    object PopupMenu5: TPopupMenu
+     AutoHotkeys = maManual
      OnPopup = PopupMenu5Popup
      Left = 333