DATABASE - TABLE - SMART TILGANG ?????

HEJ,

I delphi7 / programmet har en en Database med op til 14 Tabeller. Programmet arbejder med max. 4 af gangen, så jeg har 4 datasources med tables og DBGrid's, hvor jeg sætter Table-names, åbner til DBGRID's, og lukker ved form-afslutningen efter behov.

Henter Table1.FIELDDEFList'ens enkelte element og assigner DBEDIT(n) til dette element - igen efter behov .

Den ene af tabellerne har et FieldDefs.Count på 52 elementer.

Det betyder at jeg må skrive 52  DBEdit(n) (N = 1 --> 52) for at
vise denne base. (jeg ønsker ikke at bruger- /en -/ne skal have adgang til DBGRID'en direkte), så jeg funderede på om det er muligt at lave  en smartere løsning i form af:

(Jeg har DBedit1 ------>  DBedit52 )

Databasen er forudsat åben ....

For N := 1 to 52 DO
  BEGIN
      (DBedit[N] AS TDbedit).FieldValue = FieldDefList[N].Asstring;
      (DBedit[N] AS TDBedit).DataSource = TDataSource1;
      (DBedit[n] As TdbEdit).ReadOnly := TRue;
  END;

   
   
eller er der ingen vej udenom ..... (surt) ?

Kristian