Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2003.06.19;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
3-60084
YuraKiller
2003-05-28 21:32
2003.06.19
Как с клиента создать пользователя?


14-60322
Кен
2003-05-27 02:09
2003.06.19
Где взять документацию по DelphiODE (динамик энджин)? По примерам


14-60345
zeppelin
2003-06-02 12:22
2003.06.19
Отчет с помощью Rave


3-60069
alienka
2003-05-27 11:11
2003.06.19
KeyList в колонке DBGridEh


3-60014
pashtet
2003-05-27 11:23
2003.06.19
Вопрос по PL/SQL?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский