Попробуйте это.Kirillony wrote:А с фокусом ввода получилось что-нибудь придумать?
P.S. Как плагин оно выложено и поддержано не будет (по крайней мере, пока), т.к. я сам не понимаю того кода, который навалял:
Code: Select all
function GetConsoleWindow: HWND; stdcall; external 'kernel32.dll' name 'GetConsoleWindow';
procedure SetStartupInfoW(const PluginStartupInfo: TPluginStartupInfo); stdcall;
var Handle: THandle;
begin
Handle := GetConsoleWindow;
SetForegroundWindow(Handle);
BringWindowToTop(Handle);
SetForegroundWindow(Handle);
end;