Скачать: CL | DM;

Как сделать расчет?   Найти похожие ветки 

← →
ser35   (2005-02-26 00:16) [0]

Имеются данные Выбираемые из комбобокса(1А,2А) и радиогроуп(1Б,2Б):

    1А     2А
1Б    5      3  
2Б    8      9
Подскажите, пожалуйста, как мне отобразить в Эдите, допустим цифру "5". Осознаю, что вопрос легкий для опытного человека, но пожалуйста не откажите. По книге смотрел, но не могу разобраться. Большое спасибо за советы

---

← →
Fenik   (2005-02-26 00:18) [1]

Edit1.Text := IntToStr(5);

---

← →
ser35   (2005-02-26 00:25) [2]

Я имел ввиду, чтобы выйти на цифру "5" нужно выбрать комбобокс(1А) и радиогроуп (1Б) и нажимая Button в окошке Эдита появляется 5

---

← →
GanibalLector ©   (2005-02-26 00:33) [3]

if (Combobox.Text="чего-то там") and (RadioButton.Checked) then
Edit.Text:="5";

---

← →
Fedia ©   (2005-02-26 00:54) [4]

procedure TForm1.SpeedButton1Click(Sender: TObject);
const
 ar : array [0..1, 0..1] of integer = ((5,3),(8,9));
begin
 Edit1.Text:=IntToStr(ar[RadioGroup1.ItemIndex, ComboBox1.ItemIndex]);
end;

---

← →
ser35   (2005-02-26 09:12) [5]

> Fedia ©   (26.02.05 00:54) [4]
> procedure TForm1.SpeedButton1Click(Sender: TObject);
> const
>  ar : array [0..1, 0..1] of integer = ((5,3),(8,9));
> begin
>  Edit1.Text:=IntToStr(ar[RadioGroup1.ItemIndex, ComboBox1.ItemIndex]);
> end;

Это подходит. А как быть в случае, если запись в Эдите (5,3,8,9) будет меняться?

---

← →
ser35   (2005-02-26 10:44) [6]

Посоветуйте, мастера :)

---

← →
Fedia ©   (2005-02-26 13:39) [7]

>ser35   (26.02.05 10:44) [6]
Вероятность того, что хотя бы 30% посетителей форума не знает ответ на твой вопрос, очень близка к нулю. А не отвечают,  скорее всего, из-за некорректности задаваемых вопросов. Конечно, догадаться, о чем ты спрашиваешь можно, но отвечать на такие вопросы как минимум лень.
>А как быть в случае, если запись в Эдите (5,3,8,9) будет меняться?
Наверное, имеется в виду: а как быть в случае, если перечень значений, присваиваемых свойству text компонента Edit1 необходимо менять?
Константу ar из примера [4] заменить на переменную динамического массива и заполнять его значениями из файла, БД или визуальных компонентов.
Без обид Ok?

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.021 c