我使用IP控件后,为什么窗体的字体全都变大了呢?(20分)

我这样使用了一个IP控件:
TIPEdit = class (TEdit)
protected
procedure CreateParams(var Params: TCreateParams); override;
end;
procedure TIPEdit.CreateParams(var Params: TCreateParams);
begin
inherited;
if not (csDesigning in ComponentState) then
begin
InitCommonControl(ICC_INTERNET_CLASSES);
CreateSubClass(Params, WC_IPADDRESS);
end;
end;

但是当程序运行时,
问题 1:为什么我用鼠标进入该控件后再退出该窗体,则调用它的主窗体的某些字体变大,
2.此时再进入使用该控件的窗体,则此窗体的字体全部变大?

怎么没人回答呢?叫我怎么结贴呢?

DFW的人气确实是越来越差了.

各位老师快来拿分吧,我都结不了贴了.

我也遇到过类似奇怪的问题，不过不是你这个控件，是TreeView，我如果让TreeView自己画Item，则下一个Item字体就变大了，而且我的代码只操作当前的Item，真是不知道为什么。帮你顶一下把。

越来越

人呢,我还在学啊