Motto

В тихом саду здравомыслия
Пусть на вас постоянно падают
кокосовые орехи пробужденности.
Чогьям Трунгпа РИНПОЧЕ


Версия для мобильного


четверг, 18 февраля 2010 г.

Переход с RxLib на JVCL в деталях. Список пропавших свойств и методов Rx-компонентов.

Вчера в комментарии прозвучала мысль, что предыдущий пост об отличиях компонентов RxLib от JVCL даёт только поверхностный взгляд на изменения в компонентах. Ну что же, вот полный список всех public и published свойств и методов, которые пропали в JVCL-контролах. Для каждого компонента.

Ante Scriptum: Мне положительно нравится новое RTTI в Delphi 2010. =)

Примечание: некоторые свойства и методы, на самом деле остались и в JVCL-версии, но были переименованы, либо у них изменились названия типов в параметра (я сравнивал методы по полным названиям). Однако, программка делающая сравнение с помощью RTTI, вывела в список и их.

TComboEdit -> TJvComboEdit

Properties:
  • published property ParentCtl3D: Boolean

TFilenameEdit -> TJvFilenameEdit

Properties:
  • published property FileName: string
  • published property ParentCtl3D: Boolean

TDirectoryEdit -> TJvDirectoryEdit

Properties:
  • published property ParentCtl3D: Boolean

TDateEdit -> TJvDateEdit

Properties:
  • published property ParentCtl3D: Boolean

TRxCalcEdit -> TJvCalcEdit

Properties:
  • published property ParentCtl3D: Boolean

TTextListBox -> TJvTextListBox

Properties:
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean

TRxCheckListBox -> TJvxCheckListBox

Properties:
  • published property IniStorage: TFormPlacement
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean
  • published property OnGetItemHint: TGetItemHintEvent
  • published property HintSource: THPC_HintSource
Methods:
  • procedure SaveStatesReg(IniFile: TRegIniFile)
  • procedure RestoreStatesReg(IniFile: TRegIniFile)
  • procedure SaveStates(IniFile: TIniFile)
  • procedure RestoreStates(IniFile: TIniFile)

TFontComboBox -> TJvFontComboBox

Properties:
  • published property Device: TFontDevice
  • published property FontName: TFontName
  • published property Options: TFontListOptions
  • published property TrueTypeOnly: Boolean
  • published property UseFonts: Boolean
  • published property Ctl3D: Boolean
  • published property DragKind: TDragKind
  • published property ParentBiDiMode: Boolean
  • published property ParentCtl3D: Boolean
  • published property Style: TOwnerDrawComboStyle
  • published property OnContextPopup: TContextPopupEvent
  • published property OnEndDock: TEndDragEvent
  • published property OnStartDock: TStartDockEvent

TColorComboBox -> TJvColorComboBox

Properties:
  • public property CustomColor: TColor
  • published property AllColors: Boolean
  • published property ColorNames: TStrings
  • published property DisplayNames: Boolean
  • published property Ctl3D: Boolean
  • published property DragKind: TDragKind
  • published property ParentBiDiMode: Boolean
  • published property ParentCtl3D: Boolean
  • published property Style: TOwnerDrawComboStyle
  • published property OnContextPopup: TContextPopupEvent
  • published property OnEndDock: TEndDragEvent
  • published property OnStartDock: TStartDockEvent

TRxSplitter -> TJvxSplitter

Properties:
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean

TRxSlider -> TJvxSlider

TRxLabel -> TJvLabel

Properties:
  • published property OnEndDock: TEndDragEvent
  • published property OnStartDock: TStartDockEvent
  • public property MouseInControl: Boolean

TRxRichEdit -> TJvRichEdit

Fields:
  • PercentDone: Byte @ 360
  • PrnPreviews: TList @ 364
  • PrnPreview: TMetafile @ 368
Properties:
  • published property DrawEndPage: Boolean
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean
  • public property DefaultConverter: TConversionClass
  • public property LinesUpdating: Boolean
  • public property RtfSelText: string
  • public property LinkClickRange: _charrange
  • public property DrawEndPage: Boolean
Methods:
  • procedure CreatePrnPrew(const Caption: string)
  • class procedure RegisterConversionFormat(const AExtension: string; APlainText: Boolean; AConversionClass: TConversionClass)

TRxClock -> TJvClock

Properties:
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean
  • published property OnGetTime: TRxGetTimeEvent

TAnimatedImage -> TJvAnimatedImage

Properties:
  • published property DragKind: TDragKind
  • published property Opaque: Boolean

TRxDrawGrid -> TJvDrawGrid

Properties:
  • published property IniStorage: TFormPlacement

TRxSpeedButton -> TJvSpeedButton

Properties:
  • published property FlatStandard: Boolean
  • published property MenuPosition: TRxDropDownMenuPos
  • published property NumGlyphs: TRxNumGlyphs

TRxGIFAnimator -> TJvGIFAnimator

Properties:
  • published property Image: TGIFImage

TRxSpinButton -> TJvSpinButton

Properties:
  • published property ButtonStyle: TrSpinButtonStyle

TRxSpinEdit -> TJvSpinEdit

Properties:
  • published property CheckOnExit: Boolean
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean
  • public property CheckOnExit: Boolean

TRxSwitch -> TJvSwitch

TRxDice -> TJvDice

Properties:
  • published property Value: TRxDiceValue
Methods:
  • procedure RandomValue

TPicClip -> TJvPicClip

Properties:
  • published property Cols: TCellRange
  • published property Rows: TCellRange

TFormStorage -> TJvFormStorage

Properties:
  • published property StoredValues: TStoredValues
  • public property IniFileObject: TObject
  • public property IniFile: TIniFile
  • public property RegIniFile: TRegIniFile
  • published property IniFileName: string
  • published property IniSection: string
  • published property MinMaxInfo: TWinMinMaxInfo
  • published property RegistryRoot: TPlacementRegRoot
  • published property UseRegistry: Boolean
Methods:
  • procedure WriteString(const Ident: string; const Value: string)
  • procedure WriteInteger(const Ident: string; Value: Integer)

TFormPlacement -> TJvFormStorage

Properties:
  • public property IniFileObject: TObject
  • public property IniFile: TIniFile
  • public property RegIniFile: TRegIniFile
  • published property IniFileName: string
  • published property IniSection: string
  • published property MinMaxInfo: TWinMinMaxInfo
  • published property RegistryRoot: TPlacementRegRoot
  • published property UseRegistry: Boolean
Methods:
  • procedure WriteString(const Ident: string; const Value: string)
  • procedure WriteInteger(const Ident: string; Value: Integer)

TRxWindowHook -> TJvWindowHook

Properties:
  • public property HookWindow: HWND
  • published property WinControl: TWinControl
  • published property BeforeMessage: THookMessageEvent
  • published property AfterMessage: THookMessageEvent

TAppEvents -> TJvAppEvents

Properties:
  • public property Canvas: TCanvas

TSpeedBar -> TJvSpeedBar

Properties:
  • published property Options: TSpeedbarOptions
  • published property IniStorage: TFormPlacement
  • published property Images: TImageList
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean
Methods:
  • procedure RemoveItem(Item: TSpeedItem)
  • procedure AddItem(Section: Integer; Item: TSpeedItem)
  • function NewItem(AOwner: TComponent; Section: Integer; const AName: string): TSpeedItem
  • function AcceptDropItem(Item: TSpeedItem; X: Integer; Y: Integer): Boolean
  • procedure SetEditing(Win: HWND)
  • function SearchItem(const ItemName: string): TSpeedItem
  • function FindItem(Item: TSpeedItem; var Section: Integer; var Index: Integer): Boolean
  • procedure SaveLayoutReg(IniFile: TRegIniFile)
  • procedure RestoreLayoutReg(IniFile: TRegIniFile)
  • procedure SaveLayout(IniFile: TIniFile)
  • procedure RestoreLayout(IniFile: TIniFile)
  • procedure ReArrangeButtons(ByList: TStringList)
  • function Items(Section: Integer; Index: Integer): TSpeedItem

TRxCalculator -> TJvCalculator

TRxTimerList -> TJvTimerList

Properties:
  • public property Count: Integer
  • public property EnabledCount: Integer
  • published property Events: TList
Methods:
  • function Add(AOnTimer: TNotifyEvent; AInterval: Integer; ACycled: Boolean): Integer
  • function AddItem(Item: TRxTimerEvent): Integer
  • procedure Clear
  • procedure Delete(AHandle: Integer)
  • procedure Activate
  • procedure Deactivate
  • function ItemByHandle(AHandle: Integer): TRxTimerEvent
  • function ItemIndexByHandle(AHandle: Integer): Integer

TPageManager -> TJvPageManager

Properties:
  • public property PageHistory: TPageHistory
  • public property HistoryCommand: TPageHistoryCommand

TMergeManager -> TJvMergeManager

Properties:
  • public property FormHistory: TFormHistory

TMRUManager -> TJvMRUManager

Properties:
  • published property IniStorage: TFormPlacement
Methods:
  • procedure LoadFromRegistry(Ini: TRegIniFile; const Section: string)
  • procedure SaveToRegistry(Ini: TRegIniFile; const Section: string)
  • procedure LoadFromIni(Ini: TIniFile; const Section: string)
  • procedure SaveToIni(Ini: TIniFile; const Section: string)

TSecretPanel -> TJvSecretPanel

Properties:
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean

TStrHolder -> TJvStrHolder

Properties:
  • published property Macros: TMacros
  • published property KeyString: AnsiString
Methods:
  • function MacroByName(const MacroName: string): TMacro

TRxTrayIcon -> TJvTrayIcon

Properties:
  • public property Handle: HWND
  • published property Enabled: Boolean
  • published property Icons: TIconList
  • published property Interval: Word
  • published property ShowDesign: Boolean
  • published property OnDblClick: TNotifyEvent
Methods:
  • procedure Hide
  • procedure Show

TRxMainMenu -> TJvMainMenu

Properties:
  • published property MinTextOffset: Cardinal
  • published property Style: TRxMenuStyle
  • published property Images: TImageList

TRxPopupMenu -> TJvPopupMenu

Properties:
  • published property LeftMargin: Cardinal
  • published property MinTextOffset: Cardinal
  • published property Style: TRxMenuStyle
  • published property Images: TImageList
  • published property OnDrawMargin: TDrawMarginEvent
Methods:
  • procedure DefaultDrawMargin(ARect: TRect; StartColor: TColor; EndColor: TColor)

TClipboardViewer -> TJvClipboardViewer

TRxGradientCaption -> TJvGradientCaption

TDualListDialog -> TJvDualListDialog

Properties:
  • published property Ctl3D: Boolean

TRxLoginDialog -> TJvLoginDialog

Properties:
  • published property IniFileName: string
  • published property UseRegistry: Boolean

TRxMemoryData -> TJvMemoryData

Methods:
  • procedure CopyStructure(Source: TDataSet)
  • function LoadFromDataSet(Source: TDataSet; RecordCount: Integer; Mode: TLoadMode): Integer
  • function SaveToDataSet(Dest: TDataSet; RecordCount: Integer): Integer

TRxDBGrid -> TJvDBGrid

Properties:
  • published property IniStorage: TFormPlacement
  • published property OnShowEditor: TDBEditShowEvent
Methods:
  • procedure SaveLayout(IniFile: TIniFile)
  • procedure RestoreLayout(IniFile: TIniFile)
  • procedure SaveLayoutReg(IniFile: TRegIniFile)
  • procedure RestoreLayoutReg(IniFile: TRegIniFile)

TRxDBLookupList -> TJvDBLookupList

Properties:
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean

TRxDBLookupCombo -> TJvDBLookupCombo

Properties:
  • published property EscapeClear: Boolean
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean

TRxLookupEdit -> TJvDBLookupEdit

Properties:
  • published property ParentCtl3D: Boolean

TDBDateEdit -> TJvDBDateEdit

Properties:
  • published property ParentCtl3D: Boolean

TRxDBCalcEdit -> TJvDBCalcEdit

Properties:
  • published property ParentCtl3D: Boolean

TRxDBComboEdit -> TJvDBComboEdit

Properties:
  • public property Button: TEditButton
  • published property ParentCtl3D: Boolean

TRxDBRichEdit -> TJvDBRichEdit

Fields:
  • PercentDone: Byte @ 360
  • PrnPreviews: TList @ 364
  • PrnPreview: TMetafile @ 368
Properties:
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean
  • public property DefaultConverter: TConversionClass
  • public property LinesUpdating: Boolean
  • public property RtfSelText: string
  • public property LinkClickRange: _charrange
  • public property DrawEndPage: Boolean
Methods:
  • procedure CreatePrnPrew(const Caption: string)
  • class procedure RegisterConversionFormat(const AExtension: string; APlainText: Boolean; AConversionClass: TConversionClass)

TDBStatusLabel -> TJvDBStatusLabel

Properties:
  • public property MouseInControl: Boolean

TRxDBComboBox -> TJvDBComboBox

Properties:
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean

TRxQuery -> TJvQuery

TSQLScript -> TJvSQLScript

TMemoryTable -> TJvBDEMemoryTable

TQBEQuery -> TJvQBEQuery

TRxDBFilter -> TJvDBFilter

TDBIndexCombo -> TJvDBIndexCombo

Properties:
  • published property NoIndexItem: string
  • published property DisplayMode: TIdxDisplayMode
  • published property Ctl3D: Boolean
  • published property ParentCtl3D: Boolean

TDBProgress -> TJvDBProgress

TDBSecurity -> TJvDBSecurity

Properties:
  • published property IniFileName: string
  • published property UseRegistry: Boolean

TBDEItems -> TJvBDEItems

TDatabaseItems -> TJvDatabaseItems

TTableItems -> TJvTableItems

Ссылки по теме

3 ко��ментария:

  1. более информативно :), у меня возникли проблемы с TJvFormStorage и с TJvPopupMenu, но если TJvFormStorage мне пришлось переписывать ручками то отсутствие OnDrawMargin в TJvPopupMenu как то огорчило.

    ОтветитьУдалить
  2. =))

    TjvFormStorage был наверное изменён больше всех. Причём, имхо в лучшую сторону. Код отвечающий непосредственно за сохранение и загрузку был вынесен в отдельный компонент, и это хорошо.

    А по-поводу TjvPopupMenu и OnDrawMargin. В JVCL за рисование менюшек, отвечают отдельные компоненты-пэйнтеры: - РазныеMenuItemPainter-ы.
    Так вот, событие OnDrawMargin, насколько я понимаю было перенесёнр в пэйнтер TjvStandardMenuItemPainter.

    ОтветитьУдалить
  3. когда что то меняется в лучшую сторону это очень хорошо, плохо что надо меня это самому :)

    Спасибо за TjvStandardMenuItemPainter, особо не искал, но и не нашел :)

    ОтветитьУдалить

Постоянные читатели