VPF::String->Real - Форум программистов

Ak47black

Дата 19.3.2009, 20:23 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

Репутация: нет
Всего: 0

Здравствуйте.
Хочу узнать как правильно реализовать (при этом нужно проверить правильное-ли число Real)

Код


var
  a, b: Integer;
begin
  Val(s, a, b);

Если например s->'8.9' то получаю ошибку на втором символе (как я понял эта функция придназначенна для целых чисел)
А как с Real сделать?

Это сообщение отредактировал(а) Ak47black - 19.3.2009, 20:30

THandle

Дата 19.3.2009, 20:50 (ссылка)

(нет голосов)

Загрузка ...

Хранитель Клуба
Group Icon

Награды: 1

Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: нет
Всего: 372

Ak47black, должно преобразовывать.

Преобразовывает строковое значение в его числовое представление.

Цитата

Объявление:
Procedure Val(S; Var V; Var Code : Integer);

Где:
  S    - переменная со строковым типом. Должна представлять
         последовательность символов, формирующих знаковое целое число.
  V    - переменная типа Real или Integer
  Code - переменная типа Integer

Режим:
Windows, Real, Protected

Замечания:
Преобразовывает строковое значение (S) в его числовое представление, как это
происходит при чтении из текстового файла с помощью Read. Code - позиция, в
которой произошла ошибка при преобразовании, или нуль, если ошибки не было.

Ak47black

Дата 19.3.2009, 22:01 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2205
Регистрация: 2.12.2005

Репутация: нет
Всего: 0

Извиняюсь, я ошибку сделал в коде.
Вместо Real подставлял Integer.
Поэтому естественно и получал такой результат.

Это сообщение отредактировал(а) Ak47black - 19.3.2009, 22:15

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Object Pascal: кроссплатформенные технологии \| Следующая тема »