Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.05.18;
Скачать: CL | DM;

Вниз

Как преобразовать char в integer   Найти похожие ветки 

 
Vudu ©   (2008-04-21 10:20) [0]

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

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

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


 
Kolan ©   (2008-04-21 10:23) [1]

IntToStr StrToInt


 
Vudu ©   (2008-04-21 10:30) [2]

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


 
Thrasher ©   (2008-04-21 10:37) [3]

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


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

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


 
Vudu ©   (2008-04-21 10:46) [5]

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


 
Vudu ©   (2008-04-21 10:47) [6]

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


 
Kolan ©   (2008-04-21 11:03) [7]

> [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;



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

Текущий архив: 2008.05.18;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.103 c
2-1208768164
umbra
2008-04-21 12:56
2008.05.18
как из TAction.Execute узнать, на какой форме кликнули меню


15-1204371798
AET
2008-03-01 14:43
2008.05.18
из ASM в Pascal


4-1188896231
celerons
2007-09-04 12:57
2008.05.18
RAS WIN API Флаги при создании VPn


2-1208406785
TPopupActionBarEx
2008-04-17 08:33
2008.05.18
Креатим в рантайме, как избавится от ошибки?


15-1207063416
TStas
2008-04-01 19:23
2008.05.18
Как научиться писать СОМ интерфейсы?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский