Inputs first letter to capital

[Timppa]

Hello! In my program there is a ListView that lists names like this:

$liNameList = GUICtrlCreateListView("Name", 368, 176, 217, 84)

Func AddNames()

    GUICtrlCreateListViewItem(GUICtrlRead($inAddName), $liNameList)
    GUICtrlSetData($inAddName,"")

EndFunc

Okay so that is simple one, just a ListView which adds names to list once you press $bAdd button, it adds $inAddName text inside of the ListView.

The problem is now that I want the first letter to be capital, not everything.

I tried to add this between those GuiCtrlCreateListViewItem and GuiCtrlSetData:

StringUpper(GUICtrlRead($inAddName))

But nothing happened. Then I searched from forums and if I understood correctly, it will make every letter capital, but I want only the first letter to be capital.

Then I face one more problem:

http://imgur.com/AtgjFjG

I want to make the name area wider than it is, is there way to make it wider at the starting of program instead of manually moving?

The upper image means that the area should be that wide as the program opens, and not like in the lower picture (as it appears now like that).

And the third problem (however I haven't googled this yet):

You can input blank inputs in it and it will add the blank item to list; I want to disable this (so If GuiCtrlRead($inAddName) = 0 (?) Then > Show message that you need to type something)

And also, you cannot enter twice the same name (Like two Harry's cannot be in the list)

 

Thanks in advance! And of course I try to somehow solve these by myself but now nothing appears in my mind. And yes, I have read helpfile.

Edited October 10, 2015 by Timppa
typo

[Melba23]

Timppa,

- 1. Read the input content into a variable, split off the first character with StringLeft & StringTrimLeft, uppercase the first character and then recombine before adding to the ListView.

- 2. You can set the column width using _GUICtrlListView_SetColumnWidth.

- 3. To prevent adding blanks you will need to check that the input contains a string (you were close):

If GuiCtrlRead($inAddName) = ""

- 4. To prevent adding a duplicate name, search the ListView for the new name using _GUICtrlListView_FindText before adding it.

M23

[Timppa]

Allright thanks for the reply and help, Melba23!

By far I have done this:

Func AddNames()

If GuiCtrlRead($inAddName) = "" Then
   MsgBox(0,"","You did not enter a name.")
Else
   Local $ReplaceLetter

   $ReplaceLetter = StringTrimLeft(GuiCtrlRead($inAddName),1)
   StringUpper($ReplaceLetter)
   ;After this, I have no idea how to replace it?

   If _GUICtrlListView_FindText ( $liNameList, GUICtrlRead($inAddName)) Then
      GUICtrlCreateListViewItem(GUICtrlRead($inAddName), $liNameList)
      StringUpper(GUICtrlRead($inAddName))
      GUICtrlSetData($inAddName,"")
   Else
      MsgBox(0,"","That name exists already!")
      GUICtrlSetData($inAddName,"")
   EndIf
EndIf

EndFunc

Okay, so the things that work for me are the duplicate name and the blank space!

Thanks for that  Yet I am not sure how to add upper cased letter and the first removed letter from the name together.

Something like SomeAddTogetherFunction?($ReplaceLetter + GUICtrlRead($inAddName))

I have no idea how to add those together, or simply GUICtrlCreateListViewItem($ReplaceLetter + GUICtrlRead($inAddName)) ? But then it would be either Hharry OR harry because that $ReplaceLetter only does delete the letter or?

I am pretty confused right now but is there any command that could be in helpfile to describe how to combine those?

[mikell]

$name = "name"
$newname = StringUpper(StringLeft($name, 1)) & StringTrimLeft($name, 1)
Msgbox(0,"", $newname)

[Timppa]

$name = "name"
$newname = StringUpper(StringLeft($name, 1)) & StringTrimLeft($name, 1)
Msgbox(0,"", $newname)

Thank you alot! That is the thing I was looking for

Here is the whole script if someone is struggling (like me) and googling for answer:

Func AddNames()

If GuiCtrlRead($inAddName) = "" Then
   MsgBox(0,"","You did not enter a name.")
Else
   Local $RawName = GUICtrlRead($inAddName)
   Local $NewName = StringUpper(StringLeft($RawName, 1)) & StringTrimLeft($RawName, 1)

   If _GUICtrlListView_FindText ( $liNameList, $NewName) Then
      GUICtrlCreateListViewItem(($NewName), $liNameList)
.
      GUICtrlSetData($inAddName,"")
   Else
      MsgBox(0,"","That name exists already!")
      GUICtrlSetData($inAddName,"")
   EndIf
EndIf

EndFunc

 

Edited October 10, 2015 by Timppa

[Timppa]

Okay wait, I found a problem:

I cannot add duplicate name of the FIRST added name, but if there is

Harry

James

Then I can add infinite amount of James in the list, I tried to add this after If _GuiCtrlListView_FindText

$RawName = Null

$NewName = Null

 

But I think it does not matter if I reset the variables. Should it work if I check $inAddName instead of $NewName?

[Melba23]

Timppa,

You need to start reading the Help file about the functions we suggest. The return from _GUICtrlListView_FindText is the index of the item in the ListView - so merely using:

If _GUICtrlListView_FindText ( $liNameList, $NewName) Then

will mean that the comparison is True if the item is anywhere other then the first (0) index. You need to check for the error return like this:

If _GUICtrlListView_FindText ( $liNameList, $NewName) = -1 Then

Now you will only add the name if it is not found.

As I said: READ the Help file. Do not just think that code will work as you expect - find out what it actually does.

M23

[Timppa]

Ohh, sorry. I guess I read the helpfile too negligently, but I'll try my best to focus on the text I read in future

This case is now solved.

Edited October 10, 2015 by Timppa
typo again..

[Jos]

Ohh, sorry. I guess I read the helpfile too negligently, but I'll try my best to focus on the text I read in future

This case is now solved.

Deja Vue

Edited October 10, 2015 by Jos

[BrewManNH]

To capitalize the first letter of every word, you can also use the function _StringTitleCase.