Показать сообщение отдельно
  #5  
Старый 22.08.2010, 00:04
Аватар для eXplorer
eXplorer eXplorer вне форума
Активный
 
Регистрация: 06.08.2010
Адрес: Ярославль
Сообщения: 264
Версия Delphi: 7
Репутация: 14
По умолчанию

Я тоже канечно глупо придумал
но так можно...

например:

Код:
//для русского:
edit1.Text:=inttostr(ord('а')-223);

//и для английского:
edit2.Text:=inttostr(ord('a')-96);
Ответить с цитированием