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

اريد ان اعمل زر عند الضغط عليه يختفي يظهر كانفس شريط الادوات وعند الضغط عليه مرة اخرى يختفي شريط الادوات

لاكن يطيني خطء في GET_CANVAS_PROPERTY:

إليكم الكود

Declare
my_cvs canvas;
Begin
    tol_canv:= find_canvas('ADVANS');
    if Get_CANVAS_Property(my_cvs,visible)='no'

     SET_CANVAS_PROPERTY(my_cvs, 'visible', 'YES');
end if;
End;

وبارك الله فيكم

DECLARE
my_cvs VIEWPORT;
BEGIN
my_cvs := FIND_VIEW('CANVAS3');

IF GET_VIEW_PROPERTY(my_cvs, VISIBLE) = 'FALSE' THEN
SHOW_VIEW(my_cvs);
ELSE
HIDE_VIEW(my_cvs);
END IF;
END;

أستخدم الـ GET_VIEW_PROPERTY لإيجاد حالة الـ Canvas واستخدم HIDE_VIEW و SHOW_VIEW لاخفاء واظهار الـ Canvas 

ايضا لابد من اضافة الشرط ELSE في لو كان الـ Canvas حالته VISIBLE (اي انه ظاهر) يقوم باخفائه

أيضا كنت ناسي THEN 

ربنا يعطيك الف عافية اخي repotec