[JVCL-Checkins] dev/JVCL3/qdesign JvQCheckedItemsForm.pas,1.9,1.10 JvQHtmlParserEditor.pas,1.9,1.10

SourceForge Headquarters 225 Broadway Suite 1600 San Diego, CA 92101 +1 (858) 454-5900

Update of /cvsroot/jvcl/dev/JVCL3/qdesign
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv32526/JVCL3/qdesign

Modified Files:
	JvQCheckedItemsForm.pas JvQHtmlParserEditor.pas 
	JvQStdCtrlsReg.pas 
Log Message:
Regenerated

Index: JvQStdCtrlsReg.pas
===================================================================
RCS file: /cvsroot/jvcl/dev/JVCL3/qdesign/JvQStdCtrlsReg.pas,v
retrieving revision 1.23
retrieving revision 1.24
diff -C2 -d -r1.23 -r1.24
*** JvQStdCtrlsReg.pas	14 Jun 2004 14:52:09 -0000	1.23
--- JvQStdCtrlsReg.pas	28 Jun 2004 23:10:17 -0000	1.24
***************
*** 1,2 ****
--- 1,7 ----
+ {******************************************************************************}
+ {* WARNING:  JEDI VCL To CLX Converter generated unit.                        *}
+ {*           Manual modifications will be lost on next release.               *}
+ {******************************************************************************}
+ 
  {-----------------------------------------------------------------------------
  The contents of this file are subject to the Mozilla Public License
***************
*** 17,22 ****
  Contributor(s):

- Last Modified: 2004-03-22
- 
  You may retrieve the latest version of this file at the Project JEDI's JVCL home page,
  located at http://jvcl.sourceforge.net
--- 22,25 ----
***************
*** 24,27 ****
--- 27,31 ----
  Known Issues:
  -----------------------------------------------------------------------------}
+ // $Id$

  {$I jvcl.inc}
***************
*** 31,34 ****
--- 35,42 ----
  interface

+ {$IFDEF MSWINDOWS}
+ {$DEFINE USEWINDOWS}
+ {$ENDIF MSWINDOWS}
+ 
  procedure Register;

***************
*** 36,56 ****

  uses
!   Classes,
!   QControls, QImgList, QTypes, QComCtrlsEx,
! 
!   DesignEditors, DesignIntf,
! 
!   JvQDsgnConsts, JvQTypes, JvQWStrUtils,
!   JvQEdit, JvQProgressBar, JvQTransparentPanel,
! 
!   JvQMaskEdit, JvQBaseEdits, JvQCalc, JvQToolEdit,
!   JvQBevel, JvQCheckBox, JvQSpeedButton,
!   JvQCtrls, JvQGroupBox, JvQHeaderControl,
!   JvQImage, JvQRadioButton, JvQRadioGroup,
!   JvQLabel, JvQStatusBar, JvQSpin, JvQCheckedMaskEdit,
!   JvQGauges, JvQTimeEdit, JvQStdDsgnEditors, JvQJCLUtils,
!   JvQScrollBar, JvQShape, JvQControlBar, JvQGrids,
!   JvQBitBtn, JvQPickDate, JvQStringGrid,
!   JvQPanel, JvQImageList, JvQProgressEditor, JvQDsgnEditors;

  {$IFDEF MSWINDOWS}
--- 44,63 ----

  uses
!   Classes, QControls,
!   QTypes, // type TCaption
!   {FiltEdit,} QImgList,
!   DesignEditors, DesignIntf, 
!   JvQDsgnConsts, JvQTypes, 
!   {$IFDEF USEWINDOWS}
!   JvQBrowseFolder,
!   {$ENDIF USEWINDOWS}
!   JvQGauges, QComCtrlsEx, JvQTimeEdit,
!   JvQSpin, JvQEdit, JvQProgressBar, JvQMaskEdit, JvQBaseEdits, JvQCalc,
!   JvQToolEdit, JvQBevel, JvQCheckBox, JvQSpeedButton, JvQSecretPanel,
!   JvQCheckListBox, JvQControlBar, JvQCtrls, JvQGroupBox, JvQHeaderControl,
!   JvQImage, JvQLabel, JvQRadioButton, JvQRadioGroup, JvQScrollBar, JvQShape,
!   JvQStatusBar, JvQGrids, JvQStringGrid, JvQBitBtn, JvQPanel, JvQImageList,
!   JvQTransparentPanel, JvQCheckedItemsForm, JvQProgressEditor, JvQDsgnEditors,
!   JvQCheckedMaskEdit;

  {$IFDEF MSWINDOWS}
***************
*** 67,105 ****
    cOwnerDraw = 'OwnerDraw';
  begin
!   RegisterComponents(RsPaletteVisual, [TJvShape, TJvCalendar]);
!   RegisterComponents(RsPaletteNonVisual, [TJvCalculator]);
    RegisterComponents(RsPaletteButton, [TJvBitBtn, TJvImgBtn, TJvSpeedButton,
!     TJvCheckBox, TJvRadioButton, TJvRadioGroup, TUpDown, TJvSpinButton]);
    RegisterComponents(RsPaletteEdit, [TJvEdit,
!     TJvMaskEdit, TJvCheckedMaskEdit, TJvCalcEdit, TJvComboEdit,
!     TJvFilenameEdit, TJvDirectoryEdit, TJvDateEdit, TJvSpinEdit, TJvTimeSpin]);
    RegisterComponents(RsPaletteImageAnimator, [TJvImage, TJvImageList]);
!   RegisterComponents(RsPaletteBarPanel, [TJvGauge, TJvControlBar,
!     TJvGroupBox, TJvHeaderControl, TJvPanel, TJvBevel, TJvStatusBar,
!     TJvTransparentPanel]);
!   RegisterComponents(RsPaletteLabel, [TJvLabel]);
! //  RegisterPropertyEditor(TypeInfo(TImageIndex), TJvCustomLabel, 'ImageIndex',TJvDefaultImageIndexProperty);
!   RegisterComponents(RsPaletteScrollerTracker, [TJvScrollBar]);
!   RegisterComponents(RsPaletteListComboTree, [TJvDrawGrid, TJvStringGrid]);

    RegisterPropertyEditor(TypeInfo(TControl), BaseClass, 'Gauge', TJvProgressControlProperty);
    RegisterPropertyEditor(TypeInfo(TControl), BaseClass, 'ProgressBar', TJvProgressControlProperty);
    RegisterPropertyEditor(TypeInfo(string), TJvCustomNumEdit, cText, nil);
  //  RegisterPropertyEditor(TypeInfo(string), TJvFilenameEdit, 'Filter', TFilterProperty);
- //  RegisterPropertyEditor(TypeInfo(TWideStringList), TJvArrayButton ,'Hints', TJvHintProperty);
    RegisterPropertyEditor(TypeInfo(string), TJvFilenameEdit, 'FileName', TJvFilenameProperty);
    RegisterPropertyEditor(TypeInfo(string), TJvDirectoryEdit, cText, TJvDirectoryProperty);
!   RegisterPropertyEditor(TypeInfo(string), TJvCustomComboEdit, 'ButtonHint', TJvHintProperty);
! //  RegisterPropertyEditor(TypeInfo(TStrings), TJvxCheckListBox, 'Items', TJvCheckItemsProperty);
    RegisterPropertyEditor(TypeInfo(TJvImgBtnKind), TJvImgBtn, 'Kind', TJvNosortEnumProperty);
- //  RegisterPropertyEditor(TypeInfo(Boolean), TJvMainMenu, cOwnerDraw, nil);
- //  RegisterPropertyEditor(TypeInfo(Boolean), TJvPopupMenu, cOwnerDraw, nil);
    RegisterPropertyEditor(TypeInfo(TCaption), TJvSpeedButton, 'Caption', TJvHintProperty);
! //  RegisterPropertyEditor(TypeInfo(TImageIndex), TJvCustomLabel, 'ImageIndex',TJvDefaultImageIndexProperty);
!   RegisterPropertyEditor(TypeInfo(TDate), nil, '', TJvDateExProperty);
!   RegisterPropertyEditor(TypeInfo(TTime), nil, '', TJvTimeExProperty);
!   RegisterPropertyEditor(TypeInfo(TDateTime), nil, '', TJvDateTimeExProperty);
! 
! 
  end;

--- 74,113 ----
    cOwnerDraw = 'OwnerDraw';
  begin
!   RegisterComponents(RsPaletteVisual, [TJvShape]);
!   RegisterComponents(RsPaletteNonVisual, [
!     TJvCalculator]);
!   RegisterComponents(RsPaletteDialog, [TJvBrowseForFolderDialog]);
    RegisterComponents(RsPaletteButton, [TJvBitBtn, TJvImgBtn, TJvSpeedButton,
!     TJvCheckBox, TJvRadioButton, TJvRadioGroup,
!     TJvSpinButton, TUpDown]);
    RegisterComponents(RsPaletteEdit, [TJvEdit,
!     TJvMaskEdit, TJvCheckedMaskEdit, TJvComboEdit, TJvCalcEdit,
!     TJvFilenameEdit, TJvDirectoryEdit, TJvSpinEdit,
!     TJvDateEdit, TJvTimeSpin]);
    RegisterComponents(RsPaletteImageAnimator, [TJvImage, TJvImageList]);
!   RegisterComponents(RsPaletteBarPanel, [TJvGauge,
!     TJvProgressBar, TJvStatusBar,
!     TJvControlBar,
!     TJvGroupBox, TJvHeaderControl, TJvPanel, TJvBevel,
!     TJvSecretPanel {, TJvTransparentPanel}]);
!   RegisterComponents(RsPaletteLabel, [TJvLabel
!     ]);
!   RegisterComponents(RsPaletteListComboTree, [
!     TJvCheckListBox,
!     TJvDrawGrid, TJvStringGrid]);
!   RegisterComponents(RsPaletteScrollerTracker, [TJvScrollBar ]);

    RegisterPropertyEditor(TypeInfo(TControl), BaseClass, 'Gauge', TJvProgressControlProperty);
    RegisterPropertyEditor(TypeInfo(TControl), BaseClass, 'ProgressBar', TJvProgressControlProperty);
    RegisterPropertyEditor(TypeInfo(string), TJvCustomNumEdit, cText, nil);
+   RegisterPropertyEditor(TypeInfo(string), TJvFileDirEdit, cText, TStringProperty);
+   RegisterPropertyEditor(TypeInfo(string), TJvCustomDateEdit, cText, TStringProperty);
  //  RegisterPropertyEditor(TypeInfo(string), TJvFilenameEdit, 'Filter', TFilterProperty);
    RegisterPropertyEditor(TypeInfo(string), TJvFilenameEdit, 'FileName', TJvFilenameProperty);
    RegisterPropertyEditor(TypeInfo(string), TJvDirectoryEdit, cText, TJvDirectoryProperty);
!   RegisterPropertyEditor(TypeInfo(string), TJvCustomComboEdit, 'ButtonHint', TJvHintProperty); 
    RegisterPropertyEditor(TypeInfo(TJvImgBtnKind), TJvImgBtn, 'Kind', TJvNosortEnumProperty);
    RegisterPropertyEditor(TypeInfo(TCaption), TJvSpeedButton, 'Caption', TJvHintProperty);
!   RegisterPropertyEditor(TypeInfo(TImageIndex), TJvCustomLabel, 'ImageIndex',TJvDefaultImageIndexProperty);
  end;

Index: JvQHtmlParserEditor.pas
===================================================================
RCS file: /cvsroot/jvcl/dev/JVCL3/qdesign/JvQHtmlParserEditor.pas,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** JvQHtmlParserEditor.pas	3 Jun 2004 10:21:58 -0000	1.9
--- JvQHtmlParserEditor.pas	28 Jun 2004 23:10:17 -0000	1.10
***************
*** 54,72 ****

  uses
!   JvQDsgnConsts;

  function TJvHtmlParserEditor.GetAttributes: TPropertyAttributes;
  begin
!   Result := [paMultiSelect, paDialog, paSortList];
  end;

  function TJvHtmlParserEditor.GetValue: string;
  begin
!   Result := GetStrValue;
  end;

  procedure TJvHtmlParserEditor.SetValue(const Value: string);
  begin
!   SetStrValue(Value);
  end;

--- 54,72 ----

  uses
!   QControls, QDialogs, JvQDsgnConsts;

  function TJvHtmlParserEditor.GetAttributes: TPropertyAttributes;
  begin
!   Result := [paMultiSelect, paDialog, paReadOnly];
  end;

  function TJvHtmlParserEditor.GetValue: string;
  begin
!   Result := RsJvEditorString; // GetStrValue;
  end;

  procedure TJvHtmlParserEditor.SetValue(const Value: string);
  begin
!   SetStrValue(RsJvEditorString);
  end;

***************
*** 78,93 ****
  procedure TJvHtmlParserEditor.Edit;
  var
!   Dlg: TFormParsers;
!   Res: TStringList;
  begin
!   Res := TStringList(GetOrdValue);
!   Dlg := TFormParsers.Create(Application);
!   Dlg.LoadFromStr(Res);
    try
!     Dlg.ShowModal;
!     if Dlg.Tag = 0 then
      begin
!       Res.Assign(Dlg.SetFromStr);
!       SetOrdValue(Integer(Res));
      end;
    finally
--- 78,92 ----
  procedure TJvHtmlParserEditor.Edit;
  var
!   Dlg: TJvHTMLParserForm;
!   Res: TStrings;
  begin
!   Res := TStrings(GetOrdValue);
!   Dlg := TJvHTMLParserForm.Create(Application);
    try
!     Dlg.LoadFromStr(Res);
!     if (Dlg.ShowModal = mrOK) or (Dlg.Tag = 0) then
      begin
!       Dlg.SaveToStr(Res);
! //      SetOrdValue(Integer(Res));
      end;
    finally

Index: JvQCheckedItemsForm.pas
===================================================================
RCS file: /cvsroot/jvcl/dev/JVCL3/qdesign/JvQCheckedItemsForm.pas,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** JvQCheckedItemsForm.pas	24 Jun 2004 18:39:48 -0000	1.9
--- JvQCheckedItemsForm.pas	28 Jun 2004 23:10:17 -0000	1.10
***************
*** 35,41 ****

  uses
!   SysUtils, Classes,
!   QWindows, QControls, QForms, QMenus, Types, QGraphics,
!   QStdCtrls, QCheckLst, QExtCtrls, 
    RTLConsts, DesignIntf, DesignEditors,
    CLXEditors, 
--- 35,41 ----

  uses
!   QWindows,
!   SysUtils, Classes, QGraphics, QControls, QForms, QStdCtrls, QExtCtrls, QMenus,
!   QCheckLst, 
    RTLConsts, DesignIntf, DesignEditors,
    CLXEditors, 

[JVCL-Checkins] dev/JVCL3/qdesign JvQCheckedItemsForm.pas,1.9,1.10 JvQHtmlParserEditor.pas,1.9,1.10

JEDI VCL for Delphi

[JVCL-Checkins] dev/JVCL3/qdesign JvQCheckedItemsForm.pas,1.9,1.10 JvQHtmlParserEditor.pas,1.9,1.10 JvQStdCtrlsReg.pas,1.23,1.24 - Regenerated