Einzelnen Beitrag anzeigen

Benutzerbild von semo
semo

Registriert seit: 24. Apr 2004
755 Beiträge
 
Delphi 2010 Professional
 
#1

Designfrage: initializing constant arrays

  Alt 12. Nov 2009, 10:23
Ich habe mal eine Designfrage:
ich habe ein const static Array:
Delphi-Quellcode:
type
  TMyColumn = record
    ColumnName: string;
    FieldType: TFieldType;
  end;

const
  My_Columns: array[0..2] of TMyColumn = (
    (ColumnName: 'bla0'; FieldType: ftInteger),
    (ColumnName: 'bla1'; FieldType: ftInteger),
    (ColumnName: 'bla2'; FieldType: ftInteger)
  );
Nun möchte ich die Inhalte dieses Arrays in ein weiteres Array aufnehmen.
Ich habe da an so was in der Art gedacht:

Delphi-Quellcode:
const
  My_ColumnsEx: array[0..3] of TMyColumn = MyColumns + (
    (ColumnName: 'bla3'; FieldType: ftInteger)
  );
Ich mag nicht den Quellcode für alle vordefinierten Columns kopieren müssen nur weil ich eine Spalte mehr in dem zweiten Array habe.
Also nicht so:
Delphi-Quellcode:
const
  My_ColumnsEx: array[0..3] of TMyColumn = (
    (ColumnName: 'bla0'; FieldType: ftInteger),
    (ColumnName: 'bla1'; FieldType: ftInteger),
    (ColumnName: 'bla2'; FieldType: ftInteger),
    (ColumnName: 'bla3'; FieldType: ftInteger)
  );
Hat jemand eine Idee?
  Mit Zitat antworten Zitat