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

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

Преобразование String в Integer в Turbo Pascal

KME ©   (2002-12-21 23:40:00) 

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

---

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

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

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

---

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

Ой, сорри

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


---

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


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

And Nothing else...

---

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

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

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

---

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

val

---

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

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

например

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

---

Наверх