Developers/Delphi[델파이] IT.러쉬맥
function GetMACAdress2: string; var NCB: PNCB; Adapter: PAdapterStatus; RetCode: char; I: Integer; Lenum: PlanaEnum; _SystemID: string; begin Result := ''; _SystemID := ''; Getmem(NCB ,sizeof(TNCB)); Fillchar(NCB^ ,Sizeof(TNCB) ,0); Getmem(Lenum ,sizeof(TLanaEnum)); Fillchar(Lenum^ ,Sizeof(TLanaEnum) ,0); Getmem(Adapter ,sizeof(TAdapterStatus)); Fillchar(Adapter^ ,Sizeof(TAdapterStatus) ,0); Len..
Developers/Git[깃허브] IT.러쉬맥
개발 소스(Git) 대 쉽게 관리하는 소트웨어(sourceTree) 설치 (windows and Mac) https://www.sourcetreeapp.com/ Sourcetree | Free Git GUI for Mac and Windows A Git GUI that offers a visual representation of your repositories. Sourcetree is a free Git client for Windows and Mac. www.sourcetreeapp.com Git 개발 소스 관리하는 Cilent 툴 화면
Unit에 포함이 안 될 때 유용한 정보 The following table (which is not exhaustive) lists types and functions (but generally not constants) together with the unit required: Type Unit _Stream ADODB_TLB akTop, akLeft, akRight, akBottom Controls AnsiLowerCase SysUtils Application (the variable not a type) Forms Beep SysUtils or Windows (different functions) CGID_EXPLORER ShlObj CN_BASE Controls CoInitialize Activ..
IT/synology[NAS] IT.러쉬맥
사용하시는 DDNS가 있다면 그것을 도메인이름으로 사용하시면 됩니다. 1. DSM > 제어판 > 네트워크 서비스 > DDNS 설정 -예제: ssl.Synology.me 2. DSM > 패키지 센터 -Mail Server 설치 -Mail Station 설치 3. DSM > Mail Server 실행, SMTP 설정 -SMTP 활성화 체크 -도메인 이름: ssl.Synology.me -확인 4. DSM > 제어판 > DSM 설정 > 인증서 > 인증서 생성 ㅇ인증서 서명 요청(CSR) 생성 -개인 키 길이: 2048 -공통 이름: ssl.Synology.me -이메일: admin@ssl.Synology.me -국가: [KR] 남한 -시/도: Seoul -구/군/시: Seoul -조직: SSL -부서: SSL ..
procedure TForm1.FormShow(Sender: TObject); var wDate : TDateTime; y,m,d : word; begin wDate := now; //현재일자 //wDate := StrToDate(FormatMaskText('0000-00-00;0', '20190901')); //특정일자 DecodeDate(wDate,y,m,d); Label1.Caption := formatDateTime('yyyymmdd',wDate); MaskEdit1.text := formatDateTime('yyyymmdd',IncMonth(wdate,1)-d); //월말 MaskEdit2.text := formatDateTime('yyyymmdd',IncMonth(wdate,-1)-d+1); ..
function Tdm.Get_LocalIP: String; var WSAData : TWSAData; HostName: String; HostEnt : pHostEnt; begin WSAStartup(2, WSAData); SetLength(HostName, 255); GetHostName(PChar(HostName), 255); SetLength(HostName, StrLen(PChar(HostName))); HostEnt := GetHostByName(PChar(HostName)); if Assigned(HostEnt) then with HostEnt^ do Result := Format('%d.%d.%d.%d', [Byte(h_addr^[0]), Byte(h_addr^[1]), Byte(h_add..
