LACV
03-12-2015, 22:32:50
buenas tardes;
lo que sucede es que tengo un listbox y muestro los datos de una consulta en item; quiero que al dar click en algunos de los item llevar el ID a otro formulario lo estoy realizando por livebindig para mostrar los datos en el listbox
en el primer form donde esta el listbox utilizo este codigo para ocultar el form1 y creo el dos
procedure TFrmReporte.ListPedidosItemClick(const Sender: TCustomListBox;
const Item: TListBoxItem);
begin
FrmDetalleProducto := TFrmDetalleProducto.Create(Application);
FrmDetalleProducto.Show;
FrmMain.Visible := False;
end;
en el segundo intento recibir el dato en un label de esta forma
Label1.Text := QueryPedidosSinCompletar.FieldByName('Id_pedido').AsString;
pero siempre me muestra el primer ID
lo que sucede es que tengo un listbox y muestro los datos de una consulta en item; quiero que al dar click en algunos de los item llevar el ID a otro formulario lo estoy realizando por livebindig para mostrar los datos en el listbox
en el primer form donde esta el listbox utilizo este codigo para ocultar el form1 y creo el dos
procedure TFrmReporte.ListPedidosItemClick(const Sender: TCustomListBox;
const Item: TListBoxItem);
begin
FrmDetalleProducto := TFrmDetalleProducto.Create(Application);
FrmDetalleProducto.Show;
FrmMain.Visible := False;
end;
en el segundo intento recibir el dato en un label de esta forma
Label1.Text := QueryPedidosSinCompletar.FieldByName('Id_pedido').AsString;
pero siempre me muestra el primer ID