Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.01.06;
Скачать: [xml.tar.bz2];

Вниз

Преобразование String в Integer в Turbo Pascal   Найти похожие ветки 

 
KME   (2002-12-21 23:40) [0]

Здравствуйте уважаемые мастера. У меня к вам такой вопрос. Например, у меня есть переменная S типа String со значением 01. Как мне ее преобразовать в тип Integer? Помогите пожалуйста, очень нужно реализовать эту возможность на TURBO PASCALE.


 
Bosh   (2002-12-21 23:47) [1]

есть такая штука как ф-ия str(i:integer;s:string)

например

function IntToStr(s:string):integer;
begin
IntToStr:=str(i,s);
end;


 
Вася Пупкин   (2002-12-22 00:31) [2]

val


 
Kotka   (2002-12-22 00:56) [3]

Вася Пупкин © (22.12.02 00:31)
val


А при чем тут Val???


 
drin   (2002-12-22 01:03) [4]


function IntToStr(Value: integer): string;
begin
Str(Value, IntToStr)
end;

And Nothing else...


 
drin   (2002-12-22 01:08) [5]

Ой, сорри

function StrToInt(Value: string): integer;
Var
code, i: integer;
begin
Str(Value, i, code);
if code = 0 then
StrToInt:=i;
end;


 
PVOzerski   (2002-12-22 11:40) [6]

А все-таки val :^) Str - это наоборот, из числа в строку.

function StrToInt(Value: string): integer;
Var
code, i: integer;
begin
VAL(Value, i, code);
if code = 0 then
StrToInt:=i;
end;





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

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

Наверх





Память: 0.76 MB
Время: 2.999 c
3-14914
old_mole
2002-12-12 11:52
2003.01.06
Помогите с Report`ом


8-15175
Sapersky_
2002-09-17 20:21
2003.01.06
Работа с метафайлами на низком уровне


1-15020
werr
2002-12-24 14:34
2003.01.06
exe перезаписывает сам себя?


3-14922
AlexL
2002-12-12 05:27
2003.01.06
Совместное использование IDENTITY в MSSQL и TDataSet


14-15273
Blacki
2002-12-14 13:29
2003.01.06
Чем собрать инсталяшку





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский