preciso converter 2 coisas.. alguem me ajuda?

Delphi

29/10/2006

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

Curtidas 0

Respostas

Rodc

Rodc

29/10/2006

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



GOSTEI 0
POSTAR