[delphi] ibdataset OnFilterRecord

[123delphi321]

Ciao a tutti,

in un db ho 10 tabelle ognuna delle quali

CREATE TABLE TABELLA01(
    ID                 INTEGER NOT NULL PRIMARY KEY,
    ITEM               VARCHAR(100));

nel mio programma delphi, per ogni tabella inserisco:
IBdataset + datasource...che utilizzo per inserire e modificare i dati della tabella.

IBquery + datasource..che utilizzo per visualizare nei camp di lookup

sono diversi anni che utilizzo questa tecnica e funziona....

vorrei rendere più leggibile il programma e avevo pensato di ridurre il numero delle tabelle creandone una unica :

CREATE TABLE TABELLA01(
    ID                 INTEGER NOT NULL PRIMARY KEY,
    tipotabella      INTEGER,
    ITEM               VARCHAR(100));

sfruttando l'evento OnFilterRecord del componente ibdataset.

ma in questo modo avrei problemi con i campi di lookup quando quando in una schermata devo selezionare record di riferimento alla tabella1 e alla tabella2.....

Voi che tecnica utilizzate per memorizzare queste tabelle? usate n tabelle o una unica tabella?

grazie