Уроки по Delphi


         

Begin


C:='A'; // в переменную С заносим символ А

B:=Ord(C); // получаем значение символа А равное 65

B:=100; // В переменную В заносим 100

C:=Chr(B); // получаем символ d



Содержание  Назад  Вперед