قبل از 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;