[Resolvido] Trasferir Vários Dados

Pessoal, estou com um problema aqui...

até hoje só precisei fazer a transferencias de um cadastro para outra tabela, nesse caso sempre utilizei:

begin

dm.q_baixa_inq.Close;
dm.q_baixa_inq.SQL.Clear;
dm.q_baixa_inq.SQL.Add('Insert into tbl_baixa_inq(id_inq, valor, vencimento, baixa, parcela, tipo, especificacao, baixados) values ('''+f_cad_inquilinos.DBEdit76.Text+''','''+f_cad_inquilinos.DBEdit72.Text+''','''+f_cad_inquilinos.DBEdit74.Text+''','''+MaskEdit1.Text+''','''+f_cad_inquilinos.DBEdit73.Text+''','''+f_cad_inquilinos.DBComboBox3.Text+''','''+f_cad_inquilinos.DBEdit75.Text+''','''+edt_baixa.Text+''')');
dm.q_baixa_inq.ExecSQL;

Agora surgiu um problema aqui, onde tenho que transferir vários dados de uma tabela para outra.

Por exemplo, todos os cadastro que o campo "SITUACAO" estiver com "A" deve sair da tabela 1 e ir para a tabela 2

como posso fazer isso?

Obrigado.