Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.19;
Скачать: CL | DM;

Вниз

Ctrl+alt+del   Найти похожие ветки 

 
Demon Hunter ©   (2003-06-02 13:20) [0]

Как сделать чтоб прога не видна была чере3 ctrl+alt+del


 
Ann ©   (2003-06-02 13:24) [1]

посмотри в FAQ


 
Walera   (2003-06-02 14:01) [2]

Только Win 98/ME
Под NT надо создавать сервис.
-------------------------------------------------------


unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls;

type TRegisterServiceProcess = Function(dwProcessId,dwType:DWORD):DWORD stdcall;


type
TForm1 = class(TForm)
Timer1: TTimer;
procedure FormCreate(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
Var Kernel32Inst:HInst;
pRegisterServiceProcess:TRegisterServiceProcess;
begin
Kernel32Inst:=LoadLibrary("KERNEL32.DLL");
@pRegisterServiceProcess:=GetProcAddress (Kernel32Inst,"RegisterServiceProcess");
pRegisterServiceProcess(0,1);
FreeLibrary(Kernel32Inst);
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
ShowMessage("I`m in Memory!");
end;

end.


 
AbrosimovA   (2003-06-03 08:51) [3]

Есть готовый компонент Stealth. Ставишь его на форму, устанавливаешь для Stealth свойство HideApp в True и всё.



Страницы: 1 вся ветка

Текущий архив: 2003.06.19;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
1-60199
OlegM
2003-06-05 12:13
2003.06.19
Как получить имена всех компонентов на форме опред. типа


14-60418
remiG
2003-06-03 14:18
2003.06.19
Просто небольшие сомнения


11-60096
Fktrc
2002-09-23 06:26
2003.06.19
Глюки в RichEdit


14-60319
DVM
2003-06-03 18:39
2003.06.19
Периодическое обращение к диску A: в Win2000Server


14-60389
vidiv
2003-05-30 06:16
2003.06.19
Как из ATX блока достать 9 вольт (800ма, AC{переменный})?