create domain I as integer;

create domain B as blob;

create table T (
    ID  I not null,
    DAT B
);

alter table T
  add constraint PK_T
      primary key ( ID );

Error Message:
----------------------------------------
Access violation at address 00800000 in module 'IBExpert.exe'. Write of address 34AAE5AF

[00800000] MExt.TEllipse.LoadFromStream (Line 287, "MExt.pas" + 84) + $6
[00403BDF] System.@HandleAnyException + $33
[00981606] dxTL.TCustomdxTreeList.Destroy (Line 4351, "dxTL.pas" + 17) + $2
[00B6F1D3] dxDBCtrl.TCustomdxDBTreeListControl.Destroy (Line 1373, "dxDBCtrl.pas" + 6) + $7