小编Luc*_*lva的帖子

我正在尝试在Delphi 10.1 Berlin中执行以下操作,但编译器返回消息"F2084 Internal Error:AV0A785E48-R000000-10-0":

TMyType = (mtValue1, mtValue2);

TMyBaseClass = class
private
  FMyType: TMyType;
public
  property MyType: TMyType read FMyType write FMyType;
end;

TMyClass = class(TMyBaseClass)
private
  FOtherField: Integer;
public
  property OtherField: Integer read FOtherField write FOtherField;
end;

TMyBaseProcess1<T: TMyBaseClass> = class
strict private
  FMyClass: T;
strict protected
  type
    TMyTypeHelper = record Helper for TMyType
    public
      function ToString: string;
    end;
public
  constructor Create(AMyClass: T);
  procedure DoSomething;
end;

TMyProcess1 = class(TMyBaseProcess1<TMyClass>)
end;

TMyBaseProcess2<T: TMyBaseClass> = class
strict private
  FMyClass: T; …

我有两种形式.第一个有TToolBar和两个TToolButton.第二个继承第一个,还有三个TToolButton.我在设计时更改了按钮的顺序,将第二个表单的三个按钮放在第一个表单的按钮之前.当应用程序运行时,第二个表单的按钮出现在第一个表单的按钮之后.

有没有办法在设计时使用订单？