Тема: Ctrl + V
Показать сообщение отдельно
Старый 22.09.2009, 14:41   #290  Вверх   
Кавалер Глюк поза форумом Кавалер Глюк
Вервольф
 
Аватар для Кавалер Глюк
Кавалер Глюк отключил(а) отображение уровня репутации
Регистрация: 03.04.2006
Сообщений: 1,040
ADOQueryNakl.Active:=False;
ADOQueryNakl.SQL.Clear;
ADOQueryNakl.SQL.Add('Execute Nakl_insert '''+Edit4.Text+''','''+Edit1.Text+''', ');
ADOQueryNakl.SQL.Add(''''+Edit2.Text+''','''+Edit3 .Text+''',');
ADOQueryNakl.SQL.Add(''''+DBLookupListBox5.Selecte dItem+''','''+DBLookupComboBox1.Text+''','''+Label 3.Caption+'''');
ADOQueryNakl.SQL.Add('Execute tovar '''+DBLookupListBox5.SelectedItem+''' ');
FormDel.A.Active:=False;
Form6.tn.Active:=False;
Form3.ADOTable1.Active:=False;

try
ADOQueryNakl.Active:=True;
except

прикольная тема