Автор Кверти задал вопрос в разделе Компьютеры, Связь
Как перевести текст в число на Delphi? и получил лучший ответ
Ответ от Gennady[гуру]
Доброго временим суток.
Рекомендуется для таких целей использовать function StrToInt(const S: string): Integer; , поскольку в ней уже реализована обработка исключений.
В вашем случае нужно записать
alfa := StrToInt(Edit1.Text);
Далее. Не забудьте, что для тригонометрических функций аргумент требуется указывать в радианах, т. е. тип аргумента не целое число, а действительное. Поэтому, если вводите его в поля в градусах, потребуется преобразование. Возвращаемое значение, тоже действительлное число. Следовательно, тип alfa, z1и z2 надо изменить на, допустим, Real; и для преобразования в число использовать функцию StrToFloat(). Обратное преобразование для отображения нужно делать с помощью FloatToStr();
Удачи!
знаю только наоборот как) а текст вроде только дополнительной библиотекой... а с неё уже и код выйдет)
Цитата из хелпа:
procedure Val(S; var V; var Code: Integer);
Description
In Delphi code, Val converts the string value S to its numeric representation, as if it were read from a text file with Read."
Т. е. , нужно написать:
val(Edit1.Text, alfa, code);
Перед этим объявить
var code: integer;
туда будет писаться код ошибки если ошибка при переводе