Update of /cvsroot/jvcl/dev/JVCL3/examples/JvMenus/BCB In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv5895/dev/JVCL3/examples/JvMenus/BCB Added Files: JvMenusExample.bpr JvMenusExample.cpp JvMenusExample.res MainForm.cpp MainForm.dfm MainForm.h Log Message: New demo for BCB --- NEW FILE: MainForm.h --- /****************************************************************** JEDI-VCL Demo Copyright (C) 2004 Project JEDI Original author: Olivier Sannier (ob...@me...) You may retrieve the latest version of this file at the JEDI-JVCL home page, located at http://jvcl.sourceforge.net The contents of this file are used with permission, subject to the Mozilla Public License Version 1.1 (the "License"); you may not use this file except in compliance with the License. You may obtain a copy of the License at http://www.mozilla.org/MPL/MPL-1_1Final.html Software distributed under the License is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for the specific language governing rights and limitations under the License. ******************************************************************/ // $Id: MainForm.h,v 1.1 2004/04/17 07:18:27 obones Exp $ //--------------------------------------------------------------------------- #ifndef MainFormH #define MainFormH //--------------------------------------------------------------------------- #include <Classes.hpp> #include <Controls.hpp> #include <StdCtrls.hpp> #include <Forms.hpp> #include "JvExComCtrls.hpp" #include "JvMenus.hpp" #include "JvToolBar.hpp" #include <ComCtrls.hpp> #include <ExtCtrls.hpp> #include <ImgList.hpp> #include <Menus.hpp> #include <ToolWin.hpp> //--------------------------------------------------------------------------- class TfrmMain : public TForm { __published: // IDE-managed Components TPanel *pnlPopup; TJvToolBar *jtbMenus; TButton *btnAddItems; TButton *btnChangeCaption; TPanel *pnlMarginPopup; TMemo *memExplanation; TJvMainMenu *jmnMain; TMenuItem *File1; TMenuItem *Try1; TMenuItem *N1; TMenuItem *Exit1; TMenuItem *Other1; TMenuItem *Sub11; TMenuItem *Hello1; TMenuItem *Plaf1; TMenuItem *Yop1; TMenuItem *Nice1; TMenuItem *Checked1; TMenuItem *N11; TMenuItem *Radio11; TMenuItem *Radio21; TMenuItem *Radio31; TMenuItem *N2; TMenuItem *SUb1; TMenuItem *SubAgain1; TImageList *imlImages; TJvPopupMenu *jpmPopup; TMenuItem *Popup11; TMenuItem *Popup21; TMenuItem *Checked2; TMenuItem *PopupSub1; TMenuItem *Yop2; TMenuItem *CheckedInSub1; TMenuItem *Yip1; TMenuItem *AfterPSub1; TJvPopupMenu *jpmMarginPopup; TMenuItem *Test1; TMenuItem *Testagain1; TJvStandardMenuItemPainter *jipMarginPainter; void __fastcall Exit1Click(TObject *Sender); void __fastcall Try1Click(TObject *Sender); void __fastcall btnAddItemsClick(TObject *Sender); void __fastcall btnChangeCaptionClick(TObject *Sender); private: // User declarations public: // User declarations __fastcall TfrmMain(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TfrmMain *frmMain; //--------------------------------------------------------------------------- #endif --- NEW FILE: JvMenusExample.cpp --- /****************************************************************** JEDI-VCL Demo Copyright (C) 2004 Project JEDI Original author: Olivier Sannier (ob...@me...) You may retrieve the latest version of this file at the JEDI-JVCL home page, located at http://jvcl.sourceforge.net The contents of this file are used with permission, subject to the Mozilla Public License Version 1.1 (the "License"); you may not use this file except in compliance with the License. You may obtain a copy of the License at http://www.mozilla.org/MPL/MPL-1_1Final.html Software distributed under the License is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for the specific language governing rights and limitations under the License. ******************************************************************/ // $Id: JvMenusExample.cpp,v 1.1 2004/04/17 07:18:27 obones Exp $ //--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop //--------------------------------------------------------------------------- USEFORM("MainForm.cpp", frmMain); //--------------------------------------------------------------------------- WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize(); Application->CreateForm(__classid(TfrmMain), &frmMain); Application->Run(); } catch (Exception &exception) { Application->ShowException(&exception); } catch (...) { try { throw Exception(""); } catch (Exception &exception) { Application->ShowException(&exception); } } return 0; } //--------------------------------------------------------------------------- --- NEW FILE: MainForm.dfm --- object frmMain: TfrmMain Left = 192 Top = 107 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'JvMenus example' ClientHeight = 273 ClientWidth = 453 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = jmnMain OldCreateOrder = False Position = poScreenCenter DesignSize = ( 453 273) PixelsPerInch = 96 TextHeight = 13 object pnlPopup: TPanel Left = 20 Top = 219 Width = 201 Height = 41 Anchors = [akLeft, akBottom] Caption = 'Right click here for XP Style popup' PopupMenu = jpmPopup TabOrder = 0 end object jtbMenus: TJvToolBar Left = 0 Top = 0 Width = 453 Height = 29 ButtonHeight = 21 ButtonWidth = 39 Caption = 'JvToolBar' Flat = True Menu = jmnMain ShowCaptions = True TabOrder = 1 end object btnAddItems: TButton Left = 240 Top = 40 Width = 129 Height = 25 Caption = 'Add items to menu' TabOrder = 2 OnClick = btnAddItemsClick end object btnChangeCaption: TButton Left = 84 Top = 40 Width = 129 Height = 25 Caption = 'Change caption' TabOrder = 3 OnClick = btnChangeCaptionClick end object pnlMarginPopup: TPanel Left = 232 Top = 219 Width = 201 Height = 41 Anchors = [akLeft, akBottom] Caption = 'Right click here for popup with margin' PopupMenu = jpmMarginPopup TabOrder = 4 end object memExplanation: TMemo Left = 16 Top = 76 Width = 417 Height = 125 Lines.Strings = ( 'This is the demo for TJvMainMenu and TJvMenu.' 'It shows the interaction between TJvMainMenu and TJvToolbar.' 'It also shows the concept of Item Painters introduced in the JVC' + 'L 3. By default, a JVCL ' 'menu will use the Style property to create an internal painter a' + 'nd use it.' 'However, you cannot access the properties of the painter at runt' + 'ime. To do that, use a ' 'Painter component and associate it with the menu you wish it to ' + 'paint. ' 'This also allows you to write your own Item Painter to suit your' + ' needs. To see an ' 'example of this, please see the JvRichEdit demo.') ReadOnly = True TabOrder = 5 end object jmnMain: TJvMainMenu Images = imlImages Style = msOffice ImageMargin.Left = 1 ImageMargin.Top = 1 ImageMargin.Right = 1 ImageMargin.Bottom = 1 ImageSize.Height = 0 ImageSize.Width = 0 Left = 12 Top = 28 object File1: TMenuItem Caption = '&File' object Try1: TMenuItem Caption = '&Try' OnClick = Try1Click end object N1: TMenuItem Caption = '-' end object Exit1: TMenuItem Caption = '&Exit' ImageIndex = 5 OnClick = Exit1Click end end object Other1: TMenuItem Caption = '&Other' object Sub11: TMenuItem Caption = 'Sub1' object Hello1: TMenuItem Caption = 'Hello' end object Plaf1: TMenuItem Caption = 'Plaf' Checked = True end end object Yop1: TMenuItem Caption = 'Yop' ShortCut = 16451 end end object Nice1: TMenuItem Caption = 'Nice' object Checked1: TMenuItem Caption = 'Checked' Checked = True end object N11: TMenuItem Caption = '-' end object Radio11: TMenuItem Caption = 'Radio1' Checked = True GroupIndex = 1 RadioItem = True end object Radio21: TMenuItem Caption = 'Radio2' GroupIndex = 1 RadioItem = True end object Radio31: TMenuItem Caption = 'Radio3' GroupIndex = 1 RadioItem = True end object N2: TMenuItem Caption = '-' GroupIndex = 1 end object SUb1: TMenuItem Caption = 'Sub' GroupIndex = 1 ImageIndex = 4 object SubAgain1: TMenuItem Caption = 'SubAgain' end end end end object imlImages: TImageList Left = 40 Top = 28 Bitmap = { 494C010106000900040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600 0000000000003600000028000000400000003000000001002000000000000030 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000000E7CEBD00CEB5A500CEB5 AD00CEB5A500CEB5A500CEBDAD00CEB5A500CEBDAD00CEB5A500CEBDAD00CEB5 A500CEB5AD00CEB5A500E7CEC6000000000000000000FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000EFD6C600BD8C6300CE946B00D694 6B00DE9C7300D69C7300DE9C6B00D69C7300D6A57300CEA57B00CEA57300CEA5 7300C6A57300BD946B00A57B5A00E7CEBD00FFFFFF008494DE000831B5001031 BD001839BD001839B5001839BD001039BD001031BD000831C6000831C6000029 BD000029C6000021B5007B94D600FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000E7CEBD00E7A57300F7B57B00FFB5 8400FFB58400FFBD8400FFBD8C00FFBD8C00FFC68C00F7CE9400F7CE9400E7CE 9400E7CE9400DEBD8400BD946B00CEB5AD00FFFFFF001039D6001842DE00294A DE002952DE002952DE002952DE002952DE00214ADE00184AE7001042E7000842 E7000039E7000031D6000021B500FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000EFCEB500F7B57B00FFB58400FFC6 8C00FFC68C00FFC68C00FFC68C00FFCE9400FFD69400FFD69C00FFDE9C00F7DE 9C00EFD69400E7CE9400C6A57300CEB5A500FFFFFF001842DE002952E700315A E7004263E7007B94EF00E7EFFF00FFFFFF00FFFFFF00DEE7FF007394F700104A EF000842EF000039E7000029BD00FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000EFD6BD00FFB58400FFBD8C00FFC6 8C00FFC69400FFCE8C00FFC69400FFDEBD00FFEFDE00FFDEA500FFDE9C00F7DE 9C00F7DE9C00E7CE9400CEA57B00CEBDAD00FFFFFF00214ADE00395AE7004263 E700A5B5F700FFFFFF00BDCEF700738CEF006B8CEF00BDCEFF00FFFFFF009CB5 F700084AEF000839E7000029C600FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F7D6BD00FFBD8400FFC68C00FFCE 9400FFCE9400FFCE9400FFDEBD00FFF7F700FFFFFF00FFF7E700FFDEA500FFDE 9C00F7DE9C00EFCE9400CEA57B00CEB5A500FFFFFF002952E7004263E7008C9C EF00FFFFFF00849CEF00426BE7004263E7003163EF00295AEF007394F700FFFF FF006B8CF7000842E7000831C600FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F7D6BD00FFBD8C00FFCE9400FFCE 9400FFCE9400FFDEBD00FFF7F700FFFFFF00FFFFFF00FFFFFF00FFF7E700FFD6 9C00FFD69C00EFCE9400D6A57B00D6BDAD00FFFFFF00315AE7004A6BE700EFEF FF00BDC6F7004A6BE7004A6BE700FFFFFF00FFFFFF00295AEF002152EF00B5C6 FF00DEE7FF00184AE7001039C600FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000FFD6BD00FFC68C00FFCE9C00FFCE 9400FFD6A500FFEFDE00FFEFDE00FFF7E700FFFFFF00FFEFDE00FFEFDE00FFDE C600F7CE9400FFC68C00D6A57300D6BDAD00FFFFFF00395AE700526BE700FFFF FF008494EF00526BE7004A6BE700FFFFFF00FFFFFF00295AE7002152E7006384 EF00FFFFFF00184ADE001839C600FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000FFD6BD00FFCE9400FFD69400FFD6 9400FFCE9400FFCE9400FFC68C00FFE7CE00FFFFFF00FFC69400FFC68C00FFC6 8C00FFC68C00FFBD8C00DEAD7B00D6BDAD00FFFFFF004263E7005A73EF00FFFF FF008494EF00526BE7004A63E700FFFFFF00FFFFFF002952E7002152E7006384 EF00FFFFFF00214ADE001839BD00FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000FFDEC600FFCE9400FFD69C00FFD6 9C00FFCE9400FFCE9400FFC68C00FFE7CE00FFFFFF00FFC69400FFBD8C00FFBD 8C00FFBD8400FFBD8400E7A57B00CEBDAD00FFFFFF004A6BE700637BEF00EFF7 FF00B5C6F700526BE7004A63E700FFFFFF00FFFFFF002952E700214AE700B5BD F700E7E7FF002952DE002142BD00FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000FFDEC600FFD69C00FFDEA500FFDE 9C00FFD69400FFCE9400FFCE9400FFE7CE00FFFFFF00FFC69400FFBD8400FFBD 8C00FFBD8400FFB58400E7A57300D6BDAD00FFFFFF00526BE7006B84EF0094AD F700FFFFFF008494EF004A63E7004263E700395AE7003152E7006B84EF00FFFF FF00738CEF002952DE002142BD00FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000FFDEC600FFDE9C00FFE7A500FFDE A500FFD69400FFD69C00FFCE9400FFDEBD00FFEFDE00FFC69400FFC68C00FFBD 8400FFB58400FFBD8400E7A57300D6BDAD00FFFFFF005A7BEF007B94EF00738C EF00A5B5F700FFFFFF00B5BDF7007384EF006B84EF00B5BDF700FFFFFF0094AD F7003152E7002952DE002142BD00FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000FFDEC600FFE7A500FFF7AD00FFE7 A500FFDEA500FFD69C00FFD69400FFD69C00FFD69400FFCE9400FFC68C00FFC6 8C00FFBD8C00FFBD8400E7A57300CEB5AD00FFFFFF006B84EF008CA5EF008494 EF006B8CEF0094ADF700EFF7FF00FFFFFF00FFFFFF00EFEFFF008C9CEF004263 E700395AE7003152DE001839BD00FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000FFDEC600FFEFAD00FFFFB500FFEF AD00FFE7A500FFDEA500FFDE9C00FFD69C00FFD69C00FFD69C00FFD69400FFCE 9400FFC68C00FFBD8400DE9C7300CEB5A500FFFFFF00738CEF009CADF7008CA5 EF007B94EF00738CEF006B84EF00637BEF00637BEF005A7BEF005273E7004A6B E7004263E7002952DE001839BD00FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F7EFD600FFDE9C00FFEFAD00FFE7 A500FFDE9C00FFD69C00FFD69C00FFD69400FFCE9400FFCE9400FFCE9400FFC6 8C00FFBD8C00FFB58400CE946B00E7CEC600FFFFFF00B5BDF700738CEF006384 EF005A73EF005273E7004A6BE7004A6BE7004A6BE7004263E7003963E700395A E7003152E7002142DE008C9CDE00FFFFFF000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000000F7DECE00FFE7C600FFDE C600FFDEBD00FFDEC600FFD6BD00FFDEC600FFD6BD00FFD6BD00F7D6BD00FFD6 BD00F7D6BD00EFD6BD00F7DEC6000000000000000000FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 00000000000000000000000000000000000000000000A5A5A5009C949C00C6CE CE00000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000C6C6CE00BDB5B500BDB5B500BDB5B500BDB5B500BDB5B500BDB5B500BDB5 B500BDB5B500BDB5B500BDB5BD0000000000000000000000000000000000CECE D600C6BDB500CEC6C60000000000000000000000000000000000CECECE00C6BD B500CECED6000000000000000000000000000000000000000000B5BDBD008484 8C006B6363007B7B8400A5ADAD000000000000000000000000009C9CA5007373 730073737300A5ADB5000000000000000000000000005A94C600737BAD009C8C 9400C6CECE000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000BDB5B500BD9C9400E7B5AD00E7B5AD00E7B5AD00E7B5AD00E7B5AD00E7B5 AD00E7B5AD00E7B5AD009C848400000000000000000000000000CECED600BD8C 7300B55A2900B56B3900C6B5B5000000000000000000CEC6C600B56B4200B55A 2900BD8C7300CECECE0000000000000000000000000000000000528CAD001884 BD00395A6B005242420063636300949C9C009CA5A500848C9400428CB5003984 AD005A5A5A009CA5A5000000000000000000000000009CC6EF004AA5F700737B AD009C8C9400C6CECE0000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000C6B5B500CEB5A500F7EFE700F7EFE700F7EFE700F7EFE700F7EFE700F7EF E700F7EFE700FFE7CE009C848400000000000000000000000000C6B5AD00B552 1800B5632900B55A2100B5632900C6BDBD00C6C6C600AD633900B55A2900AD5A 2100B55A1000BDADA50000000000000000000000000000000000739CB500B5EF FF0000BDF7003984A5004A3931005A525200636B73002994BD00ADF7FF00219C C6005A636B00A5ADAD00000000000000000000000000000000009CC6EF0042A5 F700737BAD00ADADAD00C6CECE00B5B5BD00B5B5BD00C6CECE00CED6D6000000 0000000000000000000000000000000000000000000000000000000000000000 0000C6BDB500D6B5AD00FFEFE700FFE7D600FFE7CE00FFE7CE00FFE7C600FFE7 C600FFE7CE00FFE7CE009C848400000000000000000000000000BDAD9C00B552 1000C6AD9C00C6B5AD00AD4A0800BDA59400BDAD9C00AD4A1000C6BDB500C6A5 9400B54A0800BDA5940000000000000000000000000000000000B5BDC60084BD D60010D6FF0021D6FF00297BA50031394200529CC60094EFFF0008CEFF003184 AD007B7B8400ADB5BD0000000000000000000000000000000000000000009CC6 EF0084A5D60094848400B59C8C00CEBDAD00D6CEBD00A5949400B5B5B500C6CE CE00ADADAD00A5949C00948C8C00BDBDC600BDB5B500B58C8400C6949400C694 9400C6948C00D6BDB500FFE7D600FFD6B500FFD6B500FFD6B500FFD6B500FFD6 B500FFDEC600FFE7CE00A5848400000000000000000000000000C6B5B500B563 2100B57B5200C6ADA500AD4A0000C69C8C00BDA58C00AD4A0000BDADA500B57B 5200BD631800C6B5AD000000000000000000000000000000000000000000639C B50073E7FF0008D6FF0042E7FF0063B5DE00ADFFFF0042E7FF0008BDEF003952 5A0094949400B5BDBD000000000000000000000000000000000000000000C6CE CE00E7D6D600E7C6AD00E7CEAD00DEDEC600EFEFE700EFEFEF009C8C8400C6C6 C600EFEFEF00CEB5B500BD8C8C00ADADB500BDB5B500DEC6BD00FFE7DE00FFE7 DE00E7CEBD00DEC6B500FFEFDE00FFDEBD00FFDEBD00FFDEBD00FFDEBD00FFDE BD00FFE7CE00FFE7CE00A58C8C00000000000000000000000000C6CECE00B584 6300B5520800BD631000BD5A0000BD846300BD947300BD520000BD631000BD5A 0000B57B5A00C6CECE0000000000000000000000000000000000B5BDBD00638C A50094CEE70000CEFF0029DEFF007BF7FF0094FFFF005AEFFF00108CBD004A39 3100847B8400A5ADAD0000000000000000000000000000000000000000000000 0000D6BDAD00F7CE9C00E7BD9C00D6D6C600CECEC600BDD6CE00ADAD9C008484 8400DEA57300E79C6B00A5736B00B5BDBD00BDB5B500DECEC600FFEFD600FFEF D600EFCEBD00E7CEBD00FFE7D600FFD6B500FFD6B500FFD6B500FFD6B500FFD6 B500FFDEC600FFE7CE00AD8C8C00000000000000000000000000000000000000 0000BD8C7B00AD6B4A00A54A18009C5A3100A5634200A54A1800AD6B4A00B58C 7300CECECE0000000000000000000000000000000000000000008C9494005263 6B0039ADD60010D6FF0010D6FF004AE7FF008CFFFF007BF7FF00187BAD003931 31004A4239006B6B6B009CA5A50000000000000000000000000000000000C6CE D600DEBDA500FFDE9400FFDE9400DECEAD00E7EFD600D6EFD600BDBDA5009494 9400EFBD6B00FFC65A00F7BD5200A59C9C00BDB5B500DECEC600FFD6A500FFD6 A500EFC69C00E7CEBD00FFEFE700FFE7CE00FFE7CE00FFE7CE00FFE7CE00FFE7 CE00FFE7D600FFE7CE00B5948C00000000000000000000000000000000000000 00000000000000000000AD9484008C6B5A009C7B7300AD8C7B00000000000000 0000000000000000000000000000000000000000000073848C003184AD0008BD EF0042E7FF0021D6FF0000CEFF0039DEFF0073F7FF0094FFFF0052E7FF001094 C600294A63004A393900635A5A00949CA500000000000000000000000000C6CE D600DEBDA500FFEFBD00FFE7B500DECEA500EFE7C600E7DEBD00B5948400C6C6 C600F7D68C00FFE79C00F7CE8400ADA5AD00C6B5B500E7CEC600FFEFDE00FFEF DE00EFD6BD00EFD6C600FFEFE700FFDEBD00FFDEBD00FFDEB500FFDEB500FFDE B500FFDEC600FFE7CE00B5949400000000000000000000000000000000000000 000000000000CECED600A58C8400C6B5AD00AD9C8C00947B7300C6CECE000000 00000000000000000000000000000000000084ADC60000A5D60042E7FF0094FF FF0063EFFF0031DEFF0000CEFF0018D6FF0052EFFF0094FFFF006BF7FF0031DE FF0000BDF700298CB5004A5A630084848C00000000000000000000000000C6CE D600CEC6C600D6BDB500EFE7CE00DED6B500E7DEBD00D6B5A500A5949C00C6C6 CE00CEC6BD00D6CEB500D6B59C00B5BDBD00C6BDB500E7D6CE00FFD6A500FFD6 A500F7C69C00EFD6C600FFFFFF00FFFFFF00FFFFFF00FFFFF700FFF7EF00FFF7 EF00FFDED600FFBDB500B59C9400000000000000000000000000000000000000 000000000000B5ADAD00AD9C9400A5948C009C847B00B59C9400ADA59C000000 0000000000000000000000000000000000005AA5C600B5DEEF00BDE7EF00A5CE DE007BB5CE0094BDD60042DEFF0008CEFF0042DEF7007BB5CE00BDDEEF00B5E7 EF00B5E7F7008CE7F70042739400A5ADAD000000000000000000000000000000 000000000000CECED600CEBDBD00CEB5AD00DEC6BD00D6BDBD00AD8C8C009494 94000000000000000000C6CED600C6CED600C6BDBD00EFD6CE00FFF7E700FFEF DE00F7DEBD00F7DEC600FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFF700FFFF F700BD847300C68C7300C6A59C00000000000000000000000000000000000000 0000C6C6CE00A5948C00BDB5AD00ADA59C00B5ADA500B5A59C00A5948C00C6C6 C60000000000000000000000000000000000639CBD005294B500528CB5004A8C AD005A94AD003984AD0094EFFF0000CEFF0010A5D600316B8C005A849C00528C A5005A8CAD004A8CAD00A5B5BD00000000000000000000000000000000000000 0000000000000000000000000000CECED600DEC6BD00DEB5AD00BD7B7B00B5B5 B50000000000000000000000000000000000CEC6BD00EFDED600FFD6A500FFD6 A500FFCE9C00FFDECE00FFFFFF00FFFFFF00FFFFFF00FFFFF700F7F7F700F7F7 F700C6947B00DEB59400CECECE00000000000000000000000000000000000000 0000ADADA500C6BDB500AD9C9400BDC6C600C6C6C600A5948C00BDB5AD00BDB5 AD00000000000000000000000000000000000000000000000000000000000000 0000000000004A8CAD00A5DEF70010D6FF00108CBD00635A5A00A5A5AD00BDC6 C600000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000DEB58400FFBD4200DEA55A009C8C 840000000000000000000000000000000000CEC6BD00F7E7D600FFFFFF00FFFF FF00FFEFE700EFC6AD00E7C6A500E7BDA500DEAD8C00D69C8400D6B5A500D6B5 A500C6A59C00CECECE0000000000000000000000000000000000000000000000 0000B5A5A500AD9C8C00BDB5B5000000000000000000BDBDBD00AD9C8C00AD9C 9C00000000000000000000000000000000000000000000000000000000000000 0000000000006394B50094C6E70021DEFF003184AD0073737B00ADB5B5000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000C6CED600E7C68C00FFD67B00FFD67300AD9C 840000000000000000000000000000000000D6C6BD00F7E7D600FFFFFF00FFFF FF00FFFFFF00FFFFF700FFF7EF00DEBDB500C68C7B00B5847B00000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000947B73009C948400CECED600000000000000000000000000A59C94008C73 6300000000000000000000000000000000000000000000000000000000000000 0000000000007BADBD006BADCE0039CEF700396384008C949C00000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000C6CECE00DECEAD00EFDEAD00F7DE9C00A59C 9C0000000000000000000000000000000000D6CEBD00FFE7DE00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFF7F700CEA59C00EFB58400D6BDA500000000000000 000000000000000000000000000000000000000000000000000000000000CECE CE00846B6300BDBDBD0000000000000000000000000000000000C6C6C6008C73 6B00BDBDBD000000000000000000000000000000000000000000000000000000 0000000000000000000084ADC600529CC600B5C6CE0000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000C6CED600C6CECE00C6CECE00C6BDBD00BDC6 C60000000000000000000000000000000000D6CEBD00EFC6A500E7C6AD00E7C6 AD00E7C6AD00E7C6AD00E7C6AD00C6948400D6BDAD00CECECE00000000000000 000000000000000000000000000000000000000000000000000000000000C6C6 C600ADA5A500CECED60000000000000000000000000000000000CECED600B5AD AD00BDBDBD00000000000000000000000000424D3E000000000000003E000000 2800000040000000300000000100010000000000800100000000000000000000 000000000000000000000000FFFFFF0000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000080018001000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 00000000000000008001800100000000FFFF8FFFF001E3C7C1C387FFF001C183 C00383FFF001C003C003C01FF001C003C003E0000001C003E003E0000001C003 C003F0000001F007C001E0000001FC3F8000E0000001F81F0000E0000001F81F 0000F80C0001F00F0001FE0F0001F00FF80FFF0F0003F18FF81FFE0F003FF1CF F83FFE0F003FE3C7FC7FFE0F003FE3C700000000000000000000000000000000 000000000000} end object jpmPopup: TJvPopupMenu BiDiMode = bdLeftToRight Images = imlImages ParentBiDiMode = False Style = msXP ImageMargin.Left = 0 ImageMargin.Top = 0 ImageMargin.Right = 0 ImageMargin.Bottom = 0 ImageSize.Height = 0 ImageSize.Width = 0 Left = 12 Top = 212 object Popup11: TMenuItem Caption = 'Popup1' ImageIndex = 2 end object Popup21: TMenuItem Caption = 'Popup2' ImageIndex = 3 end object Checked2: TMenuItem Caption = 'Checked' Checked = True end object PopupSub1: TMenuItem Caption = 'PopupSub' object Yop2: TMenuItem Caption = 'Yop' end object CheckedInSub1: TMenuItem Caption = 'CheckedInSub' Checked = True end object Yip1: TMenuItem Caption = 'Yip' end end object AfterPSub1: TMenuItem Caption = 'AfterPSub' end end object jpmMarginPopup: TJvPopupMenu Images = imlImages Style = msItemPainter ImageMargin.Left = 2 ImageMargin.Top = 2 ImageMargin.Right = 2 ImageMargin.Bottom = 2 ImageSize.Height = 0 ImageSize.Width = 0 ItemPainter = jipMarginPainter Left = 232 Top = 204 object Test1: TMenuItem Caption = 'Test' end object Testagain1: TMenuItem Caption = 'Test again' end end object jipMarginPainter: TJvStandardMenuItemPainter LeftMargin = 15 Left = 260 Top = 204 end end --- NEW FILE: JvMenusExample.res --- (This appears to be a binary file; contents omitted.) --- NEW FILE: MainForm.cpp --- /****************************************************************** JEDI-VCL Demo Copyright (C) 2004 Project JEDI Original author: Olivier Sannier (ob...@me...) You may retrieve the latest version of this file at the JEDI-JVCL home page, located at http://jvcl.sourceforge.net The contents of this file are used with permission, subject to the Mozilla Public License Version 1.1 (the "License"); you may not use this file except in compliance with the License. You may obtain a copy of the License at http://www.mozilla.org/MPL/MPL-1_1Final.html Software distributed under the License is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License for the specific language governing rights and limitations under the License. ******************************************************************/ // $Id: MainForm.cpp,v 1.1 2004/04/17 07:18:27 obones Exp $ //--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "MainForm.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "JvExComCtrls" #pragma link "JvMenus" #pragma link "JvToolBar" #pragma resource "*.dfm" TfrmMain *frmMain; //--------------------------------------------------------------------------- __fastcall TfrmMain::TfrmMain(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TfrmMain::Exit1Click(TObject *Sender) { Application->Terminate(); } //--------------------------------------------------------------------------- void __fastcall TfrmMain::Try1Click(TObject *Sender) { ShowMessage("Nice try !"); } //--------------------------------------------------------------------------- void __fastcall TfrmMain::btnAddItemsClick(TObject *Sender) { TMenuItem* item; item = new TMenuItem(this); item->Caption = "Add"; jmnMain->Items->Add(item); item = new TMenuItem(this); item->Caption = "Below Add"; jmnMain->Items->operator [](3)->Add(item); } //--------------------------------------------------------------------------- void __fastcall TfrmMain::btnChangeCaptionClick(TObject *Sender) { Try1->Caption = "ReFile"; } //--------------------------------------------------------------------------- --- NEW FILE: JvMenusExample.bpr --- <?xml version='1.0' encoding='utf-8' ?> <!-- C++Builder XML Project --> <PROJECT> <MACROS> <VERSION value="BCB.06.00"/> <PROJECT value="..\..\..\bin\JvMenusExample.exe"/> <OBJFILES value="..\..\..\dcu\JvMenusExample.obj ..\..\..\dcu\MainForm.obj"/> <RESFILES value="JvMenusExample.res"/> <IDLFILES value=""/> <IDLGENFILES value=""/> <DEFFILE value=""/> <RESDEPEN value="$(RESFILES) MainForm.dfm"/> <LIBFILES value=""/> <LIBRARIES value=""/> <SPARELIBS value=""/> <PACKAGES value=""/> <PATHCPP value=".;"/> <PATHPAS value=".;"/> <PATHRC value=".;"/> <PATHASM value=".;"/> <DEBUGLIBPATH value="$(BCB)\lib\debug"/> <RELEASELIBPATH value="$(BCB)\lib\release"/> <LINKER value="ilink32"/> <USERDEFINES value="_DEBUG"/> <SYSDEFINES value="NO_STRICT"/> <MAINSOURCE value="JvMenusExample.cpp"/> <INCLUDEPATH value="$(BCB)\include;$(BCB)\include\vcl;$(INCLUDEPATH)"/> <LIBPATH value="$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;$(RESPATH)"/> <WARNINGS value="-w-par"/> <OTHERFILES value=""/> </MACROS> <OPTIONS> <IDLCFLAGS value="-I$(BCB)\include -I$(BCB)\include\vcl -I$(INCLUDEPATH) -src_suffix cpp -D_DEBUG -boa"/> <CFLAG1 value="-Od -H=$(BCB)\lib\vcl60.csm -Hc -Vx -Ve -X- -r- -a8 -b- -k -y -v -vi- -c -tW -tWM"/> <PFLAGS value="-N2..\..\..\dcu -N0..\..\..\dcu -$YD -$W -$O- -$A8 -v -JPHNE -M"/> <RFLAGS value=""/> <AFLAGS value="/mx /w2 /zd"/> <LFLAGS value="-I..\..\..\dcu -D"" -aa -Tpe -x -Gn -v"/> <OTHERFILES value=""/> </OPTIONS> <LINKER> <ALLOBJ value="c0w32.obj sysinit.obj $(OBJFILES)"/> <ALLRES value="$(RESFILES)"/> <ALLLIB value="$(LIBFILES) $(LIBRARIES) import32.lib cp32mt.lib"/> <OTHERFILES value=""/> </LINKER> <FILELIST> <FILE FILENAME="JvMenusExample.res" FORMNAME="" UNITNAME="JvMenusExample.res" CONTAINERID="ResTool" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="JvMenusExample.cpp" FORMNAME="" UNITNAME="JvMenusExample" CONTAINERID="CCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> <FILE FILENAME="MainForm.cpp" FORMNAME="frmMain" UNITNAME="MainForm" CONTAINERID="CCompiler" DESIGNCLASS="" LOCALCOMMAND=""/> </FILELIST> <BUILDTOOLS> </BUILDTOOLS> <IDEOPTIONS> [Version Info] IncludeVerInfo=0 AutoIncBuild=0 MajorVer=1 MinorVer=0 Release=0 Build=0 Debug=0 PreRelease=0 Special=0 Private=0 DLL=0 Locale=1036 CodePage=1252 [Version Info Keys] CompanyName= FileDescription= FileVersion=1.0.0.0 InternalName= LegalCopyright= LegalTrademarks= OriginalFilename= ProductName= ProductVersion=1.0.0.0 Comments= </IDEOPTIONS> </PROJECT> |