Muito obrigado, André, enxugou legal meu código!!! Abração! Fernando.
Andre Luis Silveria escreveu: > > > Tenta assim: > > If DBEdit52.Text[1] in ['0'..'5'] Then > Begin > DBEdit10.Text := 'Conceito bom.'; > DBEdit11.SetFocus; > > End; > GYNCOWBOY > André Luis da Silveira > > ----- Mensagem original ---- > De: fernando5000br <[EMAIL PROTECTED] <mailto:aranhento%40gmail.com>> > Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> > Enviadas: Segunda-feira, 1 de Outubro de 2007 9:40:44 > Assunto: [delphi-br] Incompatible types 'string' and 'set' > > Bom dia, pessoal, e boa semana a todos! > > Sei que deve ser coisa besta, mas me encalacrei com isso: > > If DBEdit52.Text = ['0'..'5'] > > Then Begin > > DBEdit10.Text := 'Conceito bom.'; > > DBEdit11.SetFocus; > > End; > > Dá o erro Incompatible types 'string' and 'set' > > É claro que eu posso fazer um por um...mas não me parece certo...aonde > > estaria meu erro? > > Obrigado! > > Fernando. > >
