아래와 같은 소스가 있습니다.

var
  b, b2: Tbitmap;
begin
  b := tbitmap.create;
  b2 := b;
  b.free; //비트맵해제
  //{이곳에 판단식을 넣고싶습니다.}
  b2.free; //당연히 에러

b2를 해제하기 전에 b2주소에 있는 비트맵(혹은 다른 클래스)이 이미 해제되어있는 상태인지

판단할 수 있는 방법이 있나요?