السلام عليكم ورحمة الله وبركاتة
سيدي الفاضل
لقد قمت بتجربة عمل قائمة والحمد لله وفقت وكان التوفيق انتم السبب فيه ولكم موضوع تغير الخط وحجمة في Pad لم يتم بنجاح مع العلم انني قمت بنفس الطريقة التي شرحتها وهو كالتالي
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE PAD _2ca0ydiwg1 OF _MSYSMENU PROMPT "Product" COLOR SCHEME 3 FONT "", 20 font "Perpetua Titling MT",18 ;
KEY ALT+P, ""
DEFINE PAD _2ca0ydiwg2 OF _MSYSMENU PROMPT "Supplier" COLOR SCHEME 3 FONT "", 20 font "Perpetua Titling MT",18 ;
KEY ALT+S, ""
DEFINE PAD _2ca0ydiwg OF _MSYSMENU PROMPT "OUT" COLOR SCHEME 3 FONT "", 18 ;
KEY ALT+O, ""
DEFINE PAD _2ca0ydiwh OF _MSYSMENU PROMPT "IN" COLOR SCHEME 3 font "Perpetua Titling MT",18 ;
KEY ALT+I, ""
DEFINE PAD _2ca0ydiwi OF _MSYSMENU PROMPT "FIND" COLOR SCHEME 3 font "Perpetua Titling MT",18 ;
KEY ALT+F, ""
DEFINE PAD _2ca0ydiwj OF _MSYSMENU PROMPT "REPOR" COLOR SCHEME 3 font "Perpetua Titling MT",18 ;
KEY ALT+R, ""
DEFINE PAD _2ca0ydiwk OF _MSYSMENU PROMPT "EXIT" COLOR SCHEME 3 font "Perpetua Titling MT",18 ;
KEY ALT+E, ""
ON PAD _2ca0ydiwg1 OF _MSYSMENU ACTIVATE POPUP Product
ON PAD _2ca0ydiwg2 OF _MSYSMENU ACTIVATE POPUP Supplier
ON PAD _2ca0ydiwg OF _MSYSMENU ACTIVATE POPUP out
ON PAD _2ca0ydiwh OF _MSYSMENU ACTIVATE POPUP in
ON PAD _2ca0ydiwi OF _MSYSMENU ACTIVATE POPUP find
ON PAD _2ca0ydiwj OF _MSYSMENU ACTIVATE POPUP repor
ON SELECTION PAD _2ca0ydiwk OF _MSYSMENU QUIT
DEFINE POPUP Product MARGIN RELATIVE SHADOW COLOR SCHEME 4 font "Perpetua Titling MT",12
DEFINE BAR 1 OF Product PROMPT "Product"
ON SELECTION BAR 1 OF Product DO FORM product5
DEFINE POPUP Supplier MARGIN RELATIVE SHADOW COLOR SCHEME 4 font "Perpetua Titling MT",12
DEFINE BAR 1 OF Supplier PROMPT "Supplier"
ON SELECTION BAR 1 OF Supplier DO FORM sup5
السؤال الثاني كيفية ربط ااتقارير مثل ربط الفورم او في اختلاف حيث لم استطيع عمل ربط لها
ولكم جزيل الشكر
ارجو الإفادة
