Форум: "Основная";
Текущий архив: 2002.04.04;
Скачать: [xml.tar.bz2];

Вниз

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

← →
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(строка), надо брать поочерёдно каждый символ и переводить его.

---

← →
kull   (2002-03-23 01:14) [4]

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

---

← →
Anatoly Podgoretsky   (2002-03-23 11:28) [5]

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

---

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

Форум: "Основная";
Текущий архив: 2002.04.04;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.005 c