Is there a property element selection that sets a text element so that its first letter will always be capitalized?

I've cobbled together this programming that does the trick, but I'm hoping there's a cleaner way.

On-element-change

var vFirstLetter as string

// Capitalizes the first letter of the Last Name

vFirstLetter = @Left(LastName, 1)
vFirstLetter = ToUpper(vFirstLetter)
LastName = @REPLFIR(LastName, vFirstLetter, vFirstLetter) 

Super, super, thanks muchly (at least I got some programming practice, hey?)

Infinity wrote on Aug 8^th, 2007 at 8:07pm:

Nope. That's what is happening. Just as a date stored as YYYY/MM/DD can be displayed to you in different formats, the same applies to text.

Infinity,

I know there are many ways to do what you want with Sesame but here is one more example for reference purposes, a generic subroutine that will capitalize multiple words.

Subroutine MultInitCaps()
// Multiple Words in Data
var vSpaces as String
var vTemp as String
var vTempBuild as String
var n as Int
ThisElement = ToUpper(@Left(ThisElement, 1)) +
@Mid(ThisElement, 2, @Len(ThisElement) - 1)
vSpaces = @Replace(ThisElement, " ",";")
If @Instr(vSpaces, ";") > 0
{
For n = 1 to @CountStringArray(vSpaces)
vTemp = @AccessStringArray(vSpaces, n)
vTemp = ToUpper(@Left(vTemp, 1)) + @Mid(vTemp,
2, @Len(vTemp)-1)
If n = 1
{
vTempBuild = vTemp
}
Else
{
vTempBuild = vTempBuild + " " + vTemp
}
Next
ThisElement = vTempBuild
}
End Subroutine

See this posting that I just made:
http://www.lantica.com/Forum3/cgi-bin/yabb2/YaBB.pl?num=1077552596