Hola a todos, en primer lugar estoy realizando una aplicación en Delphi7, base de datos Access y componentes ADO, mi problema es que tengo una tabla enlazada con otras dos mediante el siguiente codigo:
Código Delphi
[-]
AdoQuery2.Active:=false;
AdoQuery2.SQL.Text := 'SELECT Archivo.* , Tema.*,Formato.* FROM (Archivo '+
' LEFT OUTER JOIN Tema ON Archivo.Registro2=tema.Registro2) '+
' LEFT OUTER JOIN Formato ON Archivo.Id=Formato.Id';
AdoQuery2.Active:=True;
Antes de enlazar las dos tablas borraba los registros seleccionados en mi dbgrid con este codigo:
Código Delphi
[-]
procedure TFGestion.BborrarClick(Sender: TObject);
var
button : integer;
begin
button := application.messagebox ('¿Realmente desea borrar la cinta seleccionada?',
'¿Seguro?', MB_yesno + mb_iconwarning); if button = IDYes then begin DBGrid2.DataSource.DataSet.Delete;
El problema es que al unirlas otras tablas, cada vez, que pulso el boton borrar me borra un registro en cada tabla, he mirado en access como me dijo Neftalí y no tengo activada los borrados en cascada.
Yo solo quiero que se borre un registro de la tabla maestro no de las detalle.
Gracias por vuestra ayuda, un saludo.
PD: He realizado otra vez la consulta aquí por que creo que encaja mejor en este hilo, sino es asi pido disculpas a los moderadores.