Тема: преобразование типов
Показать сообщение отдельно
  #2  
Старый 11.10.2009, 19:42
Аватар для AleD
AleD AleD вне форума
Активный
  
Регистрация: 21.02.2009
Адрес: г.Краснокаменск
Сообщения: 383
Репутация: 91
По умолчанию
В чём проблема? Что вообще нужно? Нужен номер буквы из ASCII таблицы?
Код:
i := Ord(c);
обратно
Код:
c := Chr(i); // ну да chr, вчера просто в час ночи писал...
__________________
TAleD = class(TUser)
public
function HelpMe(ASubject, ARequest: String): String;
function GiveMeExample(ASubject: String): TStringList;
procedure WriteReview(APost: Integer; ADescription: TStringList);
end;
Ответить с цитированием