property ShowHint: Boolean; // published, inherited from TControl
ShowHint, fare görüntüleyicinin üzerinde durduğunda çerçevenin Hint ile anlatılan tooltip'i gösterip göstermeyeceğini denetler. (O da yayımlanan) ParentShowHint ile birlikte standart VCL/LCL ipucu hattını oluşturur: ParentShowHint True iken değer, ebeveyn form/panelden miras alınır; False iken yerel ShowHint kazanır
Bir PDF okuyucuda ipucu en sık dinamik durumu bildirmek için kullanılır: imlecin altındaki sayfa etiketini göstermek (OnMouseMove + DeviceToPage ile hesaplanır), imlecin altındaki bir web linkinin URL'sini göstermek veya etkin araç çubuğunun klavye kısayollarını göstermek. Host formun OnShowHint event'i, ipucu metnini görüntülenmeden hemen önce yeniden yazabilir
İpuçlarını devre dışı bırakmak, pop-up'ların kullanıcıları dağıttığı kiosk tarzı bir uygulamada görüntüleyicinin odak öğesi olduğu durumlarda zaman zaman işe yarar. Property yalnızca balonu susturur — Hint stringi kod üzerinden erişilebilir kalır
ParentShowHint = True ile varsayılan False'tur; yani formun ShowHint'i davranışı yönetirHint'i dinamik güncellemek için OnMouseMove ve DeviceToPage ile birleştirin — örneğin imlecin altındaki sayfa etiketini veya web linkinin hedefini göstermekParentShowHint := False ve ShowHint := True atayın
// Show the page label under the cursor as a tooltip
procedure TForm1.FormCreate(Sender: TObject);
begin
PdfView1.ShowHint := True;
PdfView1.OnMouseMove := PdfView1MouseMove;
end;
procedure TForm1.PdfView1MouseMove(Sender: TObject;
Shift: TShiftState; X, Y: Integer);
var PageNo: Integer;
begin
if PdfView1.PointToPage(Point(X, Y), PageNo) then
PdfView1.Hint := 'Page ' + IntToStr(PageNo) + ' / ' +
IntToStr(PdfView1.Pdf.PageCount);
end;