Jump to content

Recommended Posts

Posted (edited)

Hi

I got this:

#include <Array.au3>

Local $avArray[10]

$avArray[1][0] = "TD0001"
$avArray[2][0] = "TD0002"
$avArray[3][0] = "TD0003"
$avArray[4][0] = "TD0004"
$avArray[5][0] = "TD0005"

MsgBox(0,'Max String value', _ArrayMax($avArray, 0, 1))
$sInput = _ArrayMax($avArray, 0, 1)


$sAlpha = StringMid($sInput, 1, 2)
$sNumeric = StringMid($sInput, 3)
$sNumeric = StringFormat("%04i", Number($sNumeric) + 1)
$sOutput = $sAlpha & $sNumeric
MsgBox(0, "Result", $sOutput)

And how can i read the highest value like this?

Thanks, RJ

Edited by wipped
  • Moderators
Posted

wipped,

I would create a temporary 1D array of the relevant dimension of the 2D array like this: ;)

#include <Array.au3>

Local $avArray[6][2]

$avArray[1][0] = "TD0001"
$avArray[2][0] = "TD0002"
$avArray[3][0] = "TD0003"
$avArray[4][0] = "TD0004"
$avArray[5][0] = "TD0005"

Local $aTemp[UBound($avArray)]
For $i = 1 To UBound($avArray) - 1
    $aTemp[$i] = $avArray[$i][0]
Next

MsgBox(0,'Max String value', _ArrayMax($aTemp, 0, 1))
$sInput = _ArrayMax($aTemp, 0, 1)

$sAlpha = StringMid($sInput, 1, 2)
$sNumeric = StringMid($sInput, 3)
$sNumeric = StringFormat("%04i", Number($sNumeric) + 1)
$sOutput = $sAlpha & $sNumeric
MsgBox(0, "Result", $sOutput)

Does that do it? :)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Posted

wipped,

I would create a temporary 1D array of the relevant dimension of the 2D array like this: ;)

#include <Array.au3>

Local $avArray[6][2]

$avArray[1][0] = "TD0001"
$avArray[2][0] = "TD0002"
$avArray[3][0] = "TD0003"
$avArray[4][0] = "TD0004"
$avArray[5][0] = "TD0005"

Local $aTemp[UBound($avArray)]
For $i = 1 To UBound($avArray) - 1
    $aTemp[$i] = $avArray[$i][0]
Next

MsgBox(0,'Max String value', _ArrayMax($aTemp, 0, 1))
$sInput = _ArrayMax($aTemp, 0, 1)

$sAlpha = StringMid($sInput, 1, 2)
$sNumeric = StringMid($sInput, 3)
$sNumeric = StringFormat("%04i", Number($sNumeric) + 1)
$sOutput = $sAlpha & $sNumeric
MsgBox(0, "Result", $sOutput)

Does that do it? :)

M23

Thanks alot it works,

But can you tell me what Local $avArray[6][2] does?

  • Moderators
Posted

wipped,

Did you try to run your initial code? Obviously not, or you would have seen the error: "Array variable has incorrect number of subscripts or subscript dimension range exceeded" when you tried to set the elements. ;)

Local $avArray[6][2] declares a 2D array which you need when setting the elements using $avArray[1][0] = "TD0001".

You need the declaration to match the subsequent usage of the array. Even ReDim requires the number of dimensions to remain constant - it only allows you to vary the number of elements within a dimension.

All clear? Ask again if not. :)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Posted

wipped,

Did you try to run your initial code? Obviously not, or you would have seen the error: "Array variable has incorrect number of subscripts or subscript dimension range exceeded" when you tried to set the elements. ;)

Local $avArray[6][2] declares a 2D array which you need when setting the elements using $avArray[1][0] = "TD0001".

You need the declaration to match the subsequent usage of the array. Even ReDim requires the number of dimensions to remain constant - it only allows you to vary the number of elements within a dimension.

All clear? Ask again if not. :)

M23

Think i understand but if i don't put it in my script it still works so i just dont put it in

Thanks for the help

Wipped

Posted

But it's good to know for the future so you don't post questions like "How can I change the size of an Array when I don't know how big it will be!" And like Melba23 I am confused to how your first script worked?! :)

UDF List:

 
_AdapterConnections()_AlwaysRun()_AppMon()_AppMonEx()_ArrayFilter/_ArrayReduce_BinaryBin()_CheckMsgBox()_CmdLineRaw()_ContextMenu()_ConvertLHWebColor()/_ConvertSHWebColor()_DesktopDimensions()_DisplayPassword()_DotNet_Load()/_DotNet_Unload()_Fibonacci()_FileCompare()_FileCompareContents()_FileNameByHandle()_FilePrefix/SRE()_FindInFile()_GetBackgroundColor()/_SetBackgroundColor()_GetConrolID()_GetCtrlClass()_GetDirectoryFormat()_GetDriveMediaType()_GetFilename()/_GetFilenameExt()_GetHardwareID()_GetIP()_GetIP_Country()_GetOSLanguage()_GetSavedSource()_GetStringSize()_GetSystemPaths()_GetURLImage()_GIFImage()_GoogleWeather()_GUICtrlCreateGroup()_GUICtrlListBox_CreateArray()_GUICtrlListView_CreateArray()_GUICtrlListView_SaveCSV()_GUICtrlListView_SaveHTML()_GUICtrlListView_SaveTxt()_GUICtrlListView_SaveXML()_GUICtrlMenu_Recent()_GUICtrlMenu_SetItemImage()_GUICtrlTreeView_CreateArray()_GUIDisable()_GUIImageList_SetIconFromHandle()_GUIRegisterMsg()_GUISetIcon()_Icon_Clear()/_Icon_Set()_IdleTime()_InetGet()_InetGetGUI()_InetGetProgress()_IPDetails()_IsFileOlder()_IsGUID()_IsHex()_IsPalindrome()_IsRegKey()_IsStringRegExp()_IsSystemDrive()_IsUPX()_IsValidType()_IsWebColor()_Language()_Log()_MicrosoftInternetConnectivity()_MSDNDataType()_PathFull/GetRelative/Split()_PathSplitEx()_PrintFromArray()_ProgressSetMarquee()_ReDim()_RockPaperScissors()/_RockPaperScissorsLizardSpock()_ScrollingCredits_SelfDelete()_SelfRename()_SelfUpdate()_SendTo()_ShellAll()_ShellFile()_ShellFolder()_SingletonHWID()_SingletonPID()_Startup()_StringCompact()_StringIsValid()_StringRegExpMetaCharacters()_StringReplaceWholeWord()_StringStripChars()_Temperature()_TrialPeriod()_UKToUSDate()/_USToUKDate()_WinAPI_Create_CTL_CODE()_WinAPI_CreateGUID()_WMIDateStringToDate()/_DateToWMIDateString()Au3 script parsingAutoIt SearchAutoIt3 PortableAutoIt3WrapperToPragmaAutoItWinGetTitle()/AutoItWinSetTitle()CodingDirToHTML5FileInstallrFileReadLastChars()GeoIP databaseGUI - Only Close ButtonGUI ExamplesGUICtrlDeleteImage()GUICtrlGetBkColor()GUICtrlGetStyle()GUIEventsGUIGetBkColor()Int_Parse() & Int_TryParse()IsISBN()LockFile()Mapping CtrlIDsOOP in AutoItParseHeadersToSciTE()PasswordValidPasteBinPosts Per DayPreExpandProtect GlobalsQueue()Resource UpdateResourcesExSciTE JumpSettings INISHELLHOOKShunting-YardSignature CreatorStack()Stopwatch()StringAddLF()/StringStripLF()StringEOLToCRLF()VSCROLLWM_COPYDATAMore Examples...

Updated: 22/04/2018

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...