Delphi Are you familiar with “forgotten” hints? Here is a very rough example how to get rid of them…
Posted by jpluimers on 2018/05/22
Thanks for [WayBack] Are you familiar with “forgotten” hints? Here is a very rough example how to make them disappear without restarting the IDE… – Attila Kovacs – Google+
The code is centered around enumerating all windows of class TDesignerHintWindow
and closing them.
These Windows happen to me a lot more in Galileo based IDEs than the classic Delphi < 8 ones.
–jeroen
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
EnumWindows(@EnumWindowsProc, LPARAM(0)); | |
function EnumWindowsProc(Wnd: HWND; Form: TForm): BOOL; stdcall; | |
var | |
Buffer: array [0 .. 99] of Char; | |
ClassName: string; | |
begin | |
GetClassName(Wnd, Buffer, 100); | |
ClassName := string(Buffer); | |
if ClassName = 'TDesignerHintWindow' then | |
SendMessage(Wnd, WM_CLOSE, 0, 0); | |
Result := True; | |
end; |
Leave a comment