TDBimage does not work with Zeos no even with:
procedure TForm1.DBImage1DBImageRead(Sender: TObject; S: TStream;
var GraphExt: string);
begin
GraphExt := 'jpg';
end;
procedure TForm1.DBImage1DBImageWrite(Sender: TObject; S: TStream;
GraphExt: string);
begin
if GraphExt <> 'jpg' then
raise Exception.Create('Só há suporte para imagens *.JPEG');
end;
However it work's prety good with Firebird3 + IBX from
https://www.mwasoftware.co.uk/personal-databases