Вниз
Скачать: CL | DM;

Перевод символа в другой формат   Найти похожие ветки 

← →
Danco ©   (2009-12-02 07:17) [0]

Как перевести символ в какой либо цифровой формат?

например:
s:="L";
i:=(...(L));

Заранее благодарен за ответ.


← →
brother ©   (2009-12-02 07:20) [1]

i:=Ord("L");


← →
brother ©   (2009-12-02 07:21) [2]

ну или
i:= Ord(s);


← →
Danco ©   (2009-12-02 07:45) [3]

var
s:String;
i:Integer;
begin
s:="-";
i:=Ord(S);
ShowMessage(IntToStr(i));

этот код работает, но я беру символ из Excel и он его не распознает.

если в Excel или Word написать "текст[пробел]-[пробел]текст" то он автоматически ставит длинный тире(-), и функция Ord его не видит.

Есть еще какая-нибудь подобная функция, что бы символ в числовой формат перевести или какой-нибудь другой?

Работаю в Windows 7 на студии (Delphi) 2010


← →
Anatoly Podgoretsky ©   (2009-12-02 08:57) [4]

Ord, только она работает с символами, а не строками.


← →
sniknik ©   (2009-12-02 09:36) [5]

> автоматически ставит длинный тире(-)
короткий тире

> функция Ord его не видит.
посмотри справку про юникодный аналог, код короткого тире 8211, т.е. много больше чем из основной таблицы символов. (проверить - в ворде зажимаешь Ctrl, набираешь на дополнительной раскладке 8211, отпускаешь Ctrl)


← →
Danco ©   (2009-12-02 09:41) [6]


> Ord, только она работает с символами, а не строками.

Через Copy символ вырезаю.

Всем спасибо, нашел другой выход.


← →
Anatoly Podgoretsky ©   (2009-12-02 10:34) [7]

> Danco  (02.12.2009 09:41:06)  [6]

Copy тоже string возвращает.


← →
brother ©   (2009-12-02 12:42) [8]

тип должен быть char



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c
11-1210487732
=BuckLr=
2008-05-11 10:35
2010.01.24
Скрыть каретку в richedit НАПРОЧЬ


11-1210657161
MM_ASH
2008-05-13 09:39
2010.01.24
VMT


15-1258555427
Германн
2009-11-18 17:43
2010.01.24
Что-то я запамятовал.


2-1259750612
Matveih1
2009-12-02 13:43
2010.01.24
Как передать соединение BDE в другой модуль.


2-1259304661
nevermind
2009-11-27 09:51
2010.01.24
Запуск приложения несколько раз




   Наверх