Error Message:
----------------------------------------
List index out of bounds (0)

[0041D381] Classes.TStringList.GetObject (Line 3381, "Classes.pas" + 1) + $13
[0041D381] Classes.TStringList.GetObject (Line 3381, "Classes.pas" + 1) + $13
[00E029B3] TblViewF.TTableViewForm.RefreshData (Line 550, "TblViewF.pas" + 10) + $13
[00E03616] TblViewF.TTableViewForm.aRefreshExecute (Line 855, "TblViewF.pas" + 31) + $2

/******************************************************************************/
/***                Generated by IBExpert 14.06.2018 9:53:54                ***/
/******************************************************************************/

/******************************************************************************/
/***      Following SET SQL DIALECT is just for the Database Comparer       ***/
/******************************************************************************/
SET SQL DIALECT 3;



/******************************************************************************/
/***                                 Tables                                 ***/
/******************************************************************************/



CREATE TABLE BLOBFILES (
    BLF_ID        INTEGER,
    BLF_FILENAME  VARCHAR(255),
    BLF_FIRST_ID  ID_TYPE /* ID_TYPE = DECIMAL(18,0) */,
    BLF_LAST_ID   ID_TYPE /* ID_TYPE = DECIMAL(18,0) */
);




/******************************************************************************/
/***                                Indices                                 ***/
/******************************************************************************/

CREATE DESCENDING INDEX BLOBFILES_IDX1 ON BLOBFILES (BLF_FIRST_ID, BLF_LAST_ID);


/******************************************************************************/
/***                                Triggers                                ***/
/******************************************************************************/



SET TERM ^ ;



/******************************************************************************/
/***                          Triggers for tables                           ***/
/******************************************************************************/



/* Trigger: BLOBFILES_AIUD0 */
CREATE OR ALTER TRIGGER BLOBFILES_AIUD0 FOR BLOBFILES
ACTIVE AFTER INSERT OR UPDATE OR DELETE POSITION 0
AS
  declare variable max_id id_type;
begin
  select coalesce(max(blf_last_id), 0) + 1
  from blobfiles where blf_id <> 0
  into max_id;

  update blobfiles set blf_first_id = :max_id, blf_last_id = 999999999999999999
  where blf_id = 0
  and (coalesce(blf_first_id, -1) <> :max_id or blf_last_id <> 999999999999999999);
end
^

SET TERM ; ^



/******************************************************************************/
/***                          Fields descriptions                           ***/
/******************************************************************************/

COMMENT ON COLUMN BLOBFILES.BLF_FILENAME IS
'Полное имя файла blx включая путь';

COMMENT ON COLUMN BLOBFILES.BLF_FIRST_ID IS
'Минимальный bls_id в таблице blobextore';

COMMENT ON COLUMN BLOBFILES.BLF_LAST_ID IS
'Максимальный bls_id в таблице blobextore';



/******************************************************************************/
/***                               Privileges                               ***/
/******************************************************************************/