Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.13;
Скачать: CL | DM;

Вниз

Игнорирование невидимых компонентов   Найти похожие ветки 

 
ser35   (2005-03-02 14:24) [0]

Делаю расчет (заполняя Edit). В некоторых случаях нжно НЕ заполнять Edit-ы (тогда они невидимы). Но тогда всплывает сообщение: "is not valid floating point value". В этом случае попытался запретить расчет:
var
a1,b1,v1: real;
begin
if Form1.Edit1.Visible:=true then
a1:=StrToFloat(Form1.Edit1.Text);
b1:=StrToFloat(Form9.Edit1.Text);
V1:=a1*b1;
Form9.EditR1.Text:=FloatToStr(v1);

Догадываюсь, что происходит несоответствие.Подскажите, пожалуйста как правильно это написать.
Спасибо за советы


 
Sandman25 ©   (2005-03-02 14:28) [1]

begin забыли


 
Юрий Зотов ©   (2005-03-02 14:28) [2]

Похоже, пропущено begin-end.
И "= True" - не нужно.


 
Антоныч   (2005-03-02 14:29) [3]

var
a1,b1,v1: real;
begin
if Form1.Edit1.Visible=true then begin
a1:=StrToFloat(Form1.Edit1.Text);
b1:=StrToFloat(Form9.Edit1.Text);
V1:=a1*b1;
Form9.EditR1.Text:=FloatToStr(v1);
end;


 
ser35   (2005-03-02 14:32) [4]

Ребята, вы просто МОЛОДЦЫ!!!
Спасибо за помощь чайнику :-)))



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

Текущий архив: 2005.03.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.069 c
4-1106920907
grigory
2005-01-28 17:01
2005.03.13
Как пользоваться FindWindowEx?


14-1108983986
КаПиБаРа
2005-02-21 14:06
2005.03.13
По поводу <<Поле "Тема вопроса" не оформлено>>


1-1109621482
dmk
2005-02-28 23:11
2005.03.13
Послать приложению сочетание клавиш CTRL+V


11-1092770529
Алексей
2004-08-17 23:22
2005.03.13
Как убрать кнопку программы на панели задач?


6-1104431263
Delpher_Gray
2004-12-30 21:27
2005.03.13
Новоые подключение на событие OnDisconnect