Текущий архив: 2004.04.25;
Скачать: CL | DM;
Вниз
Код символа! Найти похожие ветки
← →
BlackLord2003 © (2004-04-07 19:13) [0]Привет! Возникла такая проблема. Как отображать код символа (#21 например), около которого находится каретка в SynEdit"е?
← →
fatal © (2004-04-07 21:40) [1]procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
Label1.Caption:=IntToStr(ord(Key));
end;
Это имелось ввиду?
← →
BlackLord2003 © (2004-04-09 18:39) [2]Маленько не то! Тут отображается номер символа, а мне нужен код!
Пример:
Символ: !
Номер сивола: 33
Код символа: #21
← →
clickmaker © (2004-04-09 18:43) [3]Код символа у него как раз #33. Ну или #$21, если уж в 16-тиричной
← →
WebErr © (2004-04-09 18:48) [4]
> Номер сивола: 33
> Код символа: #21
:)
← →
default © (2004-04-09 18:56) [5]IntToHex(Ord(Symbol), Byte(Ord(Symbol) > 15) + 1)
если ноль спереди не нужен когда коду достаточно 1 символа
Страницы: 1 вся ветка
Текущий архив: 2004.04.25;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.089 c
