[Ilshat]

нужно написать программу для кнопки "выбор" используя:
ComboBox1
Button1
DBGrid1
DBGrid2
DataSource1
Query1
Query2.

В ComboBox1 должен быть список в который входят:
монитор
клавиатура
видео карта
МФУ
процессор

ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!! очень нужно!!!!

вот предварительный программный код, поправьте где не правильно

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

procedure TForm1.Button1Click(Sender: TObject); var Sql: string; begin Query2. SQL. Clear; Query2. SQL. Add('Select*from Deps'); Query2. Open; ComboBox1.Clear; While not Query2.  of do begin Str:=Query2. Field By Name('Production')As string; ComboBox1. Items. Add(Str); Query2.Next; end; ComboBox1.Items.Add('все наименования'); ComboBox1.ItemIndex:=ComboBox.Items.Count-1; Query1.Close; Query1.SQL.Clear; Query1.SQL.Add('Select*from Deps'); Query1.Open; end; end.