大问题啊.请帮忙

Question

Form里包括一个FFont
如果我们要控制一个窗口的字体,只要把传给TFont
比如MFont:TFont;
MFont:=TFont.Create;
MFont.Handle:=GetDc(要控制窗口Handle);
可是我找遍TForm以及祖先的代码,却找不到类似代码啊..

Answer 1

{ TControl }constructor TControl.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  FWindowProc := WndProc;
  FControlStyle := [csCaptureMouse, csClickEvents, csSetCaption, csDoubleClicks];
  FFont := TFont.Create;
  FFont.OnChange := FontChanged;
......

Answer 2

这个是创建这个对象啊
并没有把句柄传给FFont啊