Devart Forums

Code: Select all

var
  FQuery: TUniQuery
begin
  FQuery :=  TUniQuery.Create(Self);
  FQuery.SQL.Add('SELECT * FROM MyTable WHERE 1=0');
  FQuery.Connection = ...;
  FQuery.Open;
  FQuery.Append;
  FQuery.FieldByName('Id').ReadOnly := False;

  FQuery.FieldByName('Id').Value = 10;
  FQuery.FieldByName('Name').Value = 'AAAAAA';
  
  FQuery.Post;

Code: Select all

var
  FIdentityQuery: TUniQuery;
begin
  FIdentityQuery := TUniQuery.Create(Self).
  FIdentityQuery.SQL.Add('SET IDENTITY_INSERT [TableName] ON');
  FIdentityQuery.Connection := ...
  FIdentityQuery.Execute();

  // there you can go with normal post method
  FDataQuery.Post;
  RecordId := FDataQuery.FieldByName('TableId').Value;
end;