Проблема с InterBase

[Михаил Д.]

Здравствуйте. Возникла маленькая проблема с InterBase:

создаю с помощью IBConsole таблицу:

create table otpusk(
id_dep Numeric(6,0) NOT NULL,
name Varchar(40) NOT NULL,
Primary Key (id_dep)
);
create generator genotpusk;
set term !!;
create trigger create_depotpusk for otpusk
before insert position 0
as begin
new.id_dep = gen_id(gendepartment,1);
end!!
set term; !!

на главной форме создаю Edit1 и Button1.
Создаю вторую форму. На ней вылаживаю IBTransaction1, IBDatabase1, IBQuery1, DataSource1, DBGrid1. Связываю их. Таблица отображается в Гриде. Также ложу на этой форме Button1. И вот сама проблема:
каким способом, выделив определенную ячейку в гриде(в ней имеется какая-нибудь запись) и нажав на Button1, вставить эту запись на главную форму в Edit1? Заранее благодарен.

[Михаил Д.]

Button1 на главной форме предназначена для отображения второй формы

[_SERGEYX_]

Как я понял, главной проблемой является получение номера столбца при клике на ячейку...
Я вроде делал что-то похожее..

type
  TFake = class (TDBGrid);

procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
  ShowMessage(Format ('Столбец = %2d',[TFake (DbGrid1).Col])+
  '. Значение ячейки = '+DBGrid1.Fields[TFake (DbGrid1).Col-1].AsString);
end;

Думаю, здесь все понятно. Последнее значение (DBGrid1.Fields[TFake (DbGrid1).Col-1].AsString) можешь переносить куда угодно.

[Михаил Д.]

Спасибо за помощь! Буду пробовать.