PeterPanettone

I have decided to stay with Delphi.

Regardless of the caret position within a procedure/function, how can I use a keyboard shortcut to select the entire procedure function? I am aware of the Ctrl+W: Select nearest block keyboard shortcut. However, a shortcut to select the whole procedure/function in one single action would be handy.

Thanks. This collapses/expands the current code region. A simple and easy command to achieve the selection would be very handy.

Thanks. That's an excellent idea! But for this, you have to go to the procedure/function header. A shortcut that works from any location inside the procedure/function would still be handy.

When I show a menu in Windows Notepad, this code gets me the handle of that menu window: MenuWnd := FindWindowEx(0, 0, MAKEINTATOM($8000), nil); (which allows me to make a screenshot from that menu), for example: But when I show a menu in the Delphi Code Editor, MenuWnd is 0! Does anybody know how I can get the handle of the menu window from the Delphi code editor or in other similar cases?

SOLVED by using advanced MSAA technology.

In the Code Editor, when typing 'if' followed by a space character, a Hint hides the caret position: ...so I cannot see the caret anymore and cannot see what I am typing. I am forced to press the ESC key to hide the hint, which is a completely pointless waste of time. Can anyone confirm this? This has been bothering me for a while now. Isn't there a way to suppress this hint (or show it at a different position) when writing an 'if' statement?

This does not work on my secondary monitor, only on the primary monitor.

Some museums exhibit works of art made from Windows error messages. When Delphi has a milestone birthday next year, such a museum could be opened.

You could use a free screenshot tool - there are many available.

Hi Brian, thanks for testing. Can you please be more specific? 1. In Delphi 11.3, how does it "look fine"? Do you mean the caret is also hidden by the Hint in Delphi 11.3? Or do you mean the caret is not hidden by the Hint in Delphi 11.3? 2. In Delphi 12.1, what do you mean by "is broken"?

Aren't hint windows positioned automatically following some system setting?

No, it does not change.

That's what I am going to do. Before doing that, I always ask other people whether they can confirm the issue. So much wasted time because the Embarcadero developers obviously didn't care.

I found the solution: Options -> Language -> Delphi - > Code Insight: Generally, Hints are helpful. But if they hide the caret, they become an annoyance. The ideal position for Hints would be ABOVE THE CARET.

Click the Requests button.

Mine is 7.24 GB

At design-time: procedure TForm1.FormCreate(Sender: TObject); begin Button1.Caption := 'Back' + #13#10 + 'to Editor'; end; At run-time: TButtonMultiLineCaptionTest.zip Can anyone confirm this? Is there a working "Quality Portal" where this can be reported?

You are right - one should write a book about this topic.

This is not concisely logical, as it should word-wrap the Caption when the "text is too wide for the control" AND NOT PREVENT the word-wrap when it is already Multi-Line (if WordWrap = False). And, from a purely practical point of view, what sense would it make to explicitly truncate the text if it's too large for the control? Wouldn't it rather be more practical to automatically word-wrap the Caption when the text is too large for the control?

In TRzButton the Multi-Line Caption works without having to explicitly set WordWrap = True:

When I try to get the list of all file extensions from the Registry associated with a specific application (double-clicking on the file opens the application), I encounter a complex, almost impenetrable maze of multiple, countless references and back-references that seems almost impossible to resolve. It would be helpful if there were a "magical" function like GetListOfAssociatedFileExtensions('notepad.exe', 'open'); Is there a known solution to this problem? For a test, I've started by enumerating all file-extension subkeys in the Registry: function EnumerateFileExtensions: TStringList; var reg: TRegistry; subkeys: TStringList; i: Integer; key: string; begin Result := TStringList.Create; subkeys := TStringList.Create; reg := TRegistry.Create(KEY_READ); try reg.RootKey := HKEY_CLASSES_ROOT; // Open the key for reading if reg.OpenKeyReadOnly(key) then begin reg.GetKeyNames(subkeys); reg.CloseKey; // Log the retrieved subkeys CodeSite.Send('Subkeys:', subkeys.Text); // Iterate through subkeys and filter those starting with a dot for i := 0 to subkeys.Count - 1 do begin if Subkeys[i][1] = '.' then begin // Add the subkey to the result list Result.Add(subkeys[i]); end; end; end; finally reg.Free; subkeys.Free; end; end;

Managing applications in general by giving the user the information on which file extensions open a specific application. This information lets the user decide which file extensions are allowed or should open a particular application.

There is a function AssocQueryString in shlwapi.dll.