Search options (Page 1 of 5)

Добрый день.
Делаю БД кафешки, пока только набросок. Помогите с отображением данных в TGrid:

При открытии формы Fzakaz, скриптом вставляю в таблицу zakaz новую пустую запись и сохраняю id, в левой TGrid меню выводятся все данные из таблицы bludo, при нажатии кнопки "Добавить в заказ" открывается новая форма с заполненными полями из таблицы bludo (название, цена) и zakaz (id), по нажатию в этой форме кнопки "сохранить" все данные сохраняются в таблицу sostav_z и форма закрывается, при этом в TGrid заказ отображается все данные из таблицы sostav_z, а должны только записи текущего заказа (zakaz.id=lastid).
Пытался сделать фильтр в настройках таблицы и скриптом:

procedure Fzakaz_TableGrid2_OnChange (Sender: TObject);
begin
   Fzakaz.TableGrid2.dbFilter:='id='+lastid;
end;

при выполнении запроса появляется ошибка:

Сообщение об ошибке: 
#23000Column 'id' in where clause is ambiguous
Action (Search): 
Fzakaz

Запрос вызывающий ошибку:

SELECT DISTINCT `sostav_z`.`id_zakaz` as "sostav_z.id_zakaz",`bludo`.`Название` as "bludo.Название",`sostav_z`.`Количество` as "sostav_z.Количество",`sostav_z`.`Сумма` as "sostav_z.Сумма",`sostav_z`.id,`sostav_z`.`id_bludo` as "sostav_z.id_bludo" FROM `sostav_z` LEFT OUTER JOIN `bludo` ON `sostav_z`.`id_bludo`=`bludo`.id WHERE (id=22)

Как сделать, чтобы в TGrid заказ отображались записи только текущего заказа? Может у меня вообще в корне не верный алгоритм?
PS: БД - MySQL.

Добрый день.
Подскажите, как скопировать значение из Footer таблицы определённой колонки и вставить в текстовое поле. В footer содержится сумма по колонке.
Поле БД, к которому привязано текстовое поле, имеет тип Деньги, когда пытаюсь сделать так:

Form1.edPrice:=Form1.GridPartsUse.columns[3].footer.Caption

получаю ошибку - несовместимый тип данных.

Доброго дня!
Есть код плеера, сграбленного с вэб интерфейса камеры. Плеер в виде nvEncoderMedia.dll. Видимо, чтобы он отображался на форме, его нужно как-то прикрутить к ней, но не соображу как:

procedure Form1_Button2_OnClick (Sender: TObject; var Cancel: boolean);
var
  NV1: Variant;
begin
  NV1:=CreateOleObject('NVCTRLMEDIA.Media.1');
  //TWinControl(NV1).Parent := Form1.Panel1;  // - ошибка invalid variant operation
  NV1.MediaURL := '192.168.1.100';
NV1.MediaUsername := 'admin';
NV1.MediaPassword := ' ';
NV1.HttpPort := '80';
NV1.DisplayTitleBar(0);
NV1.ID := 1 ;
NV1.SetCommunicationPort(6000,6001,6002,5000,6005,6006);
NV1.Connect();
NV1.Play();
end;