아래와 같은 델파이 코드를 빌더로 고칠때 " is" 부분을 어떻게 처리해 주어야 하나요?

procedure TForm1.ControlBar1GetSiteInfo(Sender: TObject; DockClient: TControl; var InfluenceRect: TRect; MousePos: TPoint; var CanDock: Boolean);
begin
if Not (DockClient is TToolBar) then
　　Candock := False;
end ;