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

델파이 팁&트릭
Delphi Programming Tip&Tricks
[219] 프로그램이 터미널 세션에서 동작중인지 확인하려면
박지훈.임프 [cbuilder] 11735 읽음    2007-09-19 15:05
막간에 엄청 간단 팁...
간혹 현재 프로그램이 터미널 접속 세션에서 동작하고 있는지 알아야 할 경우가 있죠. 그걸 확인하기 위한 코드입니다.

델파이에서는,
procedure TForm1.Button1Click(Sender: TObject);
const
  SM_REMOTESESSION = $1000;
begin
  if GetSystemMetrics(SM_REMOTESESSION) <> 0 then
    ShowMessage('터미널 세션에서 동작중임더')
  else
    ShowMessage('터미널 아니네여');
end;

C++빌더에서는,
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  if (GetSystemMetrics(SM_REMOTESESSION) != 0)
    ShowMessage("터미널 세션에서 동작중임더");
  else
    ShowMessage("터미널 아니네여");
}

+ -

관련 글 리스트
219 프로그램이 터미널 세션에서 동작중인지 확인하려면 박지훈.임프 11735 2007/09/19
(링크)     C++Builder Tip'N Tricks > 프로그램이 터미널 세션에서 동작중인지 확인하려면
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.