'도움말들....'에 해당되는 글 61건

  1. 2012.12.28 한글 포토샾 전환 (x86) - 민정님 3
  2. 2012.12.27 Photoshop CS6 한/영 수정... 16
  3. 2012.12.27 AutoIt + mmacro view
posted by 범벙이 2012. 12. 28. 17:11

 

한글 포토샾 전환 (x86).exe

 한글 포토샾 전환 (x86).au3

 

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=보조파일\86_1_t.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
##NoTrayIcon

 

       MsgBox(4096, "한글 포토샾 전환 ", "tw10428.dat 파일은 " & @CRLF & " Adobe Photoshop CS6 폴더에  있어야 합니다", 3)
      If Not FileExists(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat") Then
            Local $iMsgBoxAnswer
           $iMsgBoxAnswer = MsgBox(33, "tw10428.dat 확인 중..." , " 파일이 없습니다.. " & @CRLF & " 영문 Photoshop을 실행 하시겠습니까?. ")
            Select
           Case $iMsgBoxAnswer = 1 ;OK
              RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe")
               Exit
            Case $iMsgBoxAnswer = 2 ;Cancel  ;프로스램 종료후 이미지를 삭제 합니다..
              Exit
           EndSelect
        EndIf

        FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat")
        RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe")
        FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat")
        Exit
        
         
       


 

'도움말들.... > 오토잇' 카테고리의 다른 글

Torrent3.2 -벌꿀 바나나님..  (7) 2012.12.29
2차 - Photoshop CS6 (x86) 한/영  (2) 2012.12.28
Photoshop CS6 한/영 수정...  (16) 2012.12.27
AutoIt + mmacro view  (0) 2012.12.27
오토잇 프로그램의 시작.. 민정님  (8) 2012.12.26
posted by 범벙이 2012. 12. 27. 23:23

스크립트 오류 입니다..

눈팅만 하세요 ㅠㅠ..

 

 


 

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=보조파일\86_1_t.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\jnb\desktop\form1.kxf
$Form1_1 = GUICreate("Photoshop CS6 (x86) 한/영 ", 277, 110, 801, 137)
$Button1 = GUICtrlCreateButton("Korea  Ps", 104, 16, 155, 33, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetTip(-1, "한글 포토샾 실행")
$Button2 = GUICtrlCreateButton("English  Ps", 104, 64, 155, 33, $WS_GROUP)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetTip(-1, "영문 포토샾 실행")
FileInstall("86_1_t.jpg", @TempDir & "\86_1_t.jpg", 0)   ;FileInstall을 이용하여 TempDir에 만듭니다..
            ; FileInstall("86_1_t.jpg"  이 위치는 오토잇 소스가 있는 경로 입니다..
$Pic1 = GUICtrlCreatePic(@TempDir & "\86_1_t.jpg", 8, 8, 84, 92, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
 ; $Pic1 = 이미지의 경로를 TempDir 로 적어 줍니다....
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###



While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Button1
            Sleep(100)
           If Not FileExists(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat") Then
            Local $iMsgBoxAnswer
           $iMsgBoxAnswer = MsgBox(33, "tw10428.dat 확인 중..." , " 파일이 없습니다.. " & @CRLF & " 영문 Photoshop을 실행 하시겠습니까?. ")
            Select
           Case $iMsgBoxAnswer = 1 ;OK
              RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe")
              FileDelete(@TempDir & "\86_1_t.jpg")
               Exit
            Case $iMsgBoxAnswer = 2 ;Cancel
                FileDelete(@TempDir & "\86_1_t.jpg")   ;프로스램 종료후 이미지를 삭제 합니다..
              Exit
           EndSelect
        EndIf        ;여기까지는 경로에 tw10428.dat파일이 없을경우의 소스 입니다..

            RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe") ;tw10428.dat파일이 있을경우 실행 합니다..
            FileDelete(@TempDir & "\86_1_t.jpg")
            Exit

        Case $Button2
            If FileExists(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat") Then   ; 경로에 tw10428.dat파일이 있을경우 FileMove를 이용하여 이동 합니다..
             FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat")
             RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe")
             While 1
            If Not ProcessExists("Photoshop.exe") = 0 Then ExitLoop
             FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat")
             FileDelete(@TempDir & "8\6_1_t.jpg")
             Sleep(200)
            WEnd
           EndIf   ; 경로에 tw10428.dat파일이 있을경우 이동후 실행 합니다..

          RunWait(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Photoshop.exe")  ; 없을경우 바로 실행 합니다..
            ;saving Settings
            If FileExists(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat") Then
             FileMove(@ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\tw10428.dat" , @ProgramFilesDir & "\Adobe\Adobe Photoshop CS6\Locales\ko_KR\Support Files\tw10428.dat")
             FileDelete(@TempDir & "8\6_1_t.jpg")
           EndIf
            Exit
    EndSwitch
WEnd




 

posted by 범벙이 2012. 12. 27. 16:11

 

AutoIt macro view.exe

 

AutoIt 은 아래 경로에 있습니다..

http://yong40.tistory.com/entry/AutoIt-3361-ko-Potable