Because I wasn't seeing it and getting more and more confused so I decided to take the easy way out.
I put it down, had a coffee, and came back to it.
I now have it..
type
TForm26 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
type
TLabelRecord = record
iValue: Integer;
iColor: Integer;
end;
type
TLabelMatrix = array[1..12, 1..7] of TLabelRecord;
public
{ Public declarations }
end;
var
Form26: TForm26;
implementation
{$R *.dfm}
procedure TForm26.Button1Click(Sender: TObject);
var
LabelRecord1, LabelRecord2: TLabelRecord;
LabelMatrix: TLabelMatrix;
begin
LabelRecord1.iValue:= 123;
LabelRecord1.iColor := 234;
LabelMatrix[1,1] := LabelRecord1;
//
LabelRecord2 := LabelMatrix[1,1];
ShowMessage('Value = '+LabelRecord2.iValue.ToString);
ShowMessage('Color = '+LabelRecord2.iColor.ToString);
//
end;
Thank you for your patience & guidance.
Ian