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
Curtir tópico
+ 0
Responder
Posts
31/10/2006
Rodc
O primeiro eu sei, o segundo eu passo...
if (Key >= ´a´ && Key <= ´z´) Key = UpCase(Key);
Responder
Clique aqui para fazer login e interagir na Comunidade :)