Мне нужна помощь

← →
FoxerMoxer (2002-03-22 20:11) [0]

Вопрос может и примитивный, но все же помогите, У меня есть Edit1, мне нужно, чтобы текст из него при помощи функции ord, возвращал номер символа, но у меня тут ошибка помогите мне.

i:=ord("q"); - тут нет ошибки

i:=ord(Edit1.text); - тут есть ошибка

← →
Delirium © (2002-03-22 20:28) [1]

i:=Ord(Edit1.Text[1]);

← →
FoxerMoxer (2002-03-22 20:36) [2]

Спасибо!

← →
новенький в Делфи (2002-03-23 00:30) [3]

Ord(), берёт char(сивол), а Edit это String(строка), надо брать поочерёдно каждый символ и переводить его.

только надо проверить
Edit1.Text<>""

if Length(Edit1.Text) >= I then Nr := Ord(Edit1.Text[I]) else Nr := 0;

Мне нужна помощь Найти похожие ветки