AutoHotkey: Inplace rename facilities

Set of small AHK scripts allowing to perform different tasks in Inplace rename field (or any other place).

UPPERCASE LOWERCASE UNDERSCORE FACILITIES###

All lowercase

#1 = Win Key + 1

#1::

ControlGetFocus, ActiveControl, A Send, ^c StringLower, lowercase_string, clipboard Send, %lowercase_string% Return

First letter uppercase

#2::

ControlGetFocus, ActiveControl, A Send, ^c StringLower, lowercase_string, clipboard StringLeft, first_letter_of_string, lowercase_string, 1 StringUpper, first_letter_of_string_uppercase, first_letter_of_string StringTrimLeft, rest_of_string, lowercase_string, 1 Send, %first_letter_of_string_uppercase%%rest_of_string% Return

First Of Each Word Uppercase

#3::

ControlGetFocus, ActiveControl, A Send, ^c

StringUpper, OutputVar, InputVar [, T]

StringLower, OutputVar, InputVar [, T]

[, T] = If the parameter is the letter T, the string will be converted to title case.

StringLower, first_each_word_uppercase_string, clipboard, T Send, %first_each_word_uppercase_string% Return

ALL UPPERCASE

#4::

ControlGetFocus, ActiveControl, A Send, ^c StringUpper, uppercase_string, clipboard Send, %uppercase_string% Return

Replace Space by Underscore

#5::

ControlGetFocus, ActiveControl, A Send, ^c

StringReplace, OutputVar, InputVar, SearchText [, ReplaceText, ReplaceAll?]

StringReplace, string_space2underscore, clipboard, %A_SPACE%, _, All Send, %string_space2underscore% Return

Replace Underscore by Space (Remove Underscore)

#6::

ControlGetFocus, ActiveControl, A Send, ^c

StringReplace, OutputVar, InputVar, SearchText [, ReplaceText, ReplaceAll?]

StringReplace, string_underscore2space, clipboard, _, %A_SPACE%, All Send, %string_underscore2space% Return

Replace Dot by Space (Remove Underscore)

#7::

ControlGetFocus, ActiveControl, A Send, ^c

StringReplace, OutputVar, InputVar, SearchText [, ReplaceText, ReplaceAll?]

StringReplace, string_underscore2space, clipboard, ., %A_SPACE%, All Send, %string_underscore2space% Return

Replace \ by /

#8::  

ControlGetFocus, ActiveControl, A Send, ^c

StringReplace, OutputVar, InputVar, SearchText [, ReplaceText, ReplaceAll?]

StringReplace, string_underscore2space, clipboard, \, /, All Send, %string_underscore2space% Return

Back to AutoHotkey