Hint با فونتی متفاوت

چطور می توان Hint (ToolTip) ی با فونتی متفاوت از فونت استاندارد که ویندوز برای Hin داره ، داشت ؟

قبل از Type اصلی برنامه خطوط زیر رو وارد کنید

TMyHint=Class (ThinTWindow(

Constructor Create (Aowner:TComponent);override;

End;

با این کار ما یک کلاس جدیدی از Hint رو برای دلفی تعریف کردیم .

و حالا خطوط زیر را در زیر Implementation بنویسید :

Constructor TMyhint.Create(Aowner:TComponent);

Begin

inherited Create (Aowner);

Canvas.Font.Name:=’Arial’;

Canvas.Brush.Color:=ClBlue;

End;

و با این کار ساختار TMyHint را بوجود آوردیم ، یعنی خواستیم که فونت آن Arial و رنگ آن آبی باشد.

سپس در انتها برای اینکه این ساختار در برنامه اعمال شود خطوط زیر در قسمت OnCreate فرم

اصلی برنامه کپی کنید :

Application.ShowHint:=False;

HintWindowClass:=TMyhint;

Application.ShowHint:=True;