como bloquear para borrar en tablas Paradox

[marcoszorrilla]

Creo que estás confundiendo vaciar la tabla:

Código Delphi [-]
Table1.Empty;

Con eliminar un registro:

Código Delphi [-]
Table1.Delete;

Para esto último no hay más que posicionarse sobre el registro y borrarlo.
1. Lo pones en modo edición y si lo logras ya está bloqueado para el resto de usuarios.

Puedes mirarte el evento OnEditError.

Otra cosa es si tiene registros en la tabla detalle.

Lo primero que se debe hacer es comprobar si tiene o no registros en la tabla detalle y si es así pedir conformidad al usuario para eliminar el detalle y luego el maestro.

Un Saludo.

[Mario1980]

No es que confunda vaciar la tabla con eliminar, es que cuando desactivo la tabla ya no veo el contenido, hago esto para bloquear la tabla y despues borrar, pero con respecto a lo que pusiste solamente con poner la tabla en edicion alcanza para que a otro usuario le aparezca la tabla como bloqueada?, si es asi por favor decime, gracias.

[marcoszorrilla]

Con lo que puse, lo que aparece como bloqueado es el registro y no la tabla, por eso te decía la diferencia entre borrar por registros o vaciar la tabla, no es lo mismo eliminar todos los registros de una tabla con Delete que hacer un Empty.Table.

Un Saludo.

[[Lepe]]

Ampliando lo dicho por Marcos, supón que dos usuarios estan viendo el mismo registro en pantalla, desde un ordenador le das a tabla.Delete, simplemente, sin tocar nada más. El otro usuario intenta modificarlo, pero como ha sido borrado, obtendrá un error en la aplicación tuya.

Para que salga un mensaje diciendo ... " el registro ha sido borrado por otro usuario del sistema" tienes que programar el evento OnEditError que Marcos ha comentado.

En este hilo, marcos proporcionó la rutina para centralizar los errores:
http://www.clubdelphi.com/foros/show...light=eKeyViol

Saludos