Delphi 2009: Как да предотвратя прехвърлянето на дъщерните рамки във формата на хост?

Откакто надстроих до Delphi 2009, имам ужасен опит с наследниците на TFrame. По принцип дъщерните компоненти на рамката се изливат в хост формата като обект и това причинява срив на името, класът не е намерен и т.н. В dfm по-старият използван Delphi има рамката като inline и дъщерните компоненти като inherited. Delphi 2009 IDE сега разширява децата като object.

Редактиране: Виждал съм да се случва с множество формуляри, но не мога да го възпроизведа с демонстрационно приложение в малък мащаб.


frame delphi delphi-2009
person Eugene Yokota    schedule 23.06.2009    source източник
comment
Не съм имал никакви проблеми с това. Можете ли да дадете пример?   -  person Mason Wheeler    schedule 23.06.2009
comment
Същото и тук - няма проблеми с наследените рамки. И аз ги използвам много.   -  person Uwe Raabe    schedule 23.06.2009
comment
въздишка Имал съм такива грешки, които не мога да сведа до обикновен POC. Вижте дали можете да намерите някакъв начин да докладвате това на QC.   -  person Mason Wheeler    schedule 23.06.2009

Отговори (2)


arrow_upward
1
arrow_downward

Не знам какво се случи с вашият проект, но току-що създадох чисто ново приложение D2009 с:
- основен формуляр,
- предшестваща рамка, съдържаща Edit1 и Label1 ,
- Child Frame, произлизащ от предшественика, където добавих Label2 и Edit2
- екземпляр на ChildFrame, поставен върху основния формуляр, където преместих леко Label2.

Ето много нормално изглеждащия резултатен dfm:

object MyForm: TMyForm
  Left = 0
  Top = 0
  Caption = 'MyForm'
  ClientHeight = 286
  ClientWidth = 412
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  inline ChildFrame1: TChildFrame
    Left = 8
    Top = 8
    Width = 313
    Height = 240
    TabOrder = 0
    ExplicitLeft = 8
    ExplicitTop = 8
    ExplicitWidth = 313
    inherited Label2: TLabel
      Left = 162
      ExplicitLeft = 162
    end
  end
end
person Francesca    schedule 23.06.2009

arrow_upward
0
arrow_downward

Правилно ли са добавени родителските форми към .dpr?

person Marco van de Voort    schedule 23.06.2009
comment
@Marco, да, добавени са към dpr. - person Eugene Yokota; 24.06.2009