[san-46]

Например, так:

Код:

procedure TWebStaticText.CMMouseEnter(var Message: TMessage);
begin
  Cursor := crHandPoint;
end;

procedure TWebStaticText.CMMouseLeave(var Message: TMessage);
begin
  Cursor := crDefault;
end;