Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Actualizar todas las Tablas (https://www.clubdelphi.com/foros/showthread.php?t=72017)

Lenny 24-01-2011 19:12:27

Actualizar todas las Tablas
 
Buenas, tengo una duda, se pueden actualizar todas las tablas de un DataModule??? ingreso datos que editan desde distintas y hacia distintas tablas, tonces la idea es poder actualizarlas todas a la vez con un solo codigo...

De antemano, muchas gracias.

PD: Utilizo Delphi 2010, Zeos 7.0.0, MySQL...

duilioisola 25-01-2011 01:14:48

Si te refieres a hacer un Close..Open de las tablas, podrías recorrerlas todas, recorriendo los componetes del DataModule.
Código Delphi [-]
{DM es el DataModule}
for i := 0 to DM.ComponentCount -1 do
begin
   if (DM.Components[i] is TTable {o el componente Zeos equivalente}) do
   with (TTable(DM.Components[i])) do
   begin
      Close;
      Open;
   end;
end;


La franja horaria es GMT +2. Ahora son las 11:09:31.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi