Difference between revisions of "AutoHotkey: Inplace rename facilities"

From TotalcmdWiki
Jump to: navigation, search
 
Line 1: Line 1:
 
Set of small AHK scripts allowing to perform different tasks in Inplace rename field (or any other place).  
 
Set of small AHK scripts allowing to perform different tasks in Inplace rename field (or any other place).  
  
;###UPPERCASE LOWERCASE UNDERSCORE FACILITIES###
+
;UPPERCASE LOWERCASE UNDERSCORE FACILITIES###
  
 
;All lowercase
 
;All lowercase
;#1 = Win Key + 1
+
;\#1 = Win Key + 1
 
#1::
 
#1::
 
ControlGetFocus, ActiveControl, A
 
ControlGetFocus, ActiveControl, A

Revision as of 09:54, 2 May 2006

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. 1::

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

First letter uppercase
  1. 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
  1. 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
  1. 4::

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

Replace Space by Underscore
  1. 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)
  1. 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)
  1. 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 /
  1. 8::
  ControlGetFocus, ActiveControl, A
  Send, ^c
  ;StringReplace, OutputVar, InputVar, SearchText [, ReplaceText, ReplaceAll?]  
  StringReplace, string_underscore2space, clipboard, \, /, All
  Send, %string_underscore2space%

Return

Back to AutoHotkey