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

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

Как преобразовать char в integer [D7]


Vudu ©   (2008-04-21 10:20:00) 

Есть строка
str:string

надо i:= str[1];

что то я сегодня туплю, вобще ничего сообразить немогу


Kolan   (2008-04-21 11:03:00) [1]

> [2] Vudu ©   (21.04.08 10:30)
> но так не работает
> i:=StrToInt(str[1]);

Что значить не работает?!

var
 str: string;
 I: Integer;
begin
 str := '10';
 I := StrToInt(str[1]);
 ShowMessage(IntToStr(I)); //1
end;


Vudu   (2008-04-21 10:47:00) [2]

Прикольно, спасибо.
Я бы да такого не додумался


Vudu   (2008-04-21 10:46:00) [3]

Так он возвращает код символа.
Я хочу считать определенный элемент строки, который является числом, и преобразовать его в integer


Sha   (2008-04-21 10:40:00) [4]

ord(str[1])-ord('0')


Thrasher   (2008-04-21 10:37:00) [5]

Надо так
I:=Ord(Str[1]);


Vudu   (2008-04-21 10:30:00) [6]

Нет тут это не помогает
например работает так
i:=StrToInt(str);
но так не работает
i:=StrToInt(str[1]);


Kolan   (2008-04-21 10:23:00) [7]

IntToStr StrToInt


Наверх

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