Meu passatempo do início da manhã... function capitulate(const input: string): string; var index: integer; begin result := input; for index:=1 to length(result) do if (index=1) or (result[index-1]=' ') then result[index] := ansiUpperCase(result[index])[1]; end;
ou http://pastebin.com/06GTVaNm -- Dirlei Dionísio http://MaisQueBomCodigo.blogspot.com Em 3 de agosto de 2010 13:13, Pablo Farias <develo...@marketingrapido.com.br > escreveu: > > > Ola pessoal, > preciso capitular as palavras de uma string por exemplo > > pablo farias >>> transformar em >>> Pablo Farias > > Alguem sabe como fazer isto? > -- > Pablo Farias > Fone(81)9169.3339 > develo...@marketingrapido.com.br <developer%40marketingrapido.com.br> > skype : marketingrapido > www.marketingrapido.com.br > > [As partes desta mensagem que não continham texto foram removidas] ------------------------------------ -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: delphi-br-unsubscr...@yahoogrupos.com.br <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html