Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Pasar datos de un DBLookupComboBox a un TEdit (https://www.clubdelphi.com/foros/showthread.php?t=81083)

lucas05 08-10-2012 04:57:24

Pasar datos de un DBLookupComboBox a un TEdit
 
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 08-10-2012 05:44:08

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 08-10-2012 21:20:42

Gracias ecfisa, esa solución funciona bien.


La franja horaria es GMT +2. Ahora son las 20:09:30.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi