런타임시 팝업 힌트 메시지 (THintInfo :: HintStr)의 크기 결정

Question

ShowHint이 설정된 TListView가 있습니다. OnInfoTip 처리기에서 마우스가 가리키고있는 항목과 관련된 힌트 메시지가 생성됩니다. 메시지에는 줄 바꿈 (# 13 # 10) 문자가 포함될 수 있습니다.

CM_HINTSHOW 메시지를 처리하기 위해 오버라이드가 생성되었으며 표시 할 힌트 메시지는 에 표시됩니다. 런타임시 크기를 계산할 수도 있지만 구현 세부 사항이 복잡하거나 플랫폼에 따라 다를 수 있으므로 위험합니다.

THintInfo에 '경계 사각형'을 쿼리 할 수 ​​있습니까? 아니면 표시 될 때 팝업 힌트 메시지의 크기를 정확하게 결정할 수있는 다른 방법이 있습니까?

힌트의 정확한 위치 (msg.HintInfo.HintPos)를 설정할 수 있어야합니다.

Answer 1

THintWindow에는이 경우 사용할 수있는 CalcHintRect 기능이 있습니다. HintWindow을 보여주는 때 VCL이 기능을 사용합니다 : TApplication의 액세스 외부는

with HintInfo do 
    HintWinRect := FHintWindow.CalcHintRect(HintMaxWidth, HintStr, HintData); 

FHintWindow으로 임시 인스턴스를 생성 할 필요가있다.

procedure TMyListView.CMHintShow(var Message: TCMHintShow); 
var 
    AHintWindow: THintWindow; 
    AHintWinRect: TRect; 
    ... 
begin 
    AHintWindow := Message.HintInfo.HintWindowClass.Create(nil); 
    try 
    AHintWinRect := AHintWindow.CalcHintRect(...); 
    ... 
    finally 
    AHintWindow.Free; 
    end; 
end; 

정확도는 THintWindowClass의 구현에 따라 다릅니다. 하지만 HintWindow는 신뢰할 수없는 경우 잘못 표시됩니다.

BidiMode이 오른쪽에서 왼쪽 일 때 중간 동부 지역에 잠재적 인 함정이있을 수 있습니다. 그리고 추가로 수행 다음 :

if FHintWindow.UseRightToLeftAlignment then 
    with HintWinRect do 
    begin 
     Delta := MultiLineWidth(HintInfo.HintStr) + 5; 
     Dec(Left, Delta); 
     Dec(Right, Delta); 
    end;