Цитата:
Сообщение от Maiomi
Поместите на форму четыре компонента-флажка CheckBox с категориями блюд – Первое, Второе, Напиток, Десерт. Для каждого флажка при помощи компонентов ComboBox создайте список возможных блюд. Если пользователь выделил флажок с категорией блюда, то список блюд данной категории становится доступен. Поместить на форму кнопку «Оформить заказ», при ее нажатии все выбранные пользователем блюда должны выводиться в компоненте Label.
все на форму закинула..
подскажите как внести в комбобокс несколько вариантов блюд..
|
У комбобокса есть свойство Items - можно вносить или через инспектор объектов или программно
Цитата:
Сообщение от Maiomi
потом что примерно прописать в чекбокс чтобы оно работало для своего комбобокса
|
На событие OnClick каждого чекбокса пропиши примерно так (на примере первых чекбокса и комбобокса):
Код:
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
ComboBox1.Enabled := CheckBox1.Checked;
end;
Цитата:
Сообщение от Maiomi
и что примерно нужно прописать для баттона чтоб собрать все воедино..
|
Примерно так:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
s: String;
begin
if CheckBox1.Checked then s := ComboBox1.Text else s := '';
if CheckBox2.Checked then s := s + ' ' + ComboBox2.Text;
if CheckBox3.Checked then s := s + ' ' + ComboBox3.Text;
if CheckBox4.Checked then s := s + ' ' + ComboBox4.Text;
Label1.Caption := Trim(s);
end;