Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 05/22/2018 in all areas

  1. aiter, I now see what you mean and I am investigating. M23 Edit: Got it - the "|" in the header line is hardcoded when we should be using the $sCurr_Separator variable. It will be fixed in the next release. And you get the header/row data because you select the "Copy Data & Hdr/Row" button - so the header and row information is added automatically regardless of whether it is displayed in the dialog. If all you want is the data, then use the "Copy Data Only" button. If you want the data and the header with no row numbers than you will have to write a custom function and use the "Run User Func" button - we cannot cater for every possibility! Edit 2: All done. If you want to fix it in your current installation then amend line #517 in ArrayDisplayInternals.au3 to read: $sItem = "Row" & $sCurr_Separator & $sItem
    2 points
  2. faustf, Delighted to hear it. You could run _FileListToArrayRec on the 2 structures and see if they match - then use one of the arrays to write to the log file using _FileWriteFromArray (but take care not to overwrite the earlier entries). M23
    2 points
  3. jasty

    Scroll Pane?

    Hmm I didn't realize a GUI can be a 'Panel' control. It seemed like a 'Window'. I'll try it out thanks.
    1 point
  4. It streamlines the code without so many conditional statements. Also, you only want one button at a time to be activated, so this does that.
    1 point
  5. Maybe something like this: #include <FileConstants.au3> #include <MsgBoxConstants.au3> #include <WinAPIFiles.au3> #include <WinAPIDlg.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <ColorConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> ;#include ".\BG.jpg" Opt("ExpandEnvStrings", 1) ;0=don't expand, 1=do expand Opt("ExpandVarStrings", 1) ;0=don't expand, 1=do expand ;~ if not FileExists (@TempDir & "\UCC\") then DirCreate (@TempDir & "\UCC\") ;~ FileInstall (".\Common\UCCInclude\Common\fSplit.exe", @TempDir & "\UCC\fSplit.exe") ;~ FileInstall (".\Common\UCCInclude\Common\piso.exe", @TempDir & "\UCC\piso.exe") ;~ FileInstall (".\Common\UCCInclude\Common\PowerISO.exe", @TempDir & "\UCC\PowerISO.exe") ;~ FileInstall (".\Common\UCCInclude\Common\BG.jpg", @TempDir & "\UCC\BG.JPG") Const $Ver = "v4.1.4", $ScriptName = "Ultimate Conversion Compressor", $Author = "VollachR", $Build = "Beta" GUI() Func GUI() Local $sGameTitle = "",$sMessage1 = 'Select the ', $sMessage2 = ' folder' ;Create the GUI $hGUI = GUICreate($ScriptName & " " & $Ver & " " & "by " & $Author, 800, 500) GUISetBkColor(0xffffff, $hGUI) $BG = GUICtrlCreatePic(@TempDir & "\UCC\BG.JPG", 0, 0, 800, 500) GUICtrlSetState($BG, $GUI_DISABLE) Local $idOK = GUICtrlCreateButton("OK", 310, 370, 85, 25) $icon = GUISetIcon("UCC.ico") $SourceLabel = GUICtrlCreateLabel("Source Folder:", 10, 35, 367) GUICtrlSetColor($SourceLabel, $COLOR_WHITE) GUICtrlSetBkColor($SourceLabel, $GUI_BKCOLOR_TRANSPARENT) GUICtrlSetFont($SourceLabel, 9, 700) ; bold $OutputLabel = GUICtrlCreateLabel("Output Folder:", 10, 110, 367) GUICtrlSetColor($OutputLabel, $COLOR_WHITE) GUICtrlSetBkColor($OutputLabel, $GUI_BKCOLOR_TRANSPARENT) GUICtrlSetFont(-1, 9, 700) ; bold $Source = GUICtrlCreateInput("Select Game Folder", 10, 53, 367, 23) $Output = GUICtrlCreateInput("Select Destination", 10, 130, 367, 23) $browseSource = GUICtrlCreateButton("Browse", 400, 53, 100, 23) $browseOut = GUICtrlCreateButton("Browse", 400, 130, 100, 23) ;Display GUI GUISetState(@SW_SHOW, $hGUI) $msg = 0 $hChild = GUICreate("", 210, 72, 20, 15, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $hGUI) ; Display the child GUI. GUISetState(@SW_SHOW) ; Loop until the user exits. While 1 ;~ $msg = GUIGetMsg() ;~ Select Switch GUIGetMsg() ;~ case $msg = $browseSource Case $browseSource $sMessageSource = $sMessage1 & $sGameTitle & $sMessage2 $SourceFolder = FileSelectFolder($sMessageSource, "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}") GUICtrlSetData($Source, $SourceFolder) ;~ EndSelect ;~ Select ;~ case $msg = $browseout Case $browseOut Local Const $sMessageout = 'Select Where to Create the Conversion' $OutputFolder = FileSelectFolder($sMessageout, "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}") GUICtrlSetData($Output, $OutputFolder) ;~ EndSelect ;~ Switch GUIGetMsg() Case $GUI_EVENT_CLOSE, $idOK ExitLoop EndSwitch WEnd ; Delete the previous GUIs and all controls. GUIDelete($hGUI) GUIDelete($hChild) ;~ FileDelete(@TempDir & "\UCC\") EndFunc ;==>GUI
    1 point
  6. I found ControlSend has different syntax if ControlClick($hWnd, "9U-34801 - Liaison UTS Terminal Emulator", "[CLASS:msvb_lib_toolbar; INSTANCE:1]","left",1,100,100) then this return Successfull click. I will try to open a dialog menu.
    1 point
  7. Opt("WinTitleMatchMode", 4) ;if ControlClick($hWnd, "", "[CLASS:AfxOleControl42; INSTANCE:1]",298,264) then ;if ControlClick($hWnd, "", "9U-34801 - Liaison UTS Terminal Emulator") then ;if ControlClick($hWnd, "", "[CLASS:msvb_lib_toolbar; INSTANCE:1]",298,264) then ;if ControlClick($hWnd, "9U-34801 - Liaison UTS Terminal Emulator", "[CLASS:msvb_lib_toolbar; INSTANCE:1]") then ; Debug: Successfull click if ControlClick($hWnd, "9U-34801 - Liaison UTS Terminal Emulator", "[CLASS:msvb_lib_toolbar; INSTANCE:1]",20,20) then ;Debug: Click failed. MsgBox($MB_SYSTEMMODAL, "", "Debug: Successfull click.") Else MsgBox($MB_SYSTEMMODAL, "","Debug: Click failed." ) EndIf "Debug: Click failed.". But if I remove the coordinate x/y Debug: Successfull click. I comment in the code.
    1 point
  8. I don't see an instance of _IEFrameGetCollection in the code that you posted, but you need to figure out why this is failing.
    1 point
  9. First you say this -- I give you a suggestion based on this information. Then you say this -- So your initial statement is inaccurate / lacking because you would have received this same exact errors. Frankly, I feel like this entire thread has been a huge time waster.
    1 point
  10. It doesn't just close, it gives you an error message, and the error message tells you what went wrong. Don't use Const in the declaration of $sMessageSource and it works ok.
    1 point
  11. Try something like: Global $bLog = False If $CmdLine[0] >= 3 Then $bLog = $CmdLine[3] = 1 ? True : False MsgBox(4096, "Log Info", $bLog)
    1 point
  12. Hi... and welcome to the forums. Please provide more details on that exactly isn't working as expected. Does the script generate any errors? Show us the contents of the Scite output panel.
    1 point
  13. faustf, Then please open a "Feature Request" in Trac so the Devs are aware and can comment. M23
    1 point
  14. faustf, Not at all! DirCopy will automatically copy the directory structure and the files within it - no need to use FileCopy or FileReadToArray or anything else - just the one simple command. How about trying it before complaining? M23
    1 point
  15. faustf, faustf - as this works perfectly for me: #include <File.au3> Local $aFileList = _FileListToArray("M:\Program\Au3 Scripts\faustf", "*", $FLTA_FILES, True) For $i = 0 To UBound($aFileList) - 1 FileCopy($aFileList[$i], "M:\Program\Au3 Scripts\test", $FC_OVERWRITE + $FC_CREATEPATH) Next M23
    1 point
×
×
  • Create New...