FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Copias de DataSet
Hola.
Tengo un problema y lo llevo arrastrando algun tiempo y no se como solventarlo. Tengo un DataModule con una IBdatabase, etc. Entre estos componentes hay un IBdataset que es el que nos interesa para mi problema. En un procedimiento tengo: Código:
// Procedimiento principal. var cv: TdataSet; s,a: string; begin s:='select * from articulos'; dm.IBDataSet1.SelectSQL.Text:=s; dm.IBDataSet1.Active:=true;; cv:= dm.IBDataSet1; // copio el dataset del DataModule a uno locar. (AQUI LA MADRE DEL CORDERO) cv.First; while not cv.Eof do begin s:=cv.FieldByName('Codigo').AsString; a:=cv.FieldByName('Almacen').AsString; getcv(s,a,c,v); // LA SEGUNDA MADRE DEL CORDERO Código:
procedure GetCV(cod: string; al: string; var C: Double; var V: Double); var cv: TdataSet; s: string; begin s:='select entrada, salida from existencias'; s:=s+' where codigo='+quotedstr(cod)+' and almacen='+quotedstr(al); dm.IBDataSet1.SelectSQL.Text:=s; dm.IBDataSet1.Active:=true; cv:=dm.IBDataSet1; c:=cv.FieldByName('entrada').AsFloat; v:=cv.FieldByName('salida').AsFloat; end; En el procedimiento principal, tengo un DataSet que es una copia del DataModule.IBDataSet1 Cuando invoco al segundo procecimiento ( GetCV ) El dataset del primer procedimiento es como si contuviese los datos del segundo, perdiento lo que tenía. Algo estoy haciendo mal, o quizá no sea la forma de manejar estos componentes. No quiero tener en DataModule un montón de IBdataset para cada procedimiento. ¿ Como lo resuelvo ? Gracias. |
#2
|
||||
|
||||
Una pequeña puntualización:
No estás copiando nada. En memoria RAM, solo tienes un conjuto de registros al que accedes desde dos punteros: - uno el "dm.Ibdataset1" - otro puntero el "cv" Si cierras la consulta mediante el "cv" o mediante el "dm.Ibdataset1", estás actuando sobre los mismos datos. Lo normal es tener un IBdataset por cada tabla que quieras modificar. En todas las aplicaciones, tengo una rutina del tipo:
Ahora solo tienes que llamar a la función así:
Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente, se lo volveré a explicar hasta que no lo entienda, Gracias. |
#3
|
|||
|
|||
Me has aclarado mucho.
No había tenido en cuenta lo de los punteros. He resuelto el problema de una forma a ver si está bien así:
Pregunto: ¿ haciendo esto, es decir usando un TIBDataSet nuevo, sería la forma correcta de trabajar con DataSet para obtener datos puntuales ? Gracias. |
#4
|
||||
|
||||
Si, es correcto, aunque puedes mejorarlo haciendote algunas preguntas:
1- ¿Necesito poder modificar los registros? Si - usa un TIbDataset No - usa un TibQuery y sigue leyendo. 2- ¿Necesito recorrer los registros del query hacia delante y hacia atrás? Si - Sigo usando un Tibquery No - Usar un TibSql Imagina, necesitamos recorrer todos los registros de un Query para añadir un campo a un combobox. Solo necesitamos recorrer los registros una sola vez, desde el principio del dataset hasta el final, pues usamos un ibSql. Necesitamos una consulta oculta que usaremos para buscar la descripción de los clientes desde varias ventanas, necesitamos mover el puntero del dataset en ambos sentidos, hacia delante y hacia atrás, usamos un Ibquery. Obviamente el ibsql es el que menos recursos consume, después va el ibquery y el que más consume, por así decirlo es el ibdataset. Acabo de ver una incongruencia en el código: Dices que el objeto "Application" será el que lo destruya, pero después tú mismo te encargas de destruirlo. Esto puede provacar errores al cerrar tu programa, donde no podrás situar puntos de ruptura. Puedes usar estas dos alternativas:
o bien:
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: 03-04-2008 a las 11:57:47. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Copiar el contenido de un DataSet a otro DataSet | Javi2 | Varios | 82 | 22-11-2022 09:26:16 |
copias de seguirdad | MiGuEJeReZ | MySQL | 1 | 02-10-2006 16:40:11 |
copias incrementales | afxe | Varios | 1 | 25-08-2006 16:52:56 |
copias de archivo | santiago22 | API de Windows | 2 | 29-07-2005 16:30:40 |
Copias de Seguridad | noa | C++ Builder | 1 | 25-02-2004 17:52:27 |
|