¿Cómo insertar datos con Mysql?

[daragor]

Muchachos me han ayudado mucho, y encaminado a una buena programacion, vengo de visual foxpro y debo ir adaptandome a estas sintaxis.
Ya estoy estudiando parametros y segun entiendo funcionan muy bien. Gracias! excelente comunidad...

[roman]

¡Qué bueno que te haya servido!

Realmente, el uso de parámetros en consultas SQL (y no sólo para valores tipo DATE) proporciona código más limpio y legible. Yendo más allá, yo te recomendaría, de hecho, no hacer consultas SQL `al vuelo`, esto es, no asignar el texto de la consulta en código sino hacerlo en el inspector de objetos durante el diseño de la aplicación. En código sólo el reemplazo de los parámetros.

Así tienes un código más fácil de mantener.

// Saludos

[daragor]

Compañero roman, entonces los textos, cadenas, de consultas SQL irian en la propiedad SQL de un TSQLQuery? de ser asi... como hago para indicar distintos tipos de consultas a un solo objeto TSQLQuery? no consigo buenas guias para aprender. Por cierto, estoy usando Lazarus..

[Casimiro Noteví]

La mejor guía para aprender

[roman]

Empezado por daragor

como hago para indicar distintos tipos de consultas a un solo objeto TSQLQuery?

Es que, en mi opinión, eso es una mala práctica. Cada consulta debe verse como un objeto en sí: clientes, recibos, agregaCliente, agregaRecibo, etc. Todos representados por un Query localizado en un DataModule.

Es preferible gastar unos cuantos bytes más en recursos usando múltiples querys que tratar de economizar reusando un sólo query.

Así, por ejemplo, tu consulta de este hilo estaría representada por un query qryAgregaCompra con el siguiente texto en su propedad SQL:

Código SQL [-]
insert into compras (fec,paga,mon,esta) values(:fecha, ago, :monto, :estatus)';

Al momento de agregar una compra simplemente suples los valores:

Código Delphi [-]
qryCompras.ParamByName('fecha').AsDate := Fecha;
qryCompras.ParamByName('pago').AsFloat := 0;
qryCompras.ParamByName('monto').AsString := Total.Text;
qryCompras.ParamByName('estatus').AsString := 'CARGADA';

qryCompras.ExecSQL;

quedándote, según yo, un código mucho más limpio.

// Saludos

[daragor]

Casimiro, impresionante.. puede ser algo muy muy util para mi en cuanto a sintaxis. Muchas gracias.

Roman! estoy entendiendo lo que dices compañero, claramente.. y me parece excelente, soy un obsesivo con la limpieza y orden del codigo, asi q me viene 10 puntos. Si puediera me pagaria un curso de delphi, lazarus.. pero en mi cuidad no hay. Asi que gracias muchas por los consejos!
Ahora, lo importante... tu dices "un datamodule" .. donde está? minimamente me dirias como se usa? Ya que insertar muchos de esos objetos TSQLQuery en los forms me estropea un poco el diseño en tiempo de diseño.. por eso pense en reusar un query varias veces..

Pd: que buen hilo, podrian editar el titulo del post para futuras busquedas.

[Casimiro Noteví]

Lee el libro que te he enlazado antes, es lo mejor de lo mejor, te lo puedo asegurar.

Empezado por daragor

Pd: que buen hilo, podrian editar el titulo del post para futuras busquedas.

¿Y qué título le podemos poner?

[daragor]

No soy nadie para decir un titulo pero te puedo sugerir compañero Casimiro.. algo asi como "Correcta insersion de datos en Mysql"

Si! voy a estar a full con ese libro, mil gracias!

[roman]

Empezado por daragor

tu dices "un datamodule" .. donde está? minimamente me dirias como se usa? Ya que insertar muchos de esos objetos TSQLQuery en los forms me estropea un poco el diseño en tiempo de diseño.. por eso pense en reusar un query varias veces..

File|New|DataModule

No hay realmente ninguna ciencia en usarlos. Son como un Form pero sólo en diseño, en ejecución no se ven. Podría decirse que son una superficie donde colocar componentes no visuales como los datasets.

// Saludos