Código en delphi

[Troxiv]

Hola, soy nueva en el foro y el delphi tambien, recien estoy aprendiendo a usarlo, necesito que me ayuden con esto:
tengo que hacer un trabajo de auditoria
Tengo un tquery, datasource, y database
tengo 3 tablas:
personas: dni, nombre, apellido, mail
reporte: id_accion, fecha, tabla modificada, fecha, campo modifcado, dato original, dato modificado.
Acciones: id_accion, categoria
1 alta
2 baja
3 modificación

lo que quiero hace que cada vez que se ejecute el procedimiento de alta, se inserte el numero 1(alta) en el campo id_accion de la tabla reporte , entonces quiero cruzar el id_accion de la tabla acciones con id_accion de la tabla reporte, entonces usaria... algo asi . . .?????
Select r.*, c.categoria FROM tabla_reporte r
INNER JOIN acciones c ON (reporte.id_accion = c.id_accion)

Ahora este código en delphi como seria?
begin
fmodulo.consulta.Close;
fmodulo.consulta.SQL.Clear;
fmodulo.consulta.SQL.Add ......

[[egostar]]

Hola

Código Delphi [-]
begin
  fmodulo.consulta.Close;
  fmodulo.consulta.SQL.Text := 'Select r.*, c.categoria FROM tabla_reporte r '+
                               'INNER JOIN acciones c ON (reporte.id_accion = c.id_accion)';
  fmodulo.consulta.Open;
end;

Salud OS

[Troxiv]

Muchas gracias, voy a probar a ver si me funciona bien, recien estoy empezando y me cuesta ya que no estoty todo el dia en la pc como para avanzar mas rapido, uno hace lo que puede