Form11.AddTotalOrder.SQL.Clear;
Form11.AddTotalOrder.SQL.Add('INSERT INTO Order (Data, Client, Model, Quantity)');
Form11.AddTotalOrder.SQL.Add(' VALUES (ata, :Client, :Model, :Quantity)');

Form11.AddTotalOrder.Parameters.ParamByName('Data').Value := Form11.Label2.Caption;
Form11.AddTotalOrder.Parameters.ParamByName('Client').Value := Form11.DBLookupComboBox1.KeyValue;
Form11.AddTotalOrder.Parameters.ParamByName('Model').Value := Form11.DBLookupComboBox2.KeyValue;
Form11.AddTotalOrder.Parameters.ParamByName('Quantity').Value := Form11.Edit1.Text;
Form11.AddTotalOrder.ExecSQL;

Str_Reseach1 := '%'+Form6.Edit1.Text+'%';
Str_Reseach2 := QuotedStr(Str_Reseach1);
with Form6.ADODetailInfo do
begin
Form6.ADODetailInfo.Close;
Form6.ADODetailInfo.SQL.Clear;
Form6.ADODetailInfo.SQL.Add('SELECT Id, Data, Client, Model, Quantity');
Form6.ADODetailInfo.SQL.Add(' FROM Orderl');
Form6.ADODetailInfo.SQL.Add(' WHERE Client LIKE '+Str_Reseach2+' OR Data LIKE '+Str_Reseach2+' ORDER By Id');
Form6.ADODetailInfo.Open;