czardas Posted June 23, 2014 Share Posted June 23, 2014 (edited) I found the code I used for this. There are magic numbers in there, but they are documented and the constants can be put back if you wish. Don't get mad at me - this is exactly the method I used. Styles - $ES_AUTOHSCROLL, $ES_READONLY Extended Style - $WS_EX_TRANSPARENT Global $sFilePath = "C:\Documents and Settings\User\Desktop\one_two_three_four_five_six_seven_eight.txt" Global $sNewPath = "C:\Documents and Settings\User\Desktop\New Folder\1345678.txt" _ExampleGUI($sFilePath, $sNewPath) Func _ExampleGUI($sFilePath, $sNewPath) Local $sText, $iGUIHeight, $iGUIWidth $sText = "Truncation Alternative" $iGUIWidth = 256 $iGUIHeight = 148 Local $hGUI = GUICreate($sText, $iGUIWidth, $iGUIHeight, Default, Default, Default, Default) GUISetBkColor(0xF0EEE0, $hGUI) GUICtrlCreateLabel("Source:", 10, 10, 50, 20) ; Source File GUICtrlSetFont(-1, 9, 600) ; The text may be too long to fit on a label, but an Input control can be made to look like a label. GUICtrlCreateInput(StringRegExpReplace($sFilePath, "(.*\\)+", ""), 63, 10, 183, 20, BitOR(0x80, 0x800), 0x20) ; BitOR($ES_AUTOHSCROLL, $ES_READONLY), $WS_EX_TRANSPARENT) GUICtrlSetFont(-1, 9) GUICtrlSetBkColor(-1, 0xF0EEE0) GUICtrlCreateLabel("Folder:", 10, 36, 50, 20) ; Output Folder GUICtrlSetFont(-1, 9, 600) Local $hNewFolder = GUICtrlCreateInput(StringRegExpReplace($sNewPath, "(.+\\)(.+)(\\)(.+\z)", "$2"), 63, 36, 151, 20, BitOR(0x80, 0x800), 0x20) ; BitOR($ES_AUTOHSCROLL, $ES_READONLY), $WS_EX_TRANSPARENT) GUICtrlSetFont(-1, 9) GUICtrlSetBkColor(-1, 0xF0EEE0) GUISetState() While 1 $msg = GUIGetMsg() If $msg = -3 Then ExitLoop ; $GUI_EVENT_CLOSE WEnd EndFunc Edited June 23, 2014 by czardas operator64 ArrayWorkshop Link to comment Share on other sites More sharing options...
guinness Posted June 23, 2014 Author Share Posted June 23, 2014 Don't get mad at me - this is exactly the method I used. I don't care anymore. Thanks for posting. 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 parsing • AutoIt Search • AutoIt3 Portable • AutoIt3WrapperToPragma • AutoItWinGetTitle()/AutoItWinSetTitle() • Coding • DirToHTML5 • FileInstallr • FileReadLastChars() • GeoIP database • GUI - Only Close Button • GUI Examples • GUICtrlDeleteImage() • GUICtrlGetBkColor() • GUICtrlGetStyle() • GUIEvents • GUIGetBkColor() • Int_Parse() & Int_TryParse() • IsISBN() • LockFile() • Mapping CtrlIDs • OOP in AutoIt • ParseHeadersToSciTE() • PasswordValid • PasteBin • Posts Per Day • PreExpand • Protect Globals • Queue() • Resource Update • ResourcesEx • SciTE Jump • Settings INI • SHELLHOOK • Shunting-Yard • Signature Creator • Stack() • Stopwatch() • StringAddLF()/StringStripLF() • StringEOLToCRLF() • VSCROLL • WM_COPYDATA • More Examples... Updated: 22/04/2018 Link to comment Share on other sites More sharing options...
czardas Posted June 23, 2014 Share Posted June 23, 2014 (edited) Having the option to avoid truncation without making a mess of your design is nice. Both solutions have merit. The code was written a while ago using an older version. Edited June 23, 2014 by czardas operator64 ArrayWorkshop Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now