preciso converter 2 coisas.. alguem me ajuda?

29/10/2006

0

o codigo esta em object pascal:

if Key in [´a´..´z´] then Key:= UpCase(Key);


procedure CriaForm(FormClass: TFormClass);
begin
 with FormClass.Create(Application) do
  try
   ShowModal;
  finally
   Free;
  end;
end;



Njuniorba

Njuniorba

Responder

Posts

31/10/2006

Rodc

O primeiro eu sei, o segundo eu passo...
if (Key >= ´a´ && Key <= ´z´)
    Key = UpCase(Key);



Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar