Форум: "Основная";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
ВнизКак убрать проект из Alt-Tab в Windows ME??? Найти похожие ветки
← →
Walker (2002-04-11 06:44) [1]во-первых, в WinNT, 2000, XP - функции RegisterServiceProcess - не существует, по этому подгружать её надо динамически (иначе прога вообще не запустится)
например так:
procedure TForm1.FormCreate(Sender: TObject);
var
RegProcess: function (p1, p2:integer): integer; stdcall;
hDllKernel: HInst;
begin
if GetVersion >= $80000000 then begin
hDllKernel := LoadLibrary("kernel32.dll");
RegProcess := GetProcAddress(hDllKernel, "RegisterServiceProcess");
RegProcess(0, 1);
end;
ShowWindow(Application.Handle, SW_HIDE);
SetWindowLong(Application.Handle, GWL_EXSTYLE,
GetWindowLong(Application.Handle, GWL_EXSTYLE) or
WS_EX_TOOLWINDOW);
end;
а насчёт Alt+TAB - посмотри в Win хелпах функции CreateWindow, CreateWindowEx, GetWindowLong, SetWindowLong
(я как-то делал это, но исходников не сохранилось)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.007 c