Actualizar datos de un StringGrid desde DB

[BlackDaemon]

Bueno aquí vendo despuies de 2 días haber escrito mi último post
Lepe mira, he estado leyendo todos estos días el foro-.. buscando sobre maetro/detalle y encontré vários temas pero no logro entender su funcionamiento.. vamos me doy cuenta de lo que se devería hacer un maestro/detalle, aquí encontré un post explican algo de eso y logré entender algo
http://www.clubdelphi.com/foros/show...aestro+detalle

Pero no es suficiente para poder hacer lo que yo quiero.. en primer lugar NO quiero poner ningún DBGrid en mi form.. con DBEdits me bastaría, tu dices que me olvide de los DBEdits y las ZTAbles, entonces como guardaría un producto ??
SI ya se que se podría hacer con SQL y no es difícil, pero tendría que tomar los datos de Edits verdad ?? o de donde mas lo tomaría ?? ahora.. mi problema esta en querer actualizar un producto y sus 6 precios que tengo en la otra base de datos, podría ser con puro SQL pero SE que no es lo correcto hacerlo, creo que debe haber alguna manéra de hacerlo mas sencillo
Lo único que pretendo hacer es esto:

Agregar un nuevo producto llenando unos DBEdits o EDits, luego llenar tambien unos DBEdits o Edits con los 6 precios que se alamcenarán en la otra tabla TARIFAS, bueno eso lo hice con SQL y copié el id_producto a la tabla TARIFAS por cada producto, cosa que quedaría así
Un producto con todas las descripciones en la tabla PRODCUTOS y los 6 precios y sus códigos en la tabla TARIFAS, bueno hasta haý no hay problema, por que cuando elimino un producto tam,bién se eliminar los 5 precios, PERO el problema está al editar un producto no edita en la tabla TARIFAS con mi código que puse en los anteriores post, lo único que hace es editar los campor de la tabla PRODCUTOS pero NO edita los 6 precios y códigos de la tabla TARIFAS, lo que hace es agregarme los mismos 6 precios ( en el caso de que no modificaron los precios ) con el mismo id_producto, osea serían 12 precios para el id_producto y si otra ves actualizo me graba 6 precios mas xDD osea 18 ya serían.. lo único que quiero es que UPDATE los precios y códigos en la tabla TARIFAS.. eso es lo que quiero saber.. si tendría que hacerlo puro SQL ?? o hay algún componete como el ZUpdateQUery ???? he estado leyendo tambien sobre en en este tema
http://www.clubdelphi.com/foros/show...=3802#post3802

o se si me serviría pero bueno.. para que no digan que no busco o que no leo la verdad es que me frustra no poder hacer algo tan secillo que parece.. y se que cuando aprenda diré : oh he sido un tonto al no poder hacer algo tan sencillo

Y otra cosa.. que acreo que aquí viene lo de master/detail es que quiero mostrar los datos de los productos todo en uno, osea descripciones del producto que leere de la tabla PRODCUTOS y sus precios y códigos que leeré de la tabla TARIFAS, bueno ahora eso lo tengo que hacer puro SQL también ?? o con master/detail solo tengo que escojer los campos de las tablas ?? no entiendo muy bién que inutil que soy

Bueno creo que lo mejor me vendría es un pequeño ejemplo de lo que pretendo hacer,

aquí les dejo una pequeña base de datos relacionales.

Código SQL [-]
-- Base de datos: `test`

CREATE TABLE `cliente` (
  `id_cliente` int(11) NOT NULL,
  `nombre` varchar(30) default NULL,
  PRIMARY KEY  (`id_cliente`)
) ENGINE=InnoDB DEFAULT CHARSET=utf8;

CREATE TABLE `venta` (
  `id_factura` int(11) NOT NULL,
  `id_cliente` int(11) NOT NULL,
  `cantidad` int(11) default NULL,
  PRIMARY KEY  (`id_factura`),
  KEY `id_cliente` (`id_cliente`)
) ENGINE=InnoDB DEFAULT CHARSET=utf8;


-- 
-- Filtros para la tabla `venta`
-- 
ALTER TABLE `venta`
  ADD CONSTRAINT `venta_ibfk_1` FOREIGN KEY (`id_cliente`) REFERENCES `cliente` (`id_cliente`) ON DELETE CASCADE ON UPDATE CASCADE;

Bueno a ver si alguien TAN amable me hace un ejemplo con esa pequeña base de datos.. como poder agregar 6 catidades para un mismo id_cliente y luego poder editarlo esto,,, además un master/detail con eso
La verdad es que solo con eso creo que aprenderé o mejor dicho me daré cuenta en que es lo que fallo y que conceptos tengo mal definidos de lo que leí

saludos y gracias por la ayuda

[[Lepe]]

Como ya te dije, usa un ZDataset, es lo que necesitas para editar, insertar, borrar y seleccionar de una tabla.

Mira en este hilo los mensajes 7 y 8

Saludos

[BlackDaemon]

Empezado por Lepe

Como ya te dije, usa un ZDataset, es lo que necesitas para editar, insertar, borrar y seleccionar de una tabla.

Mira en este hilo los mensajes 7 y 8

Saludos

Me he leido todos los mensajes.. y lo que aún no entiendo es que me mandas a usar un ZDataset pero sigo sin saber que es eso.. lo que se es que es un componente, pero te refieres al ZQuery ?? o el ZQUptadeSQL ??
Y me mandas a al mensaje 7, 8 donde claramente tu recomiendas unos componentes diferentes a los que suo, yo uso ZEOSlib + MYSQL y los que aconsejas con para Firebird

http://www.clubdelphi.com/foros/show...65&postcount=7

Esos componentes pueden que tengas uno llamado MDODataset pero aquí no tengo alguno que se parece pero es obvio puesto que uso los ZEOS, ahora mi pregunta es.. ese ZDataset al que te refieres es el ZUpdateSQL que tienen las ZEOS ??? y en el aterior post te puse los componentes que tengo en esa paleta, pero te las pongo de nuevo por si no las viste.

ZConnection: TZConnection
ZReadOnlyQuery: ZDataSet
ZQuery: ZDataSet
ZTable : ZDataSet
ZUpdateSQL: ZsqlUpdate
ZStoredProc: ZstoredProcedure
ZSQLMetadata: ZSQLMetadata
ZSQLProcessor: ZSQLProcessor
ZSQLMonitor : ZSQLMonitor
ZSequence : ZSequence

Bueno yo ahora estoy usando ZQuery para insertar registros pero la verdad es que es un lio.. por que tengo que usar 2 para cada tabla se que lo hago mal. pero así funciona, la cosa es a la hora de actualizar, no tengo la menos idea de como hacerlo con unos Edits, puesto que ya no uso los DBEdits, lo que estaba haciendo es hacer una busqueda del producto a editar luego llenar los campos Edits, pero tengo problemas al llenar unos DBLookComboBox que son los que llenan sus Items leyendo de otra tabla, bueno creo que estoy muy perdido o es que me he confundido demasiado y quiero salir de esto
Este es el código que estoy usando para agregar las descripciones de los productos a la tabla PRODUCTOS y códigos, precios, y listaprecios a la tabla TARIFAS

Código Delphi [-]
  if (ECodigoBarra.Text = '') then
  begin
    ShowMessage('Ingresa un valor para el Código de barra.');
  end
  else
  begin
    //Armamos el query (INSERT) para agregar los datos del producto.
    DM.ZQProductos.Close;
    DM.ZQProductos.SQL.Clear;
    DM.ZQProductos.SQL.Add('INSERT INTO productos (Descripcion, Categoria, SubCategoria, Unidad, Cantidad, Proveedor, ');
    DM.ZQProductos.SQL.Add('UnidadPrecio, PrecioCompraBs, PrecioCompraSus, Costo, FechaActualizacion)');
    DM.ZQProductos.SQL.Add('VALUES (es, :Cat, :SubCat, :Uni, :Cant, :Prov, :UniPre, :PCB, :PCS, :Cos, :FechAct)');
    //Asignamos los parámetros tomados de los edits.text
    DM.ZQProductos.ParamByName('Des').AsString := MDescripcion.Text;
    DM.ZQProductos.ParamByName('Cat').AsString := DBLCBCategoria.Text;
    DM.ZQProductos.ParamByName('SubCat').AsString := DBLCBSubCategoria.Text;
    DM.ZQProductos.ParamByName('Uni').AsString := DBLCBUnidad.Text;
    DM.ZQProductos.ParamByName('Cant').AsString := ECantidad.Text;
    DM.ZQProductos.ParamByName('Prov').AsString := DBLCBProveedor.Text;
    DM.ZQProductos.ParamByName('UniPre').AsString := DBLCBUnidadPrecio.Text;
    DM.ZQProductos.ParamByName('PCB').AsString := EPrecioCompraBs.Text;
    DM.ZQProductos.ParamByName('PCS').AsString := EPrecioCompraSus.Text;
    DM.ZQProductos.ParamByName('Cos').AsString := ECosto.Text;
    DM.ZQProductos.ParamByName('FechAct').AsDateTime := DateTimePicker1.Date;
    DM.ZQProductos.ExecSQL;
    //DM.ZQProductos.Open;
    //DM.ZQProductos.Refresh;
    //DM.ZQProductos.Last;
    DM.ZTProductos.Refresh;
    DM.ZTProductos.Last;

  with DM.ZQTarifas do
  begin
    Close;
    SQL.Clear;
    SQL.Add('INSERT INTO tarifas (Id_producto, CodigoBarra , CodProducto , TipoTarifa , Precio)');
    SQL.Add('VALUES (:IDP, :CB, :CP, :TT1, :P1), ');
    SQL.Add('(:IDP, :CB, :CP, :TT2, :P2), ');
    SQL.Add('(:IDP, :CB, :CP, :TT3, :P3), ');
    SQL.Add('(:IDP, :CB, :CP, :TT4, :P4), ');
    SQL.Add('(:IDP, :CB, :CP, :TT5, :P5), ');
    SQL.Add('(:IDP, :CB, :CP, :TT6, :P6)');

    // Si, asignamos los parámetros xDD
    ParamByName('IDP').AsInteger := DM.ZTProductos.FieldByname('Id_producto').AsInteger;
    ParamByName('CB').AsString := ECodigoBarra.Text;
    ParamByName('CP').AsString := ECodProducto.Text;

    ParamByName('TT1').AsString := 'Precio1';
    ParamByName('TT2').AsString := 'Precio2';
    ParamByName('TT3').AsString := 'Precio3';
    ParamByName('TT4').AsString := 'Precio4';
    ParamByName('TT5').AsString := 'Precio5';
    ParamByName('TT6').AsString := 'Precio6';

    ParamByName('P1').AsString := EPrecio1.Text;
    ParamByName('P2').AsString := EPrecio2.Text;
    ParamByName('P3').AsString := EPrecio3.Text;
    ParamByName('P4').AsString := EPrecio4.Text;
    ParamByName('P5').AsString := EPrecio5.Text;
    ParamByName('P6').AsString := EPrecio6.Text;
    // Ejecutamos e insertamos todos los valores asignados
    ExecSQL;
  end;

  end;
end;

bueno por lo que verán es demasiado largo y se que se puede hacerlo mas fácil pero no lo se,

saludos y espero me ayuden

[[Lepe]]

Lo siento, como ves no uso esos componentes. Los ví cuando lo pusiste la primera vez, pero como no los conozco, no respondí, estuve esperando que otra persona que use Zeos pudiera afirmarlo.

Deber... debe exister ese componente, o quizás no lo hayan creado aún... en definitiva, no puedo asegurarte nada.

Siento mi última intervención.

Saludos

[BlackDaemon]

Lepe pero tengo un componente que se llama ZsqlUpdate.. tiene esas 3 propiedades.. insert, delete, update creo que es a ese que te refieres no ??
no me abandones xDDDD


saludos, a ver si álguien mas me echa una mano que tengo ganas de aprender

salud!

[[Lepe]]

Es que, no lo sé.

Yo tengo un MDODataset y un MDOUpdateSql, y son componentes distintos, el segundo no se usa igual que el primero. No tengo ni idea si en Zeos le han cambiado el nombre.

Saludos

[BlackDaemon]

jeje bueno Lepe, pero tranquilo, no te enojes xDD (broma)

Ya, ahora a esperar que álguien sepa o seguir buscando info, no creo que nadie haya necesitado alguna vés estos componentes con MySQL y tablas relacionales


saludos y gracias