기 타 [오토핫키 v1] 경로, 이름 ,드라이브명 등등 추출 함수

답답해서 제가 짜집기로 만들었습니다.

기본 독일국적 justme님 함수에 몇가지 추가했습니다.

path에 파일경로 or 폴더경로...

경로복사 만들어보며 아래함수도 수정중입니다.

초보라 ....

;------------------------------------------------------------------------------------

#NoEnv

SPO := SplitPathObj(A_ScriptDir)

MsgBox % "Drive: " . SPO.Drive 

. "`n`nParentDirPath: " . SPO.ParentDirPath 

. "`n`n2ParentDirPath: " . SPO.2ParentDirPath  

. "`n`nName: " . SPO.Name 

. "`n`nParentDirName: " . SPO.ParentDirName 

. "`n`nDriveNoColon: " . SPO.DriveNoColon 

. "`n`nExt: " . SPO.Ext 

ExitApp

SplitPathObj(Path) {   ;경로_이름_확장자_드라이브명 등 추출     by justme + α

Local

SplitPath, Path, Name, Dir, Ext, NNE, Drv

1PPath:=SubStr(Path,1,InStr(Path,"\",0,0)-1), 2PPath:=SubStr(1PPath,1,InStr(1PPath,"\",0,0)-1)

FDarr := StrSplit(Path, "\")

1PName:=FDarr[FDarr.MaxIndex()-1], 2PName:=FDarr[FDarr.MaxIndex()-2]

RegExMatch(Path, "^(.*):", DrvNoCol)

Return {  Name: Name

, NameNoExt: NNE

, Ext: Ext

, ParentDirName: 1PName

, 2ParentDirName: 2PName

, ParentDirPath: Dir

, 2ParentDirPath: 2PPath

, Drive: Drv 

, DriveNoColon: DrvNoCol1 }

}

;------------------------------------------------------------------------------------