Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.05.2015, 14:45   #1
DikeeeY
Пользователь
 
Регистрация: 16.02.2015
Сообщений: 25
По умолчанию как присвоить значение Radiobutton

Помогите пожалуйства незнаю как присвоить значения у меня идет расчет по формуле и нужно присвоить значение из радиобаттона
Var S,h,K,a,b:Real;
begin
S:=StrToFloat(edt2.Text);
h:=StrToFloat(edt1.Text);
K:=
вот к данному K присвоить цифру выбранную в радибаттоне все радиобаттоны расположены в GroupBox

Последний раз редактировалось DikeeeY; 20.05.2015 в 15:02.
DikeeeY вне форума Ответить с цитированием
Старый 20.05.2015, 15:30   #2
phomm
personality
Старожил
 
Аватар для phomm
 
Регистрация: 28.04.2009
Сообщений: 2,882
По умолчанию

Для этих целей лучше использовать TRadioGroup.
В его свойство Items занести всё то, что было в радиобатонах (я так понял, что некие числа) построчно, тогда создастся количество радиобатонов, соответствущее этим строкам.
Потом считывать примерно так
Код:
if RadioGroup1.ItemIndex <> - 1 then // проверка, что какая-то радиобатон выбрана
  xxx := RadioGroup1.Items[RadioGroup1.ItemIndex]; // считываем строку
если там у Вас числа, то надо конвертировать при помощи StrToInt/StrToFloat

Последний раз редактировалось phomm; 20.05.2015 в 15:41.
phomm вне форума Ответить с цитированием
Старый 20.05.2015, 16:05   #3
DikeeeY
Пользователь
 
Регистрация: 16.02.2015
Сообщений: 25
По умолчанию

Цитата:
Сообщение от phomm Посмотреть сообщение
Для этих целей лучше использовать TRadioGroup.
В его свойство Items занести всё то, что было в радиобатонах (я так понял, что некие числа) построчно, тогда создастся количество радиобатонов, соответствущее этим строкам.
Потом считывать примерно так
Код:
if RadioGroup1.ItemIndex <> - 1 then // проверка, что какая-то радиобатон выбрана
  xxx := RadioGroup1.Items[RadioGroup1.ItemIndex]; // считываем строку
если там у Вас числа, то надо конвертировать при помощи StrToInt/StrToFloat
так то вроде все понял, но если не затруднит можно по подробнее как правильнее записать
как я понимаю такая запись не правильна
K:= RG1.Items[RG1.ItemIndex] StrToFloat(edit5.text); //

вот в общем я написал вроде как правильно но компиляцию не проходит все равно
Код:
procedure TForm1.btn3Click(Sender: TObject);
Var S,h,a,b,F:real;
K:string;
begin
S:=StrToFloat(edt2.Text);
h:=StrToFloat(edt6.Text);
a:=StrToInt(edt1.Text);
b:=StrToFloat(edt4.Text);
K:= RG1.Items[RG1.ItemIndex]  // ñ÷èòûâàåì ñòðîêó

F:=S/(h-K)*(a+b);
edt5.Text:=FloatToStr (F);

end;
не проходит программа и все не могу понять в чем проблема вроде все ровно расписал

Последний раз редактировалось Stilet; 20.05.2015 в 18:41.
DikeeeY вне форума Ответить с цитированием
Старый 20.05.2015, 17:36   #4
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
Код:
K:string;

F:=S/(h-K)*(a+b);
у Вас в переменной K строка. Как Вы её отнять пытаетесь?!!!

Если там число, то переводите строку в число, потом и используйте в математическом выражении.
Serge_Bliznykov вне форума Ответить с цитированием
Старый 20.05.2015, 20:22   #5
DikeeeY
Пользователь
 
Регистрация: 16.02.2015
Сообщений: 25
По умолчанию

Цитата:
Сообщение от Serge_Bliznykov Посмотреть сообщение
у Вас в переменной K строка. Как Вы её отнять пытаетесь?!!!

Если там число, то переводите строку в число, потом и используйте в математическом выражении.
Вот вроде все правильно сделал но тут еще какая то проблема
Изображения
Тип файла: jpg JQDfOxtbzKE.jpg (46.9 Кб, 68 просмотров)

Последний раз редактировалось DikeeeY; 20.05.2015 в 20:39.
DikeeeY вне форума Ответить с цитированием
Старый 20.05.2015, 20:52   #6
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Ты действительно думаешь что что-то на этом скрине увидеть можно?
А хотя... Точку-запятую я не вижу на строке, выше выделенной красными.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как присвоить значение DBLookupComboBox'у? Vit@L Общие вопросы Delphi 15 25.07.2012 19:21
Как получить значение RadioButton созданного программно? Lazio C# (си шарп) 3 24.05.2012 10:44
как присвоить букве постоянное значение? Garik007 Microsoft Office Excel 1 04.03.2012 19:55
как присвоить значение??? VintProg Общие вопросы C/C++ 1 05.08.2011 15:21
Как присвоить значение функции? boris-blade Microsoft Office Word 3 17.01.2010 17:09