Вопрос Delphi 7 правильно ли я написал условие ?

[cergoo]

да тут есть ошибка. но подскажите как в таких случаях написать правильно !
begin
if Panel1.OnClick then Panel1.BorderStyle:= bsSingle
else Panel1.BorderStyle:= bsNone;
end;