help needed : Typed CONSTANTs

[AthenaOfDelphi]

Do something like this:-

Type
  TMyType = record
    name: string;
    data1: integer;
    data2: string;
  end;

Const
  MY_DATA : array[0..1] of TMyType = (
    (name:'Fred'; data1:10; data2:'Favourite colour'),
    (name:'Borris';  data1:16; data2:'Mother''s maiden name')
  );

[sunscarab]

thanks a lot! :-)