Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 팁&트릭
Delphi Programming Tip&Tricks
[14] [팁] Ctrl+Alt+Del시 프로그램 제목 감추기
박종민.BacTeria [bacteria] 4464 읽음    2002-03-18 10:03
안녕 하세요?

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;

+ -

관련 글 리스트
14 [팁] Ctrl+Alt+Del시 프로그램 제목 감추기 박종민.BacTeria 4464 2002/03/18
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.