اشکال در زمان جابجایی فرم

[behzadboloori]

من از نمونه کد زیر که قبلا با دلفی نوشته شده بود برای لرزاندن صفحه استفاده کردم ولی با خطا مواجه میشد. برای همین از یک تغییر مکان در صفحه شروع کردم.
کد زیر برای یکبار به درستی اجرا میشه ولی برای بار دوم خطا میده
int MAXDELTA = 5;
int SHAKETIMES = 100;

TRect *oRect;
TRect *wRect;
int deltax, deltay, cnt, dx, dy;
GetWindowRect(LoginForm->Handle,wRect);
oRect=wRect;
OffsetRect(wRect,50,50);
MoveWindow(LoginForm->Handle,wRect->Left,wRect->Top,wRect->Right - wRect->Left,wRect->Bottom - wRect->Top,true);


خطایی که میده Access violation در زمان نوشتنه. فکر میکنم باید یه حافظه ای رو آزاد کنم ولی نمیدونم باید چی رو آزاد کنم. لطفا کمکم کنین.

[behzadboloori]

کاش اقلا یکی از مدیران بخش یه کمکی میکردن. داشتم پستها رو نگاه میکردم. هر کی سوال کرده، حداکثر تعداد پاسخهاش به 5 تا هم نمیرسه. کاش اینجا اینقدر سوت و کور نبود.

[behzadboloori]

من اینو توی یه سایت خارجی پیدا کردم:

for(int i=0; i < 10; ++i)
{
this->Top = this->Top + 20;
Sleep(5);
this->Left = this->Left + 20;
Sleep(5);
this->Top = this->Top - 20;
Sleep(5);
this->Left = this->Left - 20;
Sleep(5);

}