ارور دلفی 5 در خواندن کد

سلام
کد زیر که ظاهرا نباید مشکلی داشته باشدموقع اجرا با دلفی5 ارور میدهد
[HTML]procedure TForm1.Button2Click(Sender: TObject);
begin
if OpenPictureDialog1.Execute then
begin
SecondForm.Image1.Picture.LoadFormFile(OpenPicture Dialoge1.FileName);
SecondForm.Show;
end;
end.
[/HTML]
ارورش هم دقیقا روی نقطه هاست مثلا روی نقطه ی این خط ارور میدهد if OpenPictureDialog1.Execute then دلیلش چیه؟:41:

سلام. خوش آمدید
پیغام خطا رو بنویسید

نقل قول:

---

نوشته شده توسط egg-head [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

سلام
کد زیر که ظاهرا نباید مشکلی داشته باشدموقع اجرا با دلفی5 ارور میدهد
[HTML]procedure TForm1.Button2Click(Sender: TObject);
begin
if OpenPictureDialog1.Execute then
begin
SecondForm.Image1.Picture.LoadFormFile(OpenPicture Dialoge1.FileName);
SecondForm.Show;
end;
end.
[/HTML]
ارورش هم دقیقا روی نقطه هاست مثلا روی نقطه ی این خط ارور میدهد if OpenPictureDialog1.Execute then دلیلش چیه؟:41:

---

کمترین چیزی که میشه توش دید اینه که یک End; کم گذاشتین.
ولی اگه مشکلتون حل نشد، لطفا Error رو هم بنویسین. موفق باشی.