Merubah Warna (Font) Hint di Delphi

Sekarang saya Posting lagi Coding untuk merubah Tampilan teks/Font Hint pada Delphi.

coba perhatikan baik" koding dibawah ini :

 
type
    TeksHint= class(THintWindow)
    constructor Create(AOwner: TComponent); override;
end;

{untuk yang kode di atas Simpan Setelah Var }

constructor TeksHint.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  with Canvas.Font do
  begin
    Name := 'Arial';
    Size := Size + 5;
    Style := [fsBold,fsItalic];
  end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Application.HintColor := clAqua;
HintWindowClass := TMyHintWindow;
Edit1.Hint:='Ini Adalah Contoh Hint.'+chr(13)+'Hint yang sedikit di utak atik !!'+chr(13)+''+chr(13)+'Masukan User Anda';

end;

Posted by Antas Delphi on - Rating: 4.5

Title : Merubah Warna (Font) Hint di Delphi
Description : Sekarang saya Posting lagi Coding untuk merubah Tampilan teks/Font Hint pada Delphi. coba perhatikan baik" koding dibawah ini :