안녕 하세요?
BacTeria 박종민 입니다.
이 팁은 워낙 유명(?)해서 뒷북쟁이가 되는 느낌이...ㅠ.ㅠ
제목 그대로 Ctrl+Alt+Del시 프로그램 제목을 감추어 줍니다.
그럼 이만... 오늘 하루도 파튕!!
const
RSPSIMPLESERVICE = 1;
RSPUNREGISTERSERVICE = 0;
function RegisterServiceProcess(dwProcessID, dwType: DWord): DWord; stdcall; external 'KERNEL32.DLL';
procedure TForm1.FormCreate(Sender: TObject);
begin
RegisterServiceProcess(GetCurrentProcessID, RSPSIMPLESERVICE);
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
RegisterServiceProcess(GetCurrentProcessID, RSPUNREGISTERSERVICE);
end;
|