Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Код символа

Vadim © (2004-06-18 17:06:00)
Как узнать код символа? какой командой?

YurikGL (2004-06-18 17:29:00) [1]

> Anatoly Podgoretsky © (18.06.04 17:23) [8]

Он же все равно возьмет первый работающий совет.
Кстати, сам я всегда так переводил т.к. не люблю запоминать названия функций.
Слова byte и integer - регулярно употребляю, а ord - отдельно запоминать надо.

Anatoly Podgoretsky (2004-06-18 17:23:00) [2]
YurikGL © (18.06.04 17:19) [6]
А зачем извращения? Чтобы помучился?

Vadim (2004-06-18 17:20:00) [3]
хватит и ORD

YurikGL (2004-06-18 17:19:00) [4]

> Anatoly Podgoretsky © (18.06.04 17:15) [4]

Значит

i:=integer(ch) :)

Рыба (2004-06-18 17:18:00) [5]
А можно так:

function OrdIzvrat(C: Char): Byte;
bagin
for Result := 0 to 255 do
if C = Chr(Result) then Break;
end;

Anatoly Podgoretsky (2004-06-18 17:15:00) [6]
YurikGL © (18.06.04 17:13) [3]
Нельзя char может быть и 16 битный, ты не смотри, что он сейчас 8 бит, ты смотри предупреждение Борланда по этому поводу!

YurikGL (2004-06-18 17:13:00) [7]
ch:char
i:integer
можно i:=byte(ch)

Anatoly Podgoretsky (2004-06-18 17:08:00) [8]
Можно функцией ORD

Рыба (2004-06-18 17:07:00) [9]
Ord

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »