Mega Code Archive

 

Categories / Delphi / Forms

 

Hint fontunun değiştirilmesi

implementation {$R *.DFM} Type THintConFont = Class (THintWindow) Constructor Create (AOwner: TComponent); override; end; Constructor THintConFont.Create (AOwner: TComponent); begin Inherited Create (Aowner); Canvas.Font.Name := 'Times New Roman'; Canvas.Font.Size := 18; end;