Ошибка при StrToFloat(Edit1.Text);
Уважаемые эксперты! У меня не срабатывает конструкция:
Time := StrToFloat(Edit1.Text);
При чем компилятору не нравится именно Edit1.
В перемненых записано
var
Time : Real;
В одном источнике написано, что
StrToFloat() - Extended, в другом - Currency.
Я пробовал менять - тот же результат. Подскажите,
пожалуйста как решить эту проблему!
Time := StrToFloat(Edit1.Text);
При чем компилятору не нравится именно Edit1.
В перемненых записано
var
Time : Real;
В одном источнике написано, что
StrToFloat() - Extended, в другом - Currency.
Я пробовал менять - тот же результат. Подскажите,
пожалуйста как решить эту проблему!
Цитата:
Originally posted by bara-igor
Уважаемые эксперты! У меня не срабатывает конструкция:
Time := StrToFloat(Edit1.Text);
При чем компилятору не нравится именно Edit1.
В перемненых записано
var
Time : Real;
В одном источнике написано, что
StrToFloat() - Extended, в другом - Currency.
Я пробовал менять - тот же результат. Подскажите,
пожалуйста как решить эту проблему!
Уважаемые эксперты! У меня не срабатывает конструкция:
Time := StrToFloat(Edit1.Text);
При чем компилятору не нравится именно Edit1.
В перемненых записано
var
Time : Real;
В одном источнике написано, что
StrToFloat() - Extended, в другом - Currency.
Я пробовал менять - тот же результат. Подскажите,
пожалуйста как решить эту проблему!
А как ругается компилятор? Вопрос не праздный, т.к. Float - он и в Африке Float.
Цитата:
Originally posted by mfender
А как ругается компилятор? Вопрос не праздный, т.к. Float - он и в Африке Float.
А как ругается компилятор? Вопрос не праздный, т.к. Float - он и в Африке Float.
Никак не ругается - останавливает компиляцию и все.
Цитата:
Originally posted by mfender
А как ругается компилятор? Вопрос не праздный, т.к. Float - он и в Африке Float.
А как ругается компилятор? Вопрос не праздный, т.к. Float - он и в Африке Float.
Компилятор пишет:Error identifier not found "Edit1".
Цитата:
Originally posted by bara-igor
Компилятор пишет:Error identifier not found "Edit1".
Компилятор пишет:Error identifier not found "Edit1".
Пиши весь код если хочешь чтобы на твой вопрос ответили.
Твой эдит точно с именем Edit1?
Цитата:
Originally posted by Delpher
Пиши весь код если хочешь чтобы на твой вопрос ответили.
Твой эдит точно с именем Edit1?
Пиши весь код если хочешь чтобы на твой вопрос ответили.
Твой эдит точно с именем Edit1?
Программа делалась на Lazarus. Я пробовал на
Delphi5 - тот же самый результат.[Текст модуля - в прекрепленном файле]
Цитата:
Originally posted by bara-igor
Программа делалась на Lazarus. Я пробовал на
Delphi5 - тот же самый результат.[Текст модуля - в прекрепленном файле]
Программа делалась на Lazarus. Я пробовал на
Delphi5 - тот же самый результат.[Текст модуля - в прекрепленном файле]
У тебя там не Edit1 написано, а Editl. Вот и все! :)
Цитата:
Originally posted by Михаил
У тебя там не Edit1 написано, а Editl. Вот и все! :)
У тебя там не Edit1 написано, а Editl. Вот и все! :)
>Большое спасибо, Михаил! Как говорится "На каждого мудреца довольно простоты".
Все было полность наоборот: я скопировал с on-line книги вместо Edit1 Editl. Плюс надо было сделать пустую процедуру Edit1 виртуальными функциями. Еще раз - Большое спасибо!