Új hozzászólás Aktív témák

• #1771 szandisas őstag Rover623 #1770

  Új Válasz 2007-03-27 15:29:40 #1771

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  szandisas

  őstag

  válasz Rover623 #1770 üzenetére

  ''If (betu>='a') and (betu<='z') then dec(betu,ord('a')-ord('A'));''
  ezt naggyából értem... valami normális leírást tudsz nekem linkelni ahol meg tudom tanulni ? év végén vizsga lesz, csak egy kettesre hajtok
  
  MOD:
  erre ez volt a tanár példája:
  
  Var
  ch : Char;
  Begin
  ch:=UpCase('a'); {ch = 'A'}
  
  
  [Szerkesztve]

Új hozzászólás Aktív témák