ما هو الكود لوضع صوره في الفورمز؟

السلام عليكم

اكتب الكود التالى فى تريجر WHEN-NEW-FORM-INSTANCE على مستوى البلوك

Declare 
pic_path varchar2(300); 
pic_item item; 
Begin 
:System.Message_Level := '25'; 

pic_path := 
GET_FILE_NAME(NULL,NULL, 'BMP Files (*.BMP)|*.BMP|', NULL, 
OPEN_FILE, TRUE ); 

pic_item := FIND_ITEM('A1'); --هذا الكود لا تغير فية شى التغير يكون فى اسم الايتم فقط الذى تضع فية الصورة وهو (A1
IF Id_Null(PIC_ITEM) THEN 
Message('No such item: '||ITEM_NAME ); 
END IF; 


READ_IMAGE_FILE(pic_path,'BMP',pic_item); 
end ; 

السلام عليكم ورحمة الله وبركاته

READ_IMAGE_FILE('LOGO.GIF', 'GIF', 'BLK_HEADER.IMG_LOGO');

اخي فى الله
نلاحظ فالسابق ما يلي:
اولا: logo.gif دا اسم الصورة + الامتداد(ملحوظه نقوم بتغير الامتداد حسب نوع الصورة)
طبعا لما تقوم بوضع الصورة في نفس مجلد الشاشات ان شاء الله لن تحتاج لتحديد المسار الخاص بالصورة
ثانيا: gif دا امتداد الصورة ويمكن تغيره حسب نوع الصورة الى bmp or jpg
ثالثا : BLK_HEADER.IMG_LOGO دا اسم الحقل اللى عايز الصورة تظهر فيه وطبعا ان شاء الله هيكون item type يعني نوع الحقل = image
ويمكن وضع الكود ده في تريجر WHEN-NEW-FORM-INSTANCE اوكيه بحيث انك اول ماتفتح الشاشة تشتغل

ملحوظه :
دا شئ مبوسط طبعا للكود يمكن تطويره

لو محققش ما تتمناه فالرجاء توضيح ما تريده بالظبط حتي نتمكن من مساعدتك