读书人

下面这两句代码是什么意思? 多谢

发布时间: 2012-03-17 19:06:28 作者: rapoo

下面这两句代码是什么意思? 谢谢

Delphi(Pascal) code
  IntersectRect(DstRect, RecRect, ViewRect);  if not EqualRect(DstRect, RecRect) then begin    with frmIFFormDesign.isbForm do begin      HorzScrollBar.Position := RecRect.Left - Floor((ClientWidth  - (RecRect.Right  - RecRect.Left)) / 2);      VertScrollBar.Position := RecRect.Top  - Floor((ClientHeight - (RecRect.Bottom - RecRect.Top))  / 2);    end;  end;


最后两句是什么意思 ?
Delphi(Pascal) code
     HorzScrollBar.Position := RecRect.Left - Floor((ClientWidth  - (RecRect.Right  - RecRect.Left)) / 2);     VertScrollBar.Position := RecRect.Top  - Floor((ClientHeight - (RecRect.Bottom - RecRect.Top))  / 2);


[解决办法]
横向滚动条及竖向滚动条位置定位
[解决办法]
我不知道你的函数是怎么定义的!呵呵,这可能还是要靠你自己认真看看

读书人网 >C#

热点推荐