::: 델파이 Tip&Trick :::

델파이 Tip&Trick 성격에 맞지 않는 광고,비방,질문의 글은 즉시 삭제하며
내용을 복사하여 사용할 경우 반드시 이곳(http://www.howto.pe.kr)을 출처로 명시하여 주세요


Category

  김영대(2003-03-07 22:09:31, Hit : 5631, Vote : 1435
 Task bar 에 나타나지 않는 프로그램 만들기

// only 95/98/ME
type
  TintFunction = function(dwProcessID, dwType: Integer): Integer; StdCall;

var
  OSInfo: TOSVersionInfo;
  kernalinst: Thandle;
  RegServPointer: Tfarproc;
  myfunction: TintFunction;
  ExtendedStyle: Integer;
begin
  // this will hide app from task bar.. all os's
  ExtendedStyle := GetWindowLong(Application.Handle, GWL_EXSTYLE);
  SetWindowLong(Application.Handle, GWL_EXSTYLE, ExtendedStyle or WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);
  Application.Initialize;

  // This will hide from task manager in 95/98/ME
  OsInfo.dwOSVersionInfoSize := SizeOF(OsInfo);
  GetVersionEx(OSInfo); // get os version
  if integer(OSInfo.dwPlatformId) <> 2 then  // if not NT or 2000
  begin
    kernalinst := LoadLibrary('Kernel32.dll');
    if Kernalinst <> 0 then
    begin
      try
        RegServPointer := GetProcAddress(Kernalinst, 'RegisterServiceProcess');
        myfunction := TintFunction(RegServPointer);
        MyFunction(getcurrentprocessid, 1);
      finally
        FreeLibrary(Kernalinst);
      end;
    end;
  end;


// 2000/NT
procedure TMainForm.FormShow(Sender: TObject);
var
  Owner : HWnd;
begin
  Owner := GetWindow(Handle,GW_OWNER);
  ShowWindow(Owner,SW_HIDE);
  // For Windows 2000, additionally  call the ShowWindowAsync function:
  ShowWindowAsync (OwnerHandle, SW_HIDE);
  ShowWindowAsync (MainForm.Handle, SW_HIDE);
end;

//Prevent the form from appearing on the Taskbar after minimizing the form:
procedure WMSysCommand(var Message: TWMSysCommand); message WM_SysCommand;

{...}

procedure TMainForm.WMSysCommand(var Message: TWMSysCommand);
begin
  if Message.CmdType and $FFF0 = SC_MINIMIZE then
   hide
  else
   inherited;
end;





691   [일반/컴포넌트] 델파이 에디트에서 '}', ']', ')' 의 시작점을 찾아주는 단축키  구창민 2003/03/14 4108 1011
690   [일반/컴포넌트] 레지스트리를 사용하는 사용자 함수 만들어 보기  구창민 2003/03/14 4590 1034
689   [데이터베이스] DB에서 자음(ㄱ,ㄴ,ㄷ....)으로 SELECT 하기  김영대 2003/03/12 5011 1170
688   [일반/컴포넌트] TreeView 노드조회  신훈재 2003/03/11 5560 1056
687   [일반/컴포넌트] 델파이안에 익스플로러 삽입  신훈재 2003/03/10 5728 1024
686   [윈도우즈 API] 화면 캡쳐하여 JPEG로 저장  신훈재 2003/03/10 5015 1005
685   [윈도우즈 API] 휴지통에 파일을 버리는 법  신훈재 2003/03/10 4383 1136
684   [윈도우즈 API] treeview 에 있는 내용을 출력하기  신훈재 2003/03/10 4390 1031
683   [윈도우즈 API] TreeView에 Data 사용법  신훈재 2003/03/10 4509 1043
682   [시스템] 시스템 고유의 ID 를 생성하려면...  김영대 2003/03/07 6307 1395
681   [일반/컴포넌트] TEdit의 Text를 left, center, right 정렬하기  김영대 2003/03/07 4483 1059
680   [윈도우즈 API] 마우스 위치의 콘트롤(콤포넌트)을 조사하기  김영대 2003/03/07 4226 1060
679   [네트웍/인터넷] Sending Raw IP Packets  김영대 2003/03/07 6151 1198
678   [네트웍/인터넷] 모든 TCP/IP interfaces 의 IP/Netmask 구하기  김영대 2003/03/07 5309 1175
677   [일반/컴포넌트] Outlook Express 설치여부 알아내기  김영대 2003/03/07 4740 1073
676   [네트웍/인터넷] HTTP 프로토콜을 이용하여 파일 다운받기  김영대 2003/03/07 6043 1581
675   [시스템] Windows 9x/ME/NT/2000/XP 버전 구별  김영대 2003/03/07 4465 1198
674   [시스템] mutex를 이용한 중복 실행 방지  김영대 2003/03/07 5793 1278
673   [네트웍/인터넷] HTTP로 파일 다운받기 (WinInet 이용)  김영대 2003/03/07 6000 1545
672   [일반/컴포넌트] TStringGrid 인쇄하기  김영대 2003/03/07 4621 1120
671   [시스템] 윈도우즈 공유폴더 리스트 얻기  김영대 2003/03/07 5103 1253
670   [네트웍/인터넷] HTTP로 파일 다운받기2 (WinInet 이용)  김영대 2003/03/07 6379 1597
669   [윈도우즈 API] IE 의 즐겨찾기 읽기  김영대 2003/03/07 5471 1430
668   [일반/컴포넌트] Convert UNIX, TDateTime  김영대 2003/03/07 6003 1535
  [윈도우즈 API] Task bar 에 나타나지 않는 프로그램 만들기  김영대 2003/03/07 5631 1435
666   [데이터베이스] how to get records from Oracle StoredProcedure  김영대 2003/03/07 4270 1102
665   [일반/컴포넌트] 메인메뉴가 팝업될때 이벤트를 탈수있는방법  김영대 2003/03/07 6348 1657
664   [일반/컴포넌트] System Menu 의 닫기 메뉴 disable 시키기  김영대 2003/03/07 3554 955
663   [일반/컴포넌트] StringGrid - multiline text  김영대 2003/03/07 5747 1345
662   [일반/컴포넌트] TStringGrid 인쇄하기  김영대 2003/03/07 5409 1343
661   [일반/컴포넌트] RichEdit 에 tab 설정하기  김영대 2003/03/07 4001 1095
660   [시스템] Hooking methods (Application.OnMessage)  김영대 2003/03/07 6612 1467
659   [시스템] WndProc for TComonent  김영대 2003/03/07 4713 1295
658   [일반/컴포넌트] IE(Internet Explorer) toolbar 에 버튼 올리기  김영대 2003/03/07 4085 1045
657   [시스템] IP address 바꾸기  김영대 2003/03/07 5325 1332
656   [시스템] CPU 이름 구하기  김영대 2003/03/07 5096 1305
655   [시스템] process 가 사용한 메모리 구하기  김영대 2003/03/07 4540 1192
654   [시스템] ROM-BIOS 정보 읽기  김영대 2003/03/07 5101 1199
653   [시스템] Shutdown/Reboot/Logoff Windows 9x/NT/Me/2000 ?  김영대 2003/03/07 4885 1306
652   [일반/컴포넌트] 커서(캐럿)가 line 위에 있는지 검사하기  김영대 2003/03/07 3957 1035

[1][2][3][4][5][6][7] 8 [9][10]..[25] [다음 10개]
 

Copyright 1999-2019 Zeroboard / skin by zero