04-01-2013, 05:50 AM
السلام عليكم ورحمة الله وبركاتة
لدي هذا الكود في الحدث OnMouseDown في مكون Image ووضعت فيه هذا الكود
ملاحظة : الصورة التي أريـ د تحميلها موجودة في نفس مجلد البرنامج وهذا مسارها ( Picture\ModePunka.jpg ) واسم مجلد البرنامج 'Test'
تظهر لي رسالة انه لم يتعرف على هذا الملف او لم يجده
علماً اني جربت نفس الكود في Delphi 7 وهو يعمل بشكل سليم .. لذلك اضن الطريقة تختلف قليلاً في XE3 كما شاهدت في بعض الاكود
وعندما استعملن ملف السماعدة الموجود في XE3 اشاار إلي بهذا الكود
فعلا الكود يعمل ... لكن كودي لا يعمل فأين المشكلة في الكود الخاص بي ؟
وشكراً لحسن القرائة
لدي هذا الكود في الحدث OnMouseDown في مكون Image ووضعت فيه هذا الكود
كود :
procedure TMain.imgFogeMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
imgFoge.Picture.LoadFromFile('Picture\ModePunka.jpg');
end;تظهر لي رسالة انه لم يتعرف على هذا الملف او لم يجده
علماً اني جربت نفس الكود في Delphi 7 وهو يعمل بشكل سليم .. لذلك اضن الطريقة تختلف قليلاً في XE3 كما شاهدت في بعض الاكود
وعندما استعملن ملف السماعدة الموجود في XE3 اشاار إلي بهذا الكود
كود :
OpenPictureDialog1.Execute();
imgFoge.Picture.LoadFromFile(String(OpenPictureDialog1.FileName));فعلا الكود يعمل ... لكن كودي لا يعمل فأين المشكلة في الكود الخاص بي ؟
وشكراً لحسن القرائة