Get SQL before POST in a Zquery

Question

Guys, does anyone know how to get sql executed in the POST of a query in Insert mode? For example, I have the student table with id and name:

begin
    tblAluno.Insert;
    tblAlunoID.asInteger := 1;
    tblAlunoNome.asString := 'Carlos';
    //aqui
    tblAluno.Post;
end;

Just in "here" I want to get the sql that runs underneath with Insert. Note that if I put: Clipboard.astext := tblAluno.sql.Text it returns me the query sql and not what actually ran in the post.

Answer 1

You can get sql from Updateobject ex.:

ZQuery.UpdateObject.InsertSQL;
ZQuery.UpdateObject.DeleteSQL;
ZQuery.UpdateObject.ModifySQL;

---

@Jack, then you can try it this way:

var
   strLista: TStrings;
   idx: Integer;
begin
   strLista := nil;
   try
      strLista := TStringList.Create;
      strLista.Text := ZQuery.UpdateObject.InsertSQL.Text;
      strLista.Add('=======================================')
      for idx := 0 to ZQuery.Fields.Count - 1 do
      begin
         strLista.Add(ZQuery.Fields[idx].Name + ' = ' + ZQuery.Fields[idx].AsString);
      end;

      Clipboard.AsText := strLista.Text;
   finally
      if Assigned(strLista) then
         FreeAndNil(strLista);
   end;
end;

it will take sql, and at the end it will add the parameters and their respective values, (should be placed in the before post of zquery)

Answer 2

Jack, I recommend you don’t use ZTable, only in very extreme cases. Play a ZQuery in the DataModule and assign to your connection. Then play a ZUpdateSQL and attribute it to ZQuery on the property UpdateSQL. In his ZQuery modify the SQL.Text property to 'SELECT * FROM Tabela WHERE algumacoisa = algumacoisa;'. Then double click on ZUpdateSQL and a window will open. Click 'Generate SQL' and he will make exquisitely the 3 codes, to DELETE, UPDATE and INSERT. You can then edit them and improve them any way you want.