Wie erkenne ich ob eine Zelle im array gefüllt ist?

[fauxx]

Delphi-Quellcode:

var a: array [1..2, 1..2] of Integer;
begin
 a[1,1] := 3;
 showmessage(inttostr(a[1,1])); //gibt 3 aus...
 showmessage(inttostr(a[2,1])); //gibt bei mir (wieso auch immer) 201654148 aus
end;