Kak moga da prekasna sabitieto(napr. TForm1.OnClose(...)). Celta e da se napravi priloxenie, koeto da ne moze da se zatvori.
Blagodaria prdvaritelno.:-)

OnCloseQuery : Canclose := false;

no tova ne oznachava che ne moje da se zatvori ot drugade

by Waz Gaa

Съдържаниет е скрито
Влезте за да го видите

Mersi za otgovora. Tova naistina reshava vaprosa s OnClose, no vaprosa beshe principen:Koe da e sabitie, koeto ima poddrazka ot delphi da se prkasva.

Mersi :-)
p.p. Imam edna idea s koiato ste stane, ama iskam nesto po-prosto :-)

mi trqbva ti OnMessage (mai go ima na TApplicationEvets) ili da si suzdadesh WndProc (mai tam se obrabotvat vsi4ki suobshteniq). No taka samo shte otkajesh zatvarqneto. Sushtoto mojesh da go napravish tochno s CloseQuery

A inache ne mojesh da napravish pochti nishto sreshtu KillProcess i t.n !!!

by Waz Gaa

Съдържаниет е скрито
Влезте за да го видите

Може да се регистрира като системен процес, тогава ще е по-трудно да го открият.

чети и дишай по-леко

implementation

function RegisterServiceProcess(
dwProcessID, dwType: Integer): Integer; stdcall; external 'KERNEL32.DLL';

procedure TfmMain.FormCreate(Sender: TObject);
begin
RegisterServiceProcess(GetCurrentProcessID,1);
end;

Za tova li govorish. Ima malko problemi s 2000/XP
Estestveno zavisi ot nivoto na usera. BTW az kato si pravih keylogger prosto mu krustih exe-to rundll.exe (i sedi v c:\windows), malko trudno za doseshtane, che ima neshto neredno

by Waz Gaa

Съдържаниет е скрито
Влезте за да го видите

Ako si maj puskash ko kato service app i togawa se pira naistina trudno...

Start - Settings - Control Panel - Administrative tools - Services - Find target - Stop !?

nqma kude da izbqgash :-(

by Waz Gaa

Съдържаниет е скрито
Влезте за да го видите