[Lazarus-es] Utilizar control TSQLQuery sin conexión a BD
Fredy Gonzales
fredyg1965 en gmail.com
Jue Mayo 26 18:02:39 CEST 2011
No se si te sirva esto..
Yo tengo creado un componente TSQLquery a apuntando a cualquier tabla. desde
de DataModule, eso si siempre conectado a mi base de datos principal.
Entonces cuando quiero realizar algo sencillo con mi base de datos que no
requiera mucho problemas realizo esto
// Aqui actualizo algunos datos de menos importancia.
With global.qrytools do begin;
Close;
SQL.Text:='UPDATE conductor Set con_imaid = :ID1 WHERE con_id =
:ID2';
Params.ParamByName('ID1').AsInteger := 0;
Params.ParamByName('ID2').AsInteger := idCond;
ExecSQL;
Close;
end;
// Aqui hago una consulta con el mismo componente, pero a una tabla
distinta.
With global.qrytools do begin;
Close;
SQL.Text:='Select mov_id,mov_num from movil where mov_estado=0 and
mov_id not in (Select con_idmov from conductor where con_idmov > 0)';
Open;
SetLength(aIdCboVeh,RecordCount);
SetLength(aNumMov,RecordCount);
i:= 0;
while Not EOF Do
begin
cbovehiculos.Items.Add('Movil ' +
FieldByName('mov_num').AsString);
aIdCboVeh[i] := FieldByName('mov_id').AsInteger;
aNumMov[i] := FieldByName('mov_num').AsString;
i:= i + 1;
Next;
end;
Close;
end;
Si te das cuenta, uso el qrytools indistintamente a cualquier cosa que yo
quiera hacer y como vez, hasta le paso parametros.
Todo eso con el ZeosDBO.
Tengo un gran problema con Lazarus 0.9.31 que lo instale y no puedo
reinstalar los paqueres de Zeos si no te enviara un ejemplo.
Saludos.
FG
----- Original Message -----
From: "Ismael L. Donis García" <ismael en citricos.co.cu>
To: "Spanish version of Lazarus List"
<lazarus-es en lists.lazarus.freepascal.org>
Sent: Wednesday, May 25, 2011 2:48 PM
Subject: Re: [Lazarus-es]Utilizar control TSQLQuery sin conexión a BD
No me sirve, trabajo con Firebird y quiero que la aplicación corra tanto en
Windows como en Linux
Gracias de todos modos por el comentario.
=========
|| ISMAEL ||
=========
----- Original Message -----
From: "Maxi" <maximiliano.duarte en gmail.com>
To: "Spanish version of Lazarus List"
<lazarus-es en lists.lazarus.freepascal.org>
Sent: Wednesday, May 25, 2011 3:31 PM
Subject: Re: [Lazarus-es] Utilizar control TSQLQuery sin conexión a BD
Mysql tiene la Posibilidad de crear tablas en memoria que pueden ser o
no persistentes a reinicios
--
No a la obsolecencia programada:
http://dimensionargentina.blogspot.com/2011/01/todo-esta-disenado-para-romperse.html
Twitter: @nenunocomar
Identi.ca: @nenuno
Linux User #495070
Ubuntu User #28504
http://miexperiencialinux.blogspot.com/
El que pregunta aprende, y el que contesta aprende a responder.
_______________________________________________
Lazarus-es mailing list
Lazarus-es en lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
_______________________________________________
Lazarus-es mailing list
Lazarus-es en lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es
More information about the Lazarus-es
mailing list