Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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


FoxerMoxer ©   (2002-03-22 20:11:00) 

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

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

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


Anatoly Podgoretsky   (2002-03-23 11:28:00) [1]

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


kull   (2002-03-23 01:14:00) [2]

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


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

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


FoxerMoxer   (2002-03-22 20:36:00) [4]

Спасибо!


Delirium   (2002-03-22 20:28:00) [5]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо