nossa galera, quanta repercusão hehehe
ja resolvi, nao precisava de codigo troquei a propriedade e resolveu. vlw 2009/3/24 Wagne®_Fix <wagner_...@yahoo.com.br> > Não precisa de programação para isso... > > Seleciona todos os Edits que você quer em maiusculo e vai nas propriedades > muda o charcase para ecUpperCase > > --- Em ter, 24/3/09, felipe govoni > <govoni.fel...@gmail.com<govoni.felipe%40gmail.com>> > escreveu: > > > De: felipe govoni <govoni.fel...@gmail.com <govoni.felipe%40gmail.com>> > Assunto: [delphi-br] maiuscula em todos os dedits > Para: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> > Data: Terça-feira, 24 de Março de 2009, 11:17 > > bom dia > > algume sabe me dize oq tem de errado nesse codigo: > > for j := 0 to frmFinasa.Component Count - 1 do > > if (frmFinasa.Componen ts[j] is tdbEdit) then > > (frmFinasa.Componen ts[j] as tdbEdit).Text := > > UpperCase((frmFinas a.Components[ j] as TdbEdit).Text) ; > > ele nao faz nada, e quando tento debuga, no .text da a seguinte mensagem: > > "expression illegal in evaluator" > > tentei faze um teste com o seguinte codigo e tambem nao fez nada > > for j := 0 to frmFinasa.Component Count - 1 do > > if (frmFinasa.Componen ts[j] is tdbEdit) then > > (frmFinasa.Componen ts[j] as tdbEdit).Text := 'teste'; > > alguem pode me ajuda? > > obrigado > > -- > > Felipe Govoni > > ------------ --------- > > GOVONI Sistemas > > Fone 8472-8718 > > www.govoni.com. br > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > Veja quais são os assuntos do momento no Yahoo! +Buscados > http://br.maisbuscados.yahoo.com > > [As partes desta mensagem que não continham texto foram removidas] > > > -- Felipe Govoni --------------------- GOVONI Sistemas Fone 8472-8718 www.govoni.com.br [As partes desta mensagem que não continham texto foram removidas]