Незарегистрированные классы в импорте

отредактировано 14:30 Раздел: FastScript
Была написана утилитка для проверки корректности импорта.

Вот результат.(Соответственно класс типа TSizeConstraints и др. не зарегистрирован в скриптовой
системе)

TBevel.property Constraints: Class TSizeConstraints <Class not found>
TBlobField.property BlobType: TBlobType <Class not found>
TButton.property Action: Class TBasicAction <Class not found>
TButton.property BiDiMode: TBiDiMode <Class not found>
TButton.property Constraints: Class TSizeConstraints <Class not found>
TButton.property DragKind: TDragKind <Class not found>
TButton.property DragMode: TDragMode <Class not found>
TButton.property PopupMenu: Class TPopupMenu <Class not found>
TCheckBox.property Action: Class TBasicAction <Class not found>
TCheckBox.property Alignment: TLeftRight <Class not found>
TCheckBox.property BiDiMode: TBiDiMode <Class not found>
TCheckBox.property Constraints: Class TSizeConstraints <Class not found>
TCheckBox.property DragKind: TDragKind <Class not found>
TCheckBox.property DragMode: TDragMode <Class not found>
TCheckBox.property PopupMenu: Class TPopupMenu <Class not found>
TCheckListBox.property BevelEdges: TBevelEdges <Class not found>
TCheckListBox.property BevelKind: TBevelKind <Class not found>
TCheckListBox.property BiDiMode: TBiDiMode <Class not found>
TCheckListBox.property Constraints: Class TSizeConstraints <Class not found>
TCheckListBox.property DragKind: TDragKind <Class not found>
TCheckListBox.property DragMode: TDragMode <Class not found>
TCheckListBox.property ImeMode: TImeMode <Class not found>
TCheckListBox.property PopupMenu: Class TPopupMenu <Class not found>
TColumn.property ImeMode: TImeMode <Class not found>
TColumn.property PopupMenu: Class TPopupMenu <Class not found>
TComboBox.property BevelEdges: TBevelEdges <Class not found>
TComboBox.property BevelKind: TBevelKind <Class not found>
TComboBox.property BiDiMode: TBiDiMode <Class not found>
TComboBox.property Constraints: Class TSizeConstraints <Class not found>
TComboBox.property DragKind: TDragKind <Class not found>
TComboBox.property DragMode: TDragMode <Class not found>
TComboBox.property ImeMode: TImeMode <Class not found>
TComboBox.property PopupMenu: Class TPopupMenu <Class not found>
TControl.property HelpType: THelpType <Class not found>
TControlScrollBar.property Style: TScrollBarStyle <Class not found>
TDateTimePicker.property BevelEdges: TBevelEdges <Class not found>
TDateTimePicker.property BevelKind: TBevelKind <Class not found>
TDateTimePicker.property BiDiMode: TBiDiMode <Class not found>
TDateTimePicker.property Constraints: Class TSizeConstraints <Class not found>
TDateTimePicker.property DragKind: TDragKind <Class not found>
TDateTimePicker.property DragMode: TDragMode <Class not found>
TDateTimePicker.property ImeMode: TImeMode <Class not found>
TDateTimePicker.property PopupMenu: Class TPopupMenu <Class not found>
TDBCheckBox.property Action: Class TBasicAction <Class not found>
TDBCheckBox.property Alignment: TLeftRight <Class not found>
TDBCheckBox.property BiDiMode: TBiDiMode <Class not found>
TDBCheckBox.property Constraints: Class TSizeConstraints <Class not found>
TDBCheckBox.property DragKind: TDragKind <Class not found>
TDBCheckBox.property DragMode: TDragMode <Class not found>
TDBCheckBox.property PopupMenu: Class TPopupMenu <Class not found>
TDBComboBox.property BevelEdges: TBevelEdges <Class not found>
TDBComboBox.property BevelKind: TBevelKind <Class not found>
TDBComboBox.property BiDiMode: TBiDiMode <Class not found>
TDBComboBox.property Constraints: Class TSizeConstraints <Class not found>
TDBComboBox.property DragKind: TDragKind <Class not found>
TDBComboBox.property DragMode: TDragMode <Class not found>
TDBComboBox.property ImeMode: TImeMode <Class not found>
TDBComboBox.property PopupMenu: Class TPopupMenu <Class not found>
TDBEdit.property BevelEdges: TBevelEdges <Class not found>
TDBEdit.property BevelKind: TBevelKind <Class not found>
TDBEdit.property BiDiMode: TBiDiMode <Class not found>
TDBEdit.property Constraints: Class TSizeConstraints <Class not found>
TDBEdit.property DragKind: TDragKind <Class not found>
TDBEdit.property DragMode: TDragMode <Class not found>
TDBEdit.property ImeMode: TImeMode <Class not found>
TDBEdit.property PopupMenu: Class TPopupMenu <Class not found>
TDBGrid.property BiDiMode: TBiDiMode <Class not found>
TDBGrid.property Constraints: Class TSizeConstraints <Class not found>
TDBGrid.property DragKind: TDragKind <Class not found>
TDBGrid.property DragMode: TDragMode <Class not found>
TDBGrid.property ImeMode: TImeMode <Class not found>
TDBGrid.property PopupMenu: Class TPopupMenu <Class not found>
TDBImage.property Constraints: Class TSizeConstraints <Class not found>
TDBImage.property DragKind: TDragKind <Class not found>
TDBImage.property DragMode: TDragMode <Class not found>
TDBImage.property PopupMenu: Class TPopupMenu <Class not found>
TDBListBox.property BevelEdges: TBevelEdges <Class not found>
TDBListBox.property BevelKind: TBevelKind <Class not found>
TDBListBox.property BiDiMode: TBiDiMode <Class not found>
TDBListBox.property Constraints: Class TSizeConstraints <Class not found>
TDBListBox.property DragKind: TDragKind <Class not found>
TDBListBox.property DragMode: TDragMode <Class not found>
TDBListBox.property ImeMode: TImeMode <Class not found>
TDBListBox.property PopupMenu: Class TPopupMenu <Class not found>
TDBLookupComboBox.property BevelEdges: TBevelEdges <Class not found>
TDBLookupComboBox.property BevelKind: TBevelKind <Class not found>
TDBLookupComboBox.property BiDiMode: TBiDiMode <Class not found>
TDBLookupComboBox.property Constraints: Class TSizeConstraints <Class not found>
TDBLookupComboBox.property DragKind: TDragKind <Class not found>
TDBLookupComboBox.property DragMode: TDragMode <Class not found>
TDBLookupComboBox.property DropDownAlign: TDropDownAlign <Class not found>
TDBLookupComboBox.property ImeMode: TImeMode <Class not found>
TDBLookupComboBox.property PopupMenu: Class TPopupMenu <Class not found>
TDBLookupListBox.property BevelEdges: TBevelEdges <Class not found>
TDBLookupListBox.property BevelKind: TBevelKind <Class not found>
TDBLookupListBox.property BiDiMode: TBiDiMode <Class not found>
TDBLookupListBox.property Constraints: Class TSizeConstraints <Class not found>
TDBLookupListBox.property DragKind: TDragKind <Class not found>
TDBLookupListBox.property DragMode: TDragMode <Class not found>
TDBLookupListBox.property ImeMode: TImeMode <Class not found>
TDBLookupListBox.property PopupMenu: Class TPopupMenu <Class not found>
TDBMemo.property BevelEdges: TBevelEdges <Class not found>
TDBMemo.property BevelKind: TBevelKind <Class not found>
TDBMemo.property BiDiMode: TBiDiMode <Class not found>
TDBMemo.property Constraints: Class TSizeConstraints <Class not found>
TDBMemo.property DragKind: TDragKind <Class not found>
TDBMemo.property DragMode: TDragMode <Class not found>
TDBMemo.property ImeMode: TImeMode <Class not found>
TDBMemo.property PopupMenu: Class TPopupMenu <Class not found>
TDBNavigator.property Constraints: Class TSizeConstraints <Class not found>
TDBNavigator.property DragKind: TDragKind <Class not found>
TDBNavigator.property DragMode: TDragMode <Class not found>
TDBNavigator.property PopupMenu: Class TPopupMenu <Class not found>
TDBRadioGroup.property BiDiMode: TBiDiMode <Class not found>
TDBRadioGroup.property Constraints: Class TSizeConstraints <Class not found>
TDBRadioGroup.property DragKind: TDragKind <Class not found>
TDBRadioGroup.property DragMode: TDragMode <Class not found>
TDBRadioGroup.property PopupMenu: Class TPopupMenu <Class not found>
TDBText.property BiDiMode: TBiDiMode <Class not found>
TDBText.property Constraints: Class TSizeConstraints <Class not found>
TDBText.property DragKind: TDragKind <Class not found>
TDBText.property DragMode: TDragMode <Class not found>
TDBText.property PopupMenu: Class TPopupMenu <Class not found>
TEdit.property BevelEdges: TBevelEdges <Class not found>
TEdit.property BevelKind: TBevelKind <Class not found>
TEdit.property BiDiMode: TBiDiMode <Class not found>
TEdit.property Constraints: Class TSizeConstraints <Class not found>
TEdit.property DragKind: TDragKind <Class not found>
TEdit.property DragMode: TDragMode <Class not found>
TEdit.property ImeMode: TImeMode <Class not found>
TEdit.property PopupMenu: Class TPopupMenu <Class not found>
TField.property AutoGenerateValue: TAutoRefreshFlag <Class not found>
TField.property FieldKind: TFieldKind <Class not found>
TField.property ProviderFlags: TProviderFlags <Class not found>
TFieldDef.property Attributes: TFieldAttributes <Class not found>
TForm.property Action: Class TBasicAction <Class not found>
TForm.property BiDiMode: TBiDiMode <Class not found>
TForm.property Constraints: Class TSizeConstraints <Class not found>
TForm.property DefaultMonitor: TDefaultMonitor <Class not found>
TForm.property DragKind: TDragKind <Class not found>
TForm.property DragMode: TDragMode <Class not found>
TForm.property Icon: Class TIcon <Class not found>
TForm.property Menu: Class TMainMenu <Class not found>
TForm.property ObjectMenuItem: Class TMenuItem <Class not found>
TForm.property PopupMenu: Class TPopupMenu <Class not found>
TForm.property PrintScale: TPrintScale <Class not found>
TForm.property WindowMenu: Class TMenuItem <Class not found>
TGroupBox.property BiDiMode: TBiDiMode <Class not found>
TGroupBox.property Constraints: Class TSizeConstraints <Class not found>
TGroupBox.property DragKind: TDragKind <Class not found>
TGroupBox.property DragMode: TDragMode <Class not found>
TGroupBox.property PopupMenu: Class TPopupMenu <Class not found>
TIBDatabase.property TraceFlags: TTraceFlags <Class not found>
TIBQuery.property Constraints: Class TCheckConstraints <Class not found>
TIBQuery.property GeneratorField: Class TIBGeneratorField <Class not found>
TIBQuery.property UpdateObject: Class TIBDataSetUpdateObject <Class not found>
TIBTable.property Constraints: Class TCheckConstraints <Class not found>
TIBTable.property IndexDefs: Class TIndexDefs <Class not found>
TIBTable.property TableTypes: TIBTableTypes <Class not found>
TIBTable.property UpdateObject: Class TIBDataSetUpdateObject <Class not found>
TIBTransaction.property AutoStopAction: TAutoStopAction <Class not found>
TIBTransaction.property DefaultAction: TTransactionAction <Class not found>
TImage.property Constraints: Class TSizeConstraints <Class not found>
TImage.property DragKind: TDragKind <Class not found>
TImage.property DragMode: TDragMode <Class not found>
TImage.property PopupMenu: Class TPopupMenu <Class not found>
TLabel.property BiDiMode: TBiDiMode <Class not found>
TLabel.property Constraints: Class TSizeConstraints <Class not found>
TLabel.property DragKind: TDragKind <Class not found>
TLabel.property DragMode: TDragMode <Class not found>
TLabel.property PopupMenu: Class TPopupMenu <Class not found>
TListBox.property BevelEdges: TBevelEdges <Class not found>
TListBox.property BevelKind: TBevelKind <Class not found>
TListBox.property BiDiMode: TBiDiMode <Class not found>
TListBox.property Constraints: Class TSizeConstraints <Class not found>
TListBox.property DragKind: TDragKind <Class not found>
TListBox.property DragMode: TDragMode <Class not found>
TListBox.property ImeMode: TImeMode <Class not found>
TListBox.property PopupMenu: Class TPopupMenu <Class not found>
TListView.property Action: Class TBasicAction <Class not found>
TListView.property BevelEdges: TBevelEdges <Class not found>
TListView.property BevelKind: TBevelKind <Class not found>
TListView.property BiDiMode: TBiDiMode <Class not found>
TListView.property Constraints: Class TSizeConstraints <Class not found>
TListView.property DragKind: TDragKind <Class not found>
TListView.property DragMode: TDragMode <Class not found>
TListView.property HotTrackStyles: TListHotTrackStyles <Class not found>
TListView.property LargeImages: Class TCustomImageList <Class not found>
TListView.property PopupMenu: Class TPopupMenu <Class not found>
TListView.property SmallImages: Class TCustomImageList <Class not found>
TListView.property StateImages: Class TCustomImageList <Class not found>
TMemo.property BevelEdges: TBevelEdges <Class not found>
TMemo.property BevelKind: TBevelKind <Class not found>
TMemo.property BiDiMode: TBiDiMode <Class not found>
TMemo.property Constraints: Class TSizeConstraints <Class not found>
TMemo.property DragKind: TDragKind <Class not found>
TMemo.property DragMode: TDragMode <Class not found>
TMemo.property ImeMode: TImeMode <Class not found>
TMemo.property PopupMenu: Class TPopupMenu <Class not found>
TMonthCalendar.property BiDiMode: TBiDiMode <Class not found>
TMonthCalendar.property Constraints: Class TSizeConstraints <Class not found>
TMonthCalendar.property DragKind: TDragKind <Class not found>
TMonthCalendar.property DragMode: TDragMode <Class not found>
TMonthCalendar.property ImeMode: TImeMode <Class not found>
TMonthCalendar.property PopupMenu: Class TPopupMenu <Class not found>
TOpenDialog.property OptionsEx: TOpenOptionsEx <Class not found>
TPageControl.property BiDiMode: TBiDiMode <Class not found>
TPageControl.property Constraints: Class TSizeConstraints <Class not found>
TPageControl.property DragKind: TDragKind <Class not found>
TPageControl.property DragMode: TDragMode <Class not found>
TPageControl.property Images: Class TCustomImageList <Class not found>
TPageControl.property PopupMenu: Class TPopupMenu <Class not found>
TPaintBox.property Constraints: Class TSizeConstraints <Class not found>
TPaintBox.property DragKind: TDragKind <Class not found>
TPaintBox.property DragMode: TDragMode <Class not found>
TPaintBox.property PopupMenu: Class TPopupMenu <Class not found>
TPanel.property BiDiMode: TBiDiMode <Class not found>
TPanel.property Constraints: Class TSizeConstraints <Class not found>
TPanel.property DragKind: TDragKind <Class not found>
TPanel.property DragMode: TDragMode <Class not found>
TPanel.property PopupMenu: Class TPopupMenu <Class not found>
TProgressBar.property Constraints: Class TSizeConstraints <Class not found>
TProgressBar.property DragKind: TDragKind <Class not found>
TProgressBar.property DragMode: TDragMode <Class not found>
TProgressBar.property PopupMenu: Class TPopupMenu <Class not found>
TRadioButton.property Action: Class TBasicAction <Class not found>
TRadioButton.property Alignment: TLeftRight <Class not found>
TRadioButton.property BiDiMode: TBiDiMode <Class not found>
TRadioButton.property Constraints: Class TSizeConstraints <Class not found>
TRadioButton.property DragKind: TDragKind <Class not found>
TRadioButton.property DragMode: TDragMode <Class not found>
TRadioButton.property PopupMenu: Class TPopupMenu <Class not found>
TRichEdit.property BevelEdges: TBevelEdges <Class not found>
TRichEdit.property BevelKind: TBevelKind <Class not found>
TRichEdit.property BiDiMode: TBiDiMode <Class not found>
TRichEdit.property Constraints: Class TSizeConstraints <Class not found>
TRichEdit.property DragKind: TDragKind <Class not found>
TRichEdit.property DragMode: TDragMode <Class not found>
TRichEdit.property ImeMode: TImeMode <Class not found>
TRichEdit.property PopupMenu: Class TPopupMenu <Class not found>
TScrollBox.property BevelEdges: TBevelEdges <Class not found>
TScrollBox.property BevelKind: TBevelKind <Class not found>
TScrollBox.property BiDiMode: TBiDiMode <Class not found>
TScrollBox.property Constraints: Class TSizeConstraints <Class not found>
TScrollBox.property DragKind: TDragKind <Class not found>
TScrollBox.property DragMode: TDragMode <Class not found>
TScrollBox.property PopupMenu: Class TPopupMenu <Class not found>
TShape.property Constraints: Class TSizeConstraints <Class not found>
TShape.property DragKind: TDragKind <Class not found>
TShape.property DragMode: TDragMode <Class not found>
TSpeedButton.property Action: Class TBasicAction <Class not found>
TSpeedButton.property BiDiMode: TBiDiMode <Class not found>
TSpeedButton.property Constraints: Class TSizeConstraints <Class not found>
TSpeedButton.property PopupMenu: Class TPopupMenu <Class not found>
TSplitter.property Constraints: Class TSizeConstraints <Class not found>
TStatusBar.property Action: Class TBasicAction <Class not found>
TStatusBar.property BiDiMode: TBiDiMode <Class not found>
TStatusBar.property Constraints: Class TSizeConstraints <Class not found>
TStatusBar.property DragKind: TDragKind <Class not found>
TStatusBar.property DragMode: TDragMode <Class not found>
TStatusBar.property PopupMenu: Class TPopupMenu <Class not found>
TStatusPanel.property BiDiMode: TBiDiMode <Class not found>
TTabControl.property BiDiMode: TBiDiMode <Class not found>
TTabControl.property Constraints: Class TSizeConstraints <Class not found>
TTabControl.property DragKind: TDragKind <Class not found>
TTabControl.property DragMode: TDragMode <Class not found>
TTabControl.property Images: Class TCustomImageList <Class not found>
TTabControl.property PopupMenu: Class TPopupMenu <Class not found>
TTabSheet.property Constraints: Class TSizeConstraints <Class not found>
TTabSheet.property DragMode: TDragMode <Class not found>
TTabSheet.property PopupMenu: Class TPopupMenu <Class not found>
TToolBar.property Constraints: Class TSizeConstraints <Class not found>
TToolBar.property DisabledImages: Class TCustomImageList <Class not found>
TToolBar.property DragKind: TDragKind <Class not found>
TToolBar.property DragMode: TDragMode <Class not found>
TToolBar.property EdgeBorders: TEdgeBorders <Class not found>
TToolBar.property EdgeInner: TEdgeStyle <Class not found>
TToolBar.property EdgeOuter: TEdgeStyle <Class not found>
TToolBar.property HotImages: Class TCustomImageList <Class not found>
TToolBar.property Images: Class TCustomImageList <Class not found>
TToolBar.property Menu: Class TMainMenu <Class not found>
TToolBar.property PopupMenu: Class TPopupMenu <Class not found>
TToolButton.property Action: Class TBasicAction <Class not found>
TToolButton.property DragKind: TDragKind <Class not found>
TToolButton.property DragMode: TDragMode <Class not found>
TToolButton.property DropdownMenu: Class TPopupMenu <Class not found>
TToolButton.property MenuItem: Class TMenuItem <Class not found>
TToolButton.property PopupMenu: Class TPopupMenu <Class not found>
TTrackBar.property Constraints: Class TSizeConstraints <Class not found>
TTrackBar.property DragKind: TDragKind <Class not found>
TTrackBar.property DragMode: TDragMode <Class not found>
TTrackBar.property PopupMenu: Class TPopupMenu <Class not found>
TTreeView.property BevelEdges: TBevelEdges <Class not found>
TTreeView.property BevelKind: TBevelKind <Class not found>
TTreeView.property BiDiMode: TBiDiMode <Class not found>
TTreeView.property Constraints: Class TSizeConstraints <Class not found>
TTreeView.property DragKind: TDragKind <Class not found>
TTreeView.property DragMode: TDragMode <Class not found>
TTreeView.property Images: Class TCustomImageList <Class not found>
TTreeView.property MultiSelectStyle: TMultiSelectStyle <Class not found>
TTreeView.property PopupMenu: Class TPopupMenu <Class not found>
TTreeView.property StateImages: Class TCustomImageList <Class not found>

Комментарии

  • отредактировано 14:30
    Ну так а в чем собственно проблема ? К чему сия простыня?
  • отредактировано 14:30
    >>>Ну так а в чем собственно проблема ? К чему сия простыня?
    А то что при компиляции в стандартной поставки вещей типа
    .Constraints.MaxHeight := 0;
    возбуждается сообщение о незарегистрированном классе TSizeConstraints.
    Соответственно такие свойства нужно убирать или регистрить те классы к которым они принадлежат. А то получаются какие то "дыры".
    Не проблема можно и самому ручками сделать, но хочется что бы по человечеке было в стандартной поставке.....

  • отредактировано 14:30
    Ну вот Пакетирование
    я думаю, что эти топики есть по сути одно и тоже. Имея возможность безболезненно
    править реализацию стандатных дельфийский компонентов, можно было бы написать для себя их реализацию как тебе хочееться, а потом даже поделиться со всеми, а так мы зависим от разработчиков их "стандартных" реализаций. а они люди занятые, и на проблемы простых смертных увы времени нету.

    Присоединяйся ;)
  • отредактировано 14:30
    Да, косаясь импорта, пара замечаний:

    fs_iextctrlsrtti.pas

    AddClass(TBitBtn, 'TGraphicControl');
    >>> AddClass(TBitBtn, 'TButton');

    fs_iformsrtti.pas

    AddClass(TLabel, 'TWinControl');
    >>>AddClass(TLabel, 'TControl');

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.