Muito obrigado Onjahyr, Fiz assim :
dbedit.Text:=copy(For_Titulos.titulo.Text,1,3); É na probriedade CharCase do dbedit eu coloquei ecUpperCase Estava querendo postar só que estava sem net.., foi bom que pude ver outras formas. --- Em delphi-br@yahoogrupos.com.br, Onjahyr - GMAIL <[EMAIL PROTECTED]> escreveu > > Edit1.Text contem: Alexsandro > > Edit2.Text := UpperCase(Copy(Edit1.Text,1,3)); > > Pronto. > > Blz. > > Alexsandro escreveu: > > > > Boa tarde Pessoal, > > Como eu pego as 3 primeiras letras de um nome e envio para outro campo > > em maiúsculo. > > > > Obrigado pela atenção > > > > Alexsandro Queiroz da Silva > > > > >
