هل من الممكن أن يعطينى أحدكم طريقة عمل كلمة متحركة؟

أى مثلا كلمة أهلا أريدها أن تتحرك

السلام عليكم
لعمل كلمة متحركة
سوف تقوم بانشاء Timer
بعد ذلك في when-timer-expired trigger
تقوم بتحديد اذا كنت تريد تحريك النص طولي او عرضي
وذلك باستخدام set_item_property
والتحكم في خاصية x_pos or Y_pos
حسب الجهة التي تريد تحريك النص بها
وعند تنفيذ الفورم ستلاحظ تغير موضع النص عند مرور وقت التيمر مما يجعلة يبدو كأنة يتحرك
ملاحظة: ممكن تقليل وقت التيمر لكي يتحرك النص بسرعة

عفوا أريد أيضا طريقة إنشاء timer

أريد جـــميع الخطوات كاملــــــة
شـــــكـــــرا

when-new-form-instance
--------------------------------------------
declare
timer_id Timer;

begin
Timer_ID:=create_timer('MESSAGE_TIMER',100,REPEAT);


end;

----------------------------------------------------------
on trigger
WHEN-TIMER-EXPIRED
----------------------------------------------------
DECLARE
XX NUMBER;
BEGIN
XX := GET_ITEM_PROPERTY('MAIN_FORM.DEFECT',Y_POS);
SET_ITEM_PROPERTY('MAIN_FORM.DEFECT',Y_POS,XX+10);
END;

ممتاااااااااااااااااااز تيمور

ارجو اعلامي في حالة وجود عقبة في الكود

الكود شغال لكن عندما تصل الكلمة إلة نهاية الcanvas
تظهر رسالة cannot move item invalid position
أريد كود يرجع الكلمة لأول الcanvas

السلام عليكم
الموضوع بيتهيألي بقي سهل
كل اللي عليك تعمل
IF CONDITION
انة لو
GET_ITEM_PROPRTY
بيساوي احصائيات اخر الفورم
يخلية يروح تاني لأول الفورو
ويارب تكون واضحة

أنا أسف لكن أرجوك إكتب لى الكود شــــــــكــــــــرا

تيمور هل من الممكن أن تكتب لى الكود get_item_propertyو تحدد فى أى trigger


شـــــــــــــــــــكـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــرا

ON TRIGGER
WHEN-TIMER-EXPIRED
U SHOULD CHECK THIS
IF GET_ITEM_PROPERTY(UR_TEXT_NAME,X_POS)=500 THEN
SET_ITEM_PROPERTY(UR_TEXT_NAME,X_POS,10)
END IF;

لم تعمل الكود