Código Delphi [-] AQ_Edit.Close; AQ_Edit.SQL.Clear; AQ_Edit.SQL.Add('Insert Into Socio(Soc_Rut, Soc_Nombres, Soc_Apellidos) Values (:vRu, :vNom, :vApe)'); AQ_Edit.Parameters[0].Value :=vRut.Text; AQ_Edit.Parameters[1].Value :=vNom.Text; AQ_Edit.Parameters[2].Value :=vApe.Text; AQ_Edit.ExecSQL;
AQ_Edit.Close; AQ_Edit.SQL.Clear; AQ_Edit.SQL.Add('Insert Into Socio(Soc_Rut, Soc_Nombres, Soc_Apellidos) Values (:vRu, :vNom, :vApe)'); AQ_Edit.Parameters[0].Value :=vRut.Text; AQ_Edit.Parameters[1].Value :=vNom.Text; AQ_Edit.Parameters[2].Value :=vApe.Text; AQ_Edit.ExecSQL;