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

Преобразовать символ в ASCII код   Найти похожие ветки 

← →
Delphi&Sql   (2006-04-20 09:26) [0]

Всем привет. Вопрос как сделать ?
К примеру
ShowMessage(Inttostr(Integer("a"))); -работает отлично, но вот если использовать переменную, например:
var s: string;
begin
s:="a";
ShowMessage(Inttostr(Integer(s)));
end;
То выдает неверный результат. Подскажите как можно преобразовать символ переменной s  в код ASCII ?

---

← →
Ega23 ©   (2006-04-20 09:34) [1]

Ord(s)

---

← →
balepa ©   (2006-04-20 09:35) [2]

ShowMessage(Inttostr(Integer(s[1])));
А ORD Не в моде ?

---

← →
AbrosimovA ©   (2006-04-20 09:38) [3]

procedure TForm1.Button1Click(Sender: TObject);
var s: char;
begin
s:="a";
ShowMessage(Inttostr(Ord("A")));
end;

---

← →
Delphi&Sql   (2006-04-20 09:45) [4]

Огромное спасибо, использовал Просто ORD(s) неполучалось, теперь понял ошибку.

---

← →
Ega23 ©   (2006-04-20 09:46) [5]

var s: string;
Не string, а char. Или s[1].

---

← →
AbrosimovA ©   (2006-04-20 10:41) [6]

> Ord("A")


Извиняюсь, здесь надо Ord(s)

---

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

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



Память: 0.46 MB
Время: 0.034 c