Форум: "Основная";
Текущий архив: 2004.07.11;
Скачать: [xml.tar.bz2];
ВнизChart, синтаксис и т.д Найти похожие ветки
← →
Salik © (2004-06-25 12:02) [0]Добрый день! Суть проблемы в следующем: Нужно чтоб в Charte AxisY.Maximum приобретал значение равное значению Edita
пишу следующее:Chart1.LeftAxis.Maximum:=StrToFloat(TEdit(Form1.FindComponent("Edit"+IntToStr(1))).Text);
Maximum -> типа double;
Компиляция проходит нормально, при запуске программы ошибка->is not a valid floating point value;
Может не правильно использую функцию преобразования? Если присвоить конкретное значение:Chart1.LeftAxis.Maximum:=127; ->работает четко. Всем спасибо!
← →
Ega23 © (2004-06-25 12:05) [1]Salik © (25.06.04 12:02)
А чему у тебя равен Edit1.Text?
← →
Sandman25 © (2004-06-25 12:06) [2]Что перед "is not a valid floating point value"?
TEdit(Form1.FindComponent("Edit"+IntToStr(1))).Text
скорее всего эквивалентно Form1.Edit1.Text
Если Chart1 находится на Form1, то Form1.Edit1 замените на Edit1
← →
TUser © (2004-06-25 12:06) [3]Что вводишь в Edit? Может быть трабла с DecimalSeparator.
← →
evvcom © (2004-06-25 12:41) [4]
> Form1.FindComponent("Edit"+IntToStr(1)).Text
Если компонент Edit1 брошен на Form1 в design-time, то зачем так извращаться? Пиши просто Form1.Edit1.Text или еще см.
> Если Chart1 находится на Form1, то Form1.Edit1 замените
> на Edit1
> Что вводишь в Edit? Может быть
А может быть он туда еще вообще ничего не вводит. В тех местах, где возможна ошибка в частности из-за неверных действий пользователя, применяют защищенные блоки try...except...end или try...finally...end
← →
Salik © (2004-06-25 13:39) [5]Извените, что пропал, были проблемы с сетью
>>Ega23 А чему у тебя равен Edit1.Text?
Идет генерация числа от 1-1000:integer, в Timere, число каждые 5 сек выводится на Edit;
>>Sandman25 ©Что перед "is not a valid floating point value"?
Project DDEPR.exe raised exception class EConvertError with message """ is not a valid floating point value". Process stopped. Use Step or Run to continue.
>>TEdit(Form1.FindComponent("Edit"+IntToStr(1))).Text
скорее всего эквивалентно Form1.Edit1.Text
-Да полностью эквивалентно.Просто TEdit(Form1.FindComponent("Edit"+IntToStr(i))).Text - крутится в цикле;
-Chart на Form2;
← →
Sandman25 © (2004-06-25 13:44) [6]Project DDEPR.exe raised exception class EConvertError with message """ is not a valid floating point value". Process stopped. Use Step or Run to continue.
Значит Edit1.Text = ""; // пустая строка
Значит надо проверять на это значение.
← →
Ega23 © (2004-06-25 13:46) [7]Судя по полному тексту эксепшена, у тебя в каком-то из Edit-ов пустая строка стоит вместо числа.
← →
Salik © (2004-06-25 13:53) [8]Да.а.а.а... Действительно при запуске Едит был пуст
Попробывал Edit.Text присвоить число, запустить-> работает.
Спасибо!!!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.07.11;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.044 c