Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Delphi para la web
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 26-06-2016
darkamerico darkamerico is offline
Miembro
 
Registrado: dic 2010
Posts: 225
Poder: 14
darkamerico Va por buen camino
Exclamation Problema con refresco de un TIWDBGrid

Saludos amigos, nuevamente por aquí con una dudilla

Estoy escribiendo la versión Web de una aplicación que tengo en VCL Win32, estoy usando Intraweb XIV, se trata de una aplicación de ejemplo académico de un personal de banco (un cajero), el sistema permite realizar depósitos y retiros, los clientes son seleccionados de un TIWCombobox, al momento de seleccionar un Cliente debe visualizarse en el TIWDBGrid sus movimientos, esto funciona perfectamente en la aplicación de escritorio pero no logro que funcione en la IntraWeb, miren el código:

Código Delphi [-]
procedure TfrmPrincipal.cboClientesAsyncChange(Sender: TObject;
  EventParams: TStringList);
var
  posPunto:integer;
begin
  posPunto:=pos('.',cboClientes.Text);
  setCookie('idClienteSelected',Copy(cboClientes.Text,1,posPunto-1));
  ObtieneSaldoCliente(StrToInt(GetCookieValue('idClienteSelected')));
  VerMovimientos(StrToInt(GetCookieValue('idClienteSelected')));
end;

El procedimiento en cuestión es VerMovimientos, el cual pasamos a detallar a continuacion:

Código Delphi [-]
procedure TfrmPrincipal.VerMovimientos(id: integer);
begin
  objDM.q_MovimientosX.Close;
  objDM.q_MovimientosX.Params[0].AsInteger:=id;
  objDM.q_MovimientosX.Open;
  objDM.ds_MovimientosX.DataSet.Refresh;
  gridMovimientos.DataSource:=objDM.ds_MovimientosX;
  navMovimientos.DataSource:=objDM.ds_MovimientosX;
end;

La variable id si está llegando pero el grid no muestra nada, ni los nombres de los campos en las columnas:

Oh el objeto objDM lo inicializo en el evento Create como se aprecia a continuación:

Código Delphi [-]
procedure TfrmPrincipal.IWAppFormCreate(Sender: TObject);
begin
  objDM:=TDM.Create(WebApplication);
end;

TDM es un TDataModule.


La consulta SQL del componente q_MovimientosX es:

Código SQL [-]
SELECT movimiento.id_movimiento, movimiento.moneda, movimiento.tip_mov, movimiento.fecha_mov, 
movimiento.monto_orig, movimiento.monto_soles, movimiento.tc, movimiento.saldo_ant, movimiento.saldo_act,
movimiento.idcliente_fk
FROM movimiento
WHERE movimiento.idcliente_fk =:IDClienteX
ORDER BY movimiento.id_movimiento DESC

Agradecería alguna luz referente al tema.

Muy Agradecido.

Américo

Última edición por darkamerico fecha: 26-06-2016 a las 06:58:44.
Responder Con Cita
  #2  
Antiguo 26-06-2016
darkamerico darkamerico is offline
Miembro
 
Registrado: dic 2010
Posts: 225
Poder: 14
darkamerico Va por buen camino
Saludos

Amigos, Al realizar un retiro la grilla de movimientos magicamente se activo, pero sigo sin entender donde esta el error.

Aqui les dejo el codigo Fuente para aquellos interesados.



Source

Usuario: cajero
Clave: 123

Saludos

Última edición por darkamerico fecha: 26-06-2016 a las 16:44:05.
Responder Con Cita
  #3  
Antiguo 30-06-2016
darkamerico darkamerico is offline
Miembro
 
Registrado: dic 2010
Posts: 225
Poder: 14
darkamerico Va por buen camino
Rpta

Bueno, investigando llegue a determinar que el componente TIWDBGrid no esta capacitado para refrescarse a si mismo en conjuncion de un evento tipo Async. No se para que la gente de Atozed hace cosas incompletas, nos hace perder tiempo.

De modo que reemplace este componente por un TIWGrid normal y llene los campos manualmente y funciono.

Atte

Americo
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Problema de refresco Sneak Gráficos 0 03-02-2009 12:58:36
Problema en el refresco de datos Yaco Conexión con bases de datos 3 07-10-2008 17:44:07
Fastreport: ShowReport. Problema de refresco de pantalla en el preview. Jose_Pérez Impresión 0 12-07-2006 14:26:46
Problema refresco IBX con Firebird 2 y Delphi 2006 NPIdea Conexión con bases de datos 3 07-04-2006 10:40:49
Problema con refresco mar646 Gráficos 0 28-03-2005 13:03:11


La franja horaria es GMT +2. Ahora son las 15:00:18.


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
Copyright 1996-2007 Club Delphi