Pasar datos de un DBLookupComboBox a un TEdit

[lucas05]

Hola, espero que puedan ayudarme, tengo dos formularios:
En el form1 tengo un DBLookupComboBox(muestra distintos productos), conectado a la base de datos con un ZQuery y un DataSource.
En el form2 tengo un TEdit

Lo que intento hacer es que cuando selecciono un producto del DBLookupComboBox(form1) y presiono un button(form1), el producto seleccionado se muestre en el TEdit del form2


Desde ya muchas gracias.

[ecfisa]

Hola Lucas.

Según entiendo, podrías hacer:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  if DBLookupcomboBox1.Text > '' then
    with TForm2.Create(Self) do
    begin
      Edit1.Text := DBLookupComboBox1.Text;
      ShowModal;
    end;
end;

Saludos.

[lucas05]

Gracias ecfisa, esa solución funciona bien.