Returns the ANSI value for the leftmost character in a character

← →
BubbleGum © (2003-03-16 10:13) [0]

Returns the ANSI value for the leftmost character in a character expression ?

← →
BubbleGum © (2003-03-16 10:25) [1]

Как можно получить код символа ANSI таблицы ?

← →
Anatoly Podgoretsky © (2003-03-16 13:14) [2]

ORD

← →
BubbleGum © (2003-03-16 16:07) [3]

есть символьное поле в таблице размерность 2 и необходимо определить номер символа, ORD не совсем подходит. нужен полный аналог фоксовой функции ASC().........

← →
BubbleGum © (2003-03-16 16:30) [4]

поле символьное 2 байтное. нужно числовое выражение ....

← →
blackman © (2003-03-16 16:44) [5]

>код символа ANSI и необходимо определить номер символа
Сам-то понял, что спрашиваешь ?

← →
BubbleGum © (2003-03-16 17:06) [6]

I>
> blackman © (16.03.03 16:44)

не матюкай сильно....
там в поле сидит бинарная хрень и из нее надо выцепить инфу а как не знаю ? там закарючки какие то ....<

← →
sniknik © (2003-03-16 17:23) [7]

> полный аналог фоксовой функции ASC(), (счас будеш удивлятся) функция ASC()!
(выбирай правильного провайдера и можеш это в запрос вставлять, Jet, Vis.Fox.Drv) для MSSQL чуть изменено нассание на 2 буквы, добавили
SELECT ASC("АБС") //Jet
SELECT ASC("АБС") FROM 1sdbset //Vis.Fox.Drv
SELECT ASCII("АБС") //MSSQL
результат одинаков 192 (по первой букве)
для Delphi тот же результат даст ORD("АБС"[1]). и чего тебе не нравится?
если результат одинаков?

← →
sniknik © (2003-03-16 17:24) [8]

:-))))) только прочитав заметил, надо читать написание :-)))

← →
BubbleGum © (2003-03-16 17:29) [9]

> sniknik © (16.03.03 17:24)

а на делфях через shl кто нить помнит как это будет выглядеть ?

← →
BubbleGum © (2003-03-16 17:35) [10]

через поле в табле в котором бинарная инфа , вяжется к другой табле по физическому номеру строки.
Ну так что бы связать нужно вычислить бинарное значение.
желательно не через SQL.

shl - bitwise shift left
каким образом? тут преобразований и сдвигов не нужно (либо не могу понять что тебе нужно) нужно приведение типа (char и byte для машины одинаковы)

извращенный в данном случае (но вполне рабочий вариант)
var a: char;
b: byte absolute a;
begin
a:= "А";
Label1.Caption:= IntToStr(b); //тоже самое 192 и никаких сдвигов
....
можно и через указатель тоже самое выдать и еще как, в С так вообще нет разници как представиш так и будет.

может я не понял и тебе нужно числовое представление всех символов? но ASC в фоксе дает значение первого как и все мои примеры.
если нужно по всем то иши как вычисляется Хеш значение для строки (но это никак не аналог). или сам засумируй перебором по строке.

> если нужно по всем то иши как вычисляется Хеш значение для
> строки (но это никак не аналог). или сам засумируй перебором
> по строке.

а примерчик мона ?

http://delphibase.endimus.com/?action=viewfunc&topic=mathcalc&id=10092

Во какое решение данной проблемы!:
Ord(S[2]) shl 8 + Ord(S[1])
Вопрос снимаетца

Returns the ANSI value for the leftmost character in a character Найти похожие ветки