Обработчик событий в DBLookupListBox

[MixanMM]

Всем добрый день, у меня такой вопрос, не подскажите ли, через какой обработчик событий в DBLookupListBox можно сделать так:
нкликнул два раза на любой элемент из списка , и он внесся в другую таблицу?
поясню что я хочу сделать, на форме имеется DBgrid подключеный через Query1, из него даные отображаются в DBLookupListBox, я хочу сдеать так, чтобы при двойном клике на любом элементе в DBLookupListBox этот элемент скидывался в DBgrid2? спасибо заранее

[pobedin]

OnDblClick

[MixanMM]

Сообщение от pobedin

OnDblClick

а как Query? узнает какой элемент у меня выделен, и чтобы именно его и добавить, т.е я наваял примерно такое

Query1.Active:=false;
Query1.SQL.Add (' но вопрос... а тут то что писать? тут же нужно указывать либо перменую, либо строку DBLookListBox'a ');

[pobedin]

dbgrid2 только отображает данные. следовательно он подключен к таблице или квери.

query1.insert;
query1.fieldbyname('blablabla').asvariant:=query2 (table).fieldbyname('blablabla').asvariant;
query1.post;

можно делать запросом

with query3, sql do
begin
  close;
  clear;
  text := 'insert into table (pole) values (:par)';
  ParamByName('par').asvariant := DBLookupListBox.keyvalue; // если код записи нужно вставить
  ExecSQL;
end;

[MixanMM]

вообщем немного помог, получился вот такой код

t:= DBLookupListBox1.keyvaluye;
Query2.Active := false;
Query2.SQL.clear;
Query2.SQL.ADD('Insert into prod(''Выбрано'') values('''+t+''')');
Query2.ExecSQL;
Query2.Active := true;

Но вот в чем теперь загвоздка, он зараза обратно Query2 не включает, т.е данные добавляет в БД а DBgrid как бы отключенный стоит, но ежели переаодключится , то данные там появляются

[pobedin]

ну вообще, если я правильно понял, то в query2 хранится запрос на выборку. затем туда залетает запрос на добавление. по этому и не отображается в dbgrid ничего. т.е. нужно снова писать запрос на выборку в query2, либо использовать query3 для добавления записи, а query2 вообще не трогать и использовать только для выбора данных.
p.s. active := true, false - лучше не использовать. замени на open, close. значение 't' лучше использовать параметром - мой пример.

[MixanMM]

Сообщение от pobedin

ну вообще, если я правильно понял, то в query2 хранится запрос на выборку. затем туда залетает запрос на добавление. по этому и не отображается в dbgrid ничего. т.е. нужно снова писать запрос на выборку в query2, либо использовать query3 для добавления записи, а query2 вообще не трогать и использовать только для выбора данных.
p.s. active := true, false - лучше не использовать. замени на open, close. значение 't' лучше использовать параметром - мой пример.

да не, вообщем все заработало, забыл волшебную стрчку добавить в конце, SELECT * from table. как обычно, ларчик просто открывается, у меня теперь такой вопрос, а можно ли удалить выбранную строку из таблицы , т.е на которой стоит курсор в DBGrid

[pobedin]

SELECT * from table - именно про это я и говорил, следовало добавить.

sql такой :

with query, sql do
begin
  close;
  clear;
  text := 'delete* from table where ID= :par';
  ParamByName('par').asvariant := DBLookupListBox.keyvalue;  
  ExecSQL;
end;

ID подразумевается здесь как уникальное поле