در صورت ایجاد ابجکت ها در زمان اجرا در داخل اسکرول باکس پرش به وجود می اید میتوان با گذاشتن یک پنل و یک اسکرول بار روی فرم و نوشتن کد زیر برای اسکرول این کار را شبیه سازی نمایید . همچنین یک متغیر ایکس سراسری تعریف و در زمان ایجاد فرم برابر با صفر گذاشته شود .
procedure TForm1.ScrollBar1Scroll(Sender: TObject; ScrollCode: TScrollCode;
var ScrollPos: Integer);
begin
if ScrollPos>x then
Panel1.ScrollBy(0, -ScrollPos);
if ScrollPos<x then
Panel1.ScrollBy(0, ScrollPos);
panel1.repaint;
x:=ScrollPos;
end;
سلام. راستش می خواستم یه وبلاگ برنامه نویسی بزنم. واسه همین داشتم نام های مختلف رو امتحان می کردم یکی از اونا این بود. البته انتظار داشتم که پر شده باشه اما گفتم لابد یکی از همون وبلاگایی هست که فقط ساخته شده هیچی نداره یا خیلی وقته دیگه توش مطلب گذاشته نمی شه. اما وقتی دیدم انقدر فعاله حال کردم. انشاالله موفق باشی. به نظر می رسه با دلفی خیلی کار می کنی. منم با پایتون کار می کنم. سایتت رو همینجور به روز و موفق نگه دار.