Devart Forums

Hi,
how do I save a memo text into a blob column in my data table

Im using Delphi 10.4 & Firebird

This is the procedure I have in my project Data-module but I can not get it to work

Thanks in advance - Grant

procedure TDataModule2.SaveMasterCompanyData(Sender: TObject; MasterCompany: ptrCompanyData);
begin
try
Save_Master_Company.PrepareSQL;
Save_Master_Company.ParamByName('COMPANY_NAME').AsString := MasterCompany.CompanyName;

Save_Master_Company.ParamByName('COMMENTS').AsMemo := MasterCompany.Comments_Data.Text;
Save_Master_Company.Execute; // executes the stored procedure
finally
Save_Master_Company.Close;
end;
end;