자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 

• 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

• 전체
• Delphi
• C++ Builder
• RadPHP
• Firemonkey
• Interbase
• 도서

Delphi PC의 맥주소를 확인하는 방법

2020.11.21 12:03

천마산 조회 수:537

본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------

현재 델파이7 을 사용중입니다.  

 

델파이를 이용해서 PC의 맥주소를 확인하는 방법이 있나요?

 

고수님들의 답변을 부탁드립니다.

 

 

 

 

이 게시물을

• Twitter
• Me2day
• Facebook
• Delicious

목록

댓글 1

• WhiteC

  2020.11.23 12:01

  도움이 되었으면 합니다. 결과 (또는 기타 의견)을 댓글로 남겨주시면 다른 분들에게도 도움이 됩니다.

   

  class function TMyUtil.GetMacAddress: String;
  	var
  	I: integer;
  	NumInterfaces: DWORD;
  	AdapterInfo: array of TIpAdapterInfo; // uses Winapi.IpTypes
  	OutBufLen: ULONG;
  	IpAddr: string;
  	begin
  	Result := '';
  	GetNumberOfInterfaces(NumInterfaces); // uses Winapi.IpHlpApi
  	SetLength(AdapterInfo, NumInterfaces);
  	OutBufLen := NumInterfaces * SizeOf(TIpAdapterInfo);
  	GetAdaptersInfo(@AdapterInfo[0], OutBufLen);
  	for I := 0 to NumInterfaces - 1 do begin
  	if AdapterInfo[I].Description = '' then
  	Continue;
  	IpAddr := AdapterInfo[I].IpAddressList.IpAddress.S;
  	if (IpAddr = '') or (IpAddr = '0.0.0.0') then
  	Continue;
  	Result := Format('%.2x-%.2x-%.2x-%.2x-%.2x-%.2x',
  	[AdapterInfo[I].Address[0], AdapterInfo[I].Address[1],
  	AdapterInfo[I].Address[2], AdapterInfo[I].Address[3],
  	AdapterInfo[I].Address[4], AdapterInfo[I].Address[5]]);
  	Exit;
  	end;
  	end;

  댓글

목록

번호	제목	글쓴이	날짜	조회 수
공지	[프로그래밍 강의] 2021.6~2021.12	관리자	2015.01.22	15768
공지	유용한 관련 사이트	관리자2	2014.03.20	54582
공지	본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다.	관리자	2012.01.10	97995
793	[질문] RLINK32: Out of memory 에러가 납니다	Xiong	2016.07.22	531
792	[DCC Error] E2597 C:\Users\Public\Documents\Embarcadero\Studio\15.0\PlatformSDKs\android-ndk-r9c\toolchains\arm-linux-androideabi-4.6\prebuilt\windows\bin\arm-linux-androideabi-ld.exe: error: cannot find -ldl [1]	라빌레나	2017.05.04	531
791	C# DLL 함수정의를 델파이에서 어떻게 하나요? [1]	madoka	2020.07.24	531
790	베를린 사용하고 있는데요 FireDac계열 컴포넌트 혹시 저만 한글이 깨지나요 [3]	짧굵	2016.06.17	533
789	델파이로 만든 DLL 내부에 FireDAC 콤퍼넌트의 동작 [2]	막스뮐러	2019.08.08	533
788	iOS 앱 심사 시 IPv6문제;; [3]	델라인	2016.09.23	535
787	델파이에도 C#에 있는 LINQ기능이 있나요? [1]	베스트드레곤	2015.04.02	535
786	[질문]모바일에서 앱테더링(블루투스 통신) 안되는 문제 [6]	가라사대	2015.06.26	536
»	PC의 맥주소를 확인하는 방법 [1]	천마산	2020.11.21	537
784	콤보박스의 글자간 간격이 이상합니다. [4]	떵묻은강아지	2016.12.14	538
783	VCL Or FMX 컨포넌트중 HTML 에디터 컴포넌트가 있나요? [1]	황규섭	2016.07.22	539
782	delphi 10.2 에서 tabcontrol slide 기능 오류 [5]	돌팅	2018.01.15	539
781	MacinCloud 설정에 문의 드립니다. [2]	silkroad99	2015.05.18	540
780	[마이그레이션][델파이3>델파이10시애틀] DB character set 문제 한글깨짐 [2]	박성민	2015.09.30	541
779	sendMultimediaMessage 사용방법은?? [1]	kerry	2017.12.14	542
778	패스트리포트 관련 문의입니다	봉봉봉봉	2015.04.02	542
777	delphi XE7 - oracle 11g 연동이 안됩니다.. [1]	유죵	2017.09.29	543
776	XE7 블루투스 통신 [1]	최영준	2015.04.24	544
775	Embarcadero RAD Studio 10 Seattle에서 안드로이드 SDK 셋팅(수정) [3]	스미스	2015.12.22	545
774	모빌리언스 연동시 MSTR값 최종적으로 JSON으로 파싱시 오류입니다 ㅠㅠ! [1]	초보개발자홉	2017.06.15	546

첫 페이지 59 60 61 62 63 64 65 66 67 68 끝 페이지

쓰기

검색

제목+내용제목내용댓글이름닉네임태그 검색

태그