Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 05/07/2013 in all areas

  1. prazetto

    Skin UDF

    Skin UDF Change your AutoIt3 Form skin. No less no more. Download SkinMagic.dll SkinMagic Files (582 Kb) SkinMagic UDF Please choose server where you will download: SkinMagic.zip (707 Kb) - code.google.com (included with SkinMagic.dll) SkinMagic.zip (126 Kb) - autoitscript.com Skin Editor SkinMagic C/C++Toolkit Skin Collection AlphaOS DarkArea LighBlue Ocean BlueHorn Click on Image to download skin. Go To Developer Site http://www.appspeed.com if you want to read C++ version of this, read here Use the SkinMagic Toolkit to Skin your Application UDF.SkinMagic.zip
    2 points
  2. mesale0077 asked me whether I could code some CSS loading animations from different web sites. These are the results using GDI+ (AutoIt v3.3.12.0+ required!): _GDIPlus_MonochromaticBlinker.au3 / _GDIPlus_RotatingBokeh.au3 _GDIPlus_SpinningCandy.au3 / _GDIPlus_SteamPunkLoading.au3 _GDIPlus_IncreasingBalls.au3 / _GDIPlus_PacmanProgressbar.au3 _GDIPlus_StripProgressbar.au3 / _GDIPlus_RingProgressbar.au3 _GDIPlus_LineProgressbar.au3 / _GDIPlus_SimpleLoadingAnim.au3 _GDIPlus_TextFillingWithWater.au3 / _GDIPlus_MultiColorLoader.au3 _GDIPlus_LoadingSpinner.au3 / _GDIPlus_SpinningAndPulsing.au3 _GDIPlus_TogglingSphere.au3 / _GDIPlus_CloudySpiral.au3 _GDIPlus_GlowingText.au3 (thanks to Eukalyptus) / _GDIPlus_HypnoticLoader.au3 _GDIPlus_RotatingRectangles.au3 / _GDIPlus_TRONSpinner.au3 _GDIPlus_RotatingBars.au3 / _GDIPlus_AnotherText.au3 (thanks to Eukalyptus) _GDIPlus_CogWheels.au3 (thanks to Eukalyptus) / _GDIPlus_DrawingText.au3 (thanks to Eukalyptus) _GDIPlus_GearsAnim.au3 / _GDIPlus_LEDAnim.au3 _GDIPlus_LoadingTextAnim.au3 / _GDIPlus_MovingRectangles.au3 _GDIPlus_SpinningAndGlowing.au3 (thanks to Eukalyptus) / _GDIPlus_YetAnotherLoadingAnim.au3 _GDIPlus_AnimatedTypeLoader.au3 / _GDIPlus_Carousel.au3 Each animation function has a built-in example how it can be used. AiO download: GDI+ Animated Wait Loading Screens.7z (previous downloads: 1757) Big thanks to Eukalyptus for providing several examples. Maybe useful for some of you Br, UEZ PS: I don't understand CSS - everything is made out of my mind, so it might be different from original CSS examples
    1 point
  3. Shocker, If you want to know how many files were in each folder, why not use the UDF on each folder in turn as you did in the first place? Then it is easy to get the number of files in each folder. If you use the recursive mode of the UDF to look in every folder then it returns only one array and you will have to parse that array to find out how many files were found in each folder. So you choose - either look in all folders and parse the result: #include <Array.au3> #include <RecFileListToArray.au3> $sRoot = "c:\Myprog\" ; Look for files in all subfolders $aFullList = _RecFileListToArray($sRoot, "*.zip", 1, 1, 0, 2) _ArrayDisplay($aFullList) ; Just to show result ; Declare an array to hold the number of files found Global $aCount[5] ; Loop through the files found For $i = 1 To $aFullList[0] ; Now loop through the 4 folders For $j = 1 To 4 ; If the path is in the filename If StringInStr($aFullList[$i], $sRoot & $j) Then ; Add it t0 the count $aCount[$j] += 1 EndIf Next Next ; And display the result of the count MsgBox(0, "Files found", _ "Folder Myprog\1: " & $aCount[1] & @CRLF & _ "Folder Myprog\2: " & $aCount[2] & @CRLF & _ "Folder Myprog\3: " & $aCount[3] & @CRLF & _ "Folder Myprog\4: " & $aCount[4]) Or look in each folder separately: #include <Array.au3> #include <RecFileListToArray.au3> $sRoot = "c:\Myprog\" ; Declare an array to hold the number of files found Global $aCount[5] ; Loop through the folders For $i = 1 To 4 ; Look for files in each folder $aFolderList = _RecFileListToArray($sRoot & $i & "\update", "*.zip", 1, 0, 0, 2) _ArrayDisplay($aFolderList) ; Just to show result ; Add count to array $aCount[$i] = $aFolderList[0] Next ; And display the result of the count MsgBox(0, "Files found", _ "Folder Myprog\1: " & $aCount[1] & @CRLF & _ "Folder Myprog\2: " & $aCount[2] & @CRLF & _ "Folder Myprog\3: " & $aCount[3] & @CRLF & _ "Folder Myprog\4: " & $aCount[4]) Sorted now? M23
    1 point
  4. water

    Store values into an array?

    Example script: #include <array.au3> $sString = "olololololol" $sSearch = "o" StringReplace($sString, $sSearch, "") ; @extended is set to the number of replacements Global $aPositions[@extended + 1] = [@extended] Global $iPos For $i = 1 To 99999 $iPos = StringInStr($sString, $sSearch, Default, $i) If $iPos = 0 Then exitloop $aPositions[$i] = $iPos Next _ArrayDisplay($aPositions) exit
    1 point
  5. water

    TCP Client and Server

    Glad you could solve your problem
    1 point
×
×
  • Create New...