problema de logica con filter y ciclos

[vroa74]

Hola:

Estoy haciendo un programa, el cual maneja una base de datos.
realmente el problema consiste que el sistema estara en dos lugares fuera de red sin conexion, la base de tabla va a ser transportada.
como las tablas son la misma lo unico que debo hacer es validar que la tabla transportada se copie en la tabla de la computadora principal.

principal = tabla1
transportada = tabla2

repeat
tabla1.filtor
repeat
validos datos porque de lso datos filtrados puede que exista algun dato que haga que se repita el registro
until(tablai.eof)

si el registro no esta duplicado lo inserto

until(tabla2.eof)

*resolver el problema cuando el filtro devuelve una tabla vacia, ya que si leponga la condicion que si el numero de registros da la tabla 1 <> de 0
aun entra a la comparacion y me arroja un error.

espero que me pueda ayudar.

gracais.

[marcoszorrilla]

Las tablas aunque no dices de que tipo se trata, en un principio utilizando.


MiTabla.Filter:='Peso > 80';
MiTabla.Filtered:=True;

If Tabla.RecordCount > 0 then
Lo que sea;

Tendrías que explicar más ampliamente la estructura de la tabla, quizás utilizando SQL en vez de filtros fuera más fácil.

Un Saludo.

[vroa74]

Mucha gracias.

LA verdad ya solucione el problema, filtre la tabla mas no estaba quitando el filtro, cuando el filtro daba la tabla vacia marcaba error
al quitar el filtro a la tlabla1 para poder volver a filtrar ya no marco mas errores.

muchas gracias