Скачать: CL | DM;

Перевод в Integer   Найти похожие ветки 

← →
Grac   (2003-05-15 10:47) [0]

Как перевести символьную переменную в целое число.
Пример: "1 "; "100 ".
Функция StrToInt() выдает ошибку "1 "is not a valid integer value".
Для значений "001"; "00100" все нормально, но если после числа есть пробелы, то вызывается данное исключение.

---

← →
DVM ©   (2003-05-15 10:51) [1]

Trim

---

← →
Palladin ©   (2003-05-15 10:51) [2]

а с каких это пор пробел стал считатся цифрой?

---

← →
Udjin ©   (2003-05-15 10:51) [3]

Поудаляй пробелы и все будет нормально

---

← →
DVM ©   (2003-05-15 10:52) [4]

try
n:=StrToInt(Trim(s));
except
//....
end;

---

← →
Vit@ly ©   (2003-05-15 11:02) [5]

Val("твоя строковая переменная", n, Code);

---

← →
DVM ©   (2003-05-15 11:06) [6]

Лучше так:
function MyStrToInt(s : string) : integer;
var
n : extended;
nCode : integer;
begin
val(s, n, nCode);
if nCode <> 0 then result := 0 else Result := round(n);
end;

---

← →
Grac   (2003-05-15 11:12) [7]

Всем спасибо. Все получилось.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c