Delphi组件开发过程中碰到的怪问题
求教高手：我按下面的代码做了个测试，发现组建TT2在属性对话框中设置MyFont有效，而运行的时候字体又还原了，搞了一天了也不知道为什么，还望高人指点一下，谢谢了！
unit T1;
interface
uses
SysUtils, Classes, Controls, ExtCtrls, Graphics, StdCtrls;
type
TT1 = class(TPanel)
private
FFont:TFont;
procedure SetFont(const Value: TFont);
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
procedure SetLayout;virtual;
published
property MyFont:TFont read FFont write SetFont;
end;
TT2=class(TT1)
private
FLabel:TLabel;
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
procedure SetLayout;override;
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('MyTest', [TT2]);
end;
{ TT1 }
constructor TT1.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
FFont:=TFont.Create;
FFont.Assign(inherited Font);
end;
<
相关问答：
这语言好难啊 学delphi简单 哭
一个dll 和一个 指针函数调用 搞了我2礼拜 还是在我有delphi基础的情况下 哭
难度 比 delphi 高很多。继续努力学啊。
好像也并不比delphi难多少吧
主要代码 不直观了� ......
delphi 异步线程怎么怎么实现？
请各位大佬帮忙！
最好有个实例！
多谢
你不同步就是异步了,还写啥
默认情况下，线程就是异步的…………*^_^*
估计楼主同步和异步概念都没弄清
真无语。。可 ......
Embarcadero在8月26日正式发布了RAD Studio 2010(就是大家常用的Delphi 2010)，本人花了大概四个小时来安装和体验Delphi2010，现将体验结果向大家做个简单汇报。
一.优点:
1.IDE
1.1经� ......
总之，这个应该是个小BUG。
随便建个txt文档
第一行68个s加一个回车
第二行98个s加一个回车
第三行17个s加一个回车
总共183个s加三个换行，大小189字节。
接着用FileOpen和FileRead把文件 ......
昨晚在Delphi数据库查询中遇到了一个疑惑。代码如下：
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......
