<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 TRANSITIONAL//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; CHARSET=UTF-8">
<META NAME="GENERATOR" CONTENT="GtkHTML/3.26.2">
</HEAD>
<BODY>
El vie, 26-06-2009 a las 12:27 +0000, Giuseppe Luigi Punzi Ruiz escribió:
<BLOCKQUOTE TYPE=CITE>
<PRE>
Pero datasource.dataset, requiere un dataset, en este caso un TSQLquery (desciende de tdataset si no recuerdo mal).
No se, debo estar "perjudicado" por smalltalk.
Enviado usando Real Mail de Vodafone.
-----Original Message-----
From: "Jose Antonio Cuello" <<A HREF="mailto:josea@artextrading.com">josea@artextrading.com</A>>
Sent: Fri, 26 Jun 2009 13:11:49 +0200
To: <A HREF="mailto:lazarus-es@lists.lazarus.freepascal.org">lazarus-es@lists.lazarus.freepascal.org</A>
Received: 26-Jun-2009 13:12:08 +0200
Subject: Re: [Lazarus-es] Resumen de Lazarus-es, Vol 21, Envío 65
Has dao en el clavo, joer no sé en que pensaba en mi respuesta anterior.
Está claro que la clase TDataset no tiene ApplyUpdates, así que si
sabemos que el dataset es TSQLQuery habrá que hacerle un casting para
llegar a sus propiedades y eventos.
TSQLQuery(DataSource1.Dataset).ApplyUpdates
Message: 2 Date: Fri, 26 Jun 2009 12:13:23 +0200 From: javivf
<<A HREF="mailto:javivf@gmail.com">javivf@gmail.com</A>> Subject: Re: [Lazarus-es] Donde apunta
TDataSource.Dataset? To: Spanish version of Lazarus List
<<A HREF="mailto:lazarus-es@lists.lazarus.freepascal.org">lazarus-es@lists.lazarus.freepascal.org</A>> Message-ID:
<<A HREF="mailto:4A449F43.8000300@gmail.com">4A449F43.8000300@gmail.com</A>> Content-Type: text/plain; charset="utf-8"
Giuseppe Luigi Punzi escribió:
> > No sé si es por venir de un lenguaje puro OOP como smalltalk, o es
> > cosa de Lazarus que no lo tiene del todo implementado, pero...
> >
> > A mi entender, si yo, en un Datasource, declaro como Dataset un
> > TSQLQuery, debería poder hacer sin más:
> > DataSource1.Dataset.ApplyUpdates;
> >
> > Pero no me deja hacer eso.
> >
> > La propiedad Dataset no apunta directamente al objeto enlazado?
>
Si pero en el caso de TDataSource la propiedad DataSet hace referencia a
un TDataSet y no a un TSQLQuery con lo que creo entender que se pierde
el procedimiento ApplyUpdates en el casting. Que alguien me corrija por
favor :)
</PRE>
</BLOCKQUOTE>
<BR>
No he dicho nada. He indagado y por narices hay que hacer el casting. Creo que "la culpa" la tiene el fuerte tipado, y el tipado dinámico de Smalltalk que me ha "mal"-acostumbrado.<BR>
<BR>
Gracias por vuestros comentarios.
</BODY>
</HTML>