老问题了:dll中出现“cannot assign a tfont to a tfont”(50分)

  • 主题发起人 主题发起人 cheunjq
  • 开始时间 开始时间
C

cheunjq

Unregistered / Unconfirmed
GUEST, unregistred user!
看了几个帖子,没找到真正的解决办法
 
错误是DELPHI将你的主EXE跟DLL看成是两个独立的程序,所以你编译的时候要
带包编译就可以了。。。。
 
带包编译是解决不了的。偶以前做的项目恰恰就遇到过这问题
你的程序是不是用了CX控件?
 
---------------网上转的

在DLL窗体的单元中加入下面几行代码
var
NewFont: TFont;
......

procedure TfrmModal.FormCreate(Sender: TObject);
begin

frmModal.Font := NewFont;
end;

......

initialization
NewFont := TFont.Create;
NewFont.Color := clBlue;
//这里要改什么字体,你自己随便
NewFont.Size := 36;
finalization
NewFont.Free;
NewFont := nil;
 
后退
顶部