Titolo: Rendere maiuscole tutte le prime lettere
Categoria: Codice |
|
Ultimo Aggiornamento: 20/10/05 |
Il metodo che segue permette di rendere maiuscole la prima lettera di un campo alfa e tutte quelle di tutte le altre parole della stringa, considerando come separatore di parola lo spazio.
`$1 è il testo a cui applicare il metodo
`$0 il risultato
C_STRING(30;$risultato_s;$0;$vch_s)
C_LONGINT($pos_l)
$risultato_s:=$1
$risultato_s:=Uppercase(Substring($risultato_s;1;1))+Lowercase(Substring($risultato_s;2;80))
$pos_l:=Position(" ";$risultato_s)
While ($pos_l>0)
$vch_s:=" "+Substring($risultato_s;$pos_l+1;1)
$risultato_s:=Replace string($risultato_s;$vch_s;Uppercase($vch_s);1)
$pos_l:=Position(" ";$risultato_s;$pos_l+1)
End while $0:=$risultato
Inviato da: PierPaolo Sichera |
|
Visite: 11666 |
Se accedi con utente e password, puoi aggiungere dei commenti.