>>284 のDelフサギコさんのやつをいじっているのですが

procedure TForm1.Button1Click(Sender: TObject);
var
 NodeIntf: INodeData;
 NodeComp: TNodeComponent;
begin
 NodeComp := TNodeComponent.Create(nil);
 NodeIntf := NodeComp;
 Button1.Caption := NodeIntf.ColumnText[0];
 NodeComp.Free;
end;
エラーになりません
なぜでしょうか?