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

C++빌더 Q&A
C++Builder Programming Q&A
[1086] [답변] CMH0205/ GetVolumeInformation() 사용법 부탁드립니다/프포
박지훈.임프 [cbuilder] 7412 읽음    1999-02-11 18:05
안녕하세요. 천리안 프로그래머포럼 C++Builder 담당자 임펠리테리입니다.

기억도 가물거리는 옛날에 어딘가에서 긁어다놨던 소스입니다. 동작하는지 테스트도

했었던 거 같네요.

다음은 하드디스크의 여러 정보를 몽땅 다 알아내는 소스입니다.

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    char VolumeName[MAX_PATH+1], FileSystemName[MAX_PATH+1];
    DWORD VolumeSerialNo, MaxComponentLength, FileSystemFlags;

    GetVolumeInformation("C:\\", VolumeName, MAX_PATH, &VolumeSerialNo,
                                &MaxComponentLength, &FileSystemFlags,
                                FileSystemName, MAX_PATH);
    Memo1->Lines->Add(AnsiString("VName= ") + VolumeName);
    Memo1->Lines->Add(AnsiString("SerialNo= # ") + IntToHex(VolumeSerialNo, 8));
    Memo1->Lines->Add(AnsiString("CompLen= ") + IntToStr(MaxComponentLength));
    Memo1->Lines->Add(AnsiString("Flags= # ") + IntToHex(FileSystemFlags, 4));
    Memo1->Lines->Add(AnsiString("FSName= ") + FileSystemName);
}

그리고.. 다음은 그냥 시리얼번호만 알아내는 부분입니다. 대부분의 분들은 이

GetVolumeInformation() 함수를 시리얼번호만 알아내기 위해 쓰더군요.

void __fastcall TForm1::Button2Click(TObject *Sender)
{
    DWORD VolumeSerialNumber, MaximumComponentLength, FileSystemFlags;
    GetVolumeInformation("C:\\", NULL, 0, &VolumeSerialNumber,
        &MaximumComponentLength, &FileSystemFlags, NULL, 0);
    AnsiString SerialNumber = IntToHex(HIWORD(VolumeSerialNumber), 4)
        + '-' + IntToHex(LOWORD(VolumeSerialNumber), 4);
    Memo1->Lines->Add(SerialNumber);   
}

그럼 참고하시길..



독립문에서 임펠리테리였습니다.

(cbuilder, cbuilder@thrunet.com)



+ -

관련 글 리스트
1084 [질문] GetVolumeInformation() 사용법 부탁드립니다/프포 cmh0205 4493 1999/02/11
1086     [답변] CMH0205/ GetVolumeInformation() 사용법 부탁드립니다/프포 박지훈.임프 7412 1999/02/11
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.