Ver Mensaje Individual
  #3  
Antiguo 11-04-2007
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 31
Lepe Va por buen camino
A ver quien se pone las pilas y hereda de MDODataset este pequeño engendro, jejeje.

En tiempo de diseño, tenemos que seleccionar un MDODataset, establecer el SELECTSQL, a continuación con el botón derecho usamos "Dataset Editor" para generar sus Sqls.... pues esto mismo lo he trasladado a tiempo de ejecución. (Curiosamente es una de las "características solicitadas" en el foro de MDO).

modo de uso actualmente y que no me gusta:
Código Delphi [-]
var Auto:TMDOAutoDataset; // hereda de TObject 
begin
  auto := TMDOAutoDataset.Create;
  auto.TableName:= 'Cliente';
  auto.SELECTSQL := ' select * from cliente where idcliente = :idcliente';
  auto.KeyFields.Add('IDCLIENTE');
  auto.TheMDODataset:= mdoDataset1;// mdoDataset al que se quiere modificar sus sqls.
  auto.GenerateSql; 
  // el "Auto" modifica las sqls del TheMDODataset asociado.
// Esto es lo que habría que evitar haciendo que el TMDOAutoDataset heredase de TMDODataset directamente.


  auto.Free;
  // el mdoDataset1 ya tiene modificas todas sus sqls,
  // liberamos este objeto.
END;

Obviamente el código más interesante ha sido extraído de MDOSOURCE\DESIGN\mdoUpdateSQLEditor.pas

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.

Última edición por Lepe fecha: 10-10-2007 a las 20:58:14.
Responder Con Cita