【结贴】隐式转换**

jianth2005

procedure TMainForm.BizFormPaint(Sender: TObject);
begin
  TreeChart1.IndentX:=Self.Width/2;
end;
错误:不能隐式转换 "Double" 成为 "UInt16"

不知道哪个函数里有double 转到 Uint16??

zfang

强制类型转换一下看看
UInt16（Self.Width/2）

jianth2005

谢谢!
揭贴了