1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:

unit Unit1;

interface

type
  T_Bundesland = record
    Originalname: String;
    Alternatives: Array[0..4] of String;
  end;

implementation

const

  Max_Bundesland = 16;

  Bundesland: array[1..Max_Bundesland] of T_Bundesland =
    ('Baden-Württemberg') ('Baden-Württemberg', 'Baden-Wuerttemberg', 'Baden Württemberg', 'Baden Wuerttemberg')),					

1:
2:

  Bundesland: array[1..Max_Bundesland] of T_Bundesland =(
    (Originalname: 'Baden-Württemberg'; Alternatives: ('Baden-Württemberg', 'Baden-Wuerttemberg', 'Baden Württemberg', 'Baden Wuerttemberg')),