const array of TPoint declarieren

[jaenicke]

Das geht relativ einfach, aber die Syntax ist nicht intuitiv, die muss man kennen:

Delphi-Quellcode:

const
  POS: array[0..1, 0..1] of TPoint=
    (
      (
        (X: 1; Y: 2),
        (X: 3; Y: 4)
      ),
      (
        (X: 5; Y: 6),
        (X: 7; Y: 8)
      )
    );