X

تصميم جينيريك او مقدمة لمشروعك

Collapse
  • تصفية
  • الوقت
  • عرض
مسح الكل
مشاركات جديدة
  • VIP
    • Nov 2018
    • 78

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

    افتح صفحة جديدة ..........

    ضع في مجلد الصور هذه الصورة



    ضع 3 من عنصر البارغراف و اجعل عرضه متوافقا مع المسافة بين الاصبعين و يظهر كانه يمسك الاطار الاسود

    و اجلعهم الواحد اسفل الاخر

    في الحدث on preload ضع الكوذ التالي

    PHP Code:
    Image.SetPos("Image1",- Image.GetSize("Image1").Width , - Image.GetSize("Image1").Height);
    pos={}; for i=1,do pos[i] = Paragraph.GetPos("Paragraph"..iend


    Paragraph
    .SetPos("Paragraph1"Paragraph.GetPos("Paragraph1").X,- Paragraph.GetSize("Paragraph2").Height)
    Paragraph.SetPos("Paragraph2",- Paragraph.GetSize("Paragraph2").Width Paragraph.GetPos("Paragraph2").Y)
    Paragraph.SetPos("Paragraph3"Paragraph.GetPos("Paragraph3").XPage.GetSize().Height)



    igli = {
    "أ*أںأ‘أ‰ : أˆأ¥أ‡أˆ أڑأˆأڈ أ‡أ،أ¥أ‡أڈأ*",
    "أٹأ•أ£أ*أ£ : أƒأˆأ¦ أ‚أ،أ‡أپ",
    "أٹأŒأ‘أ*أں: أ‡أ،أٹأ‡أ*أ£أ‘ أ*أ* أ‡أ،أ‡أ¦أٹأ¦أˆأ،أ‡أ*",
    "أ‡أڑأڈأ‡أڈ : أ‡أ،أˆأ‡أ‘أ›أ‘أ‡أ*",
    "أژأ،أ*أ*أ‡أٹ : أˆأ*أ–أ‡أپ",
    " أٹأچأ‘أ*أں: أٹأ‡أ*أ£أ‘",
    "أ‡أںأ¦أ‡أڈ : أٹأ‡أ*أ£أ‘أ¦ أ‡أ¦أ¤أ”أ‡أ¦",
    "أ‡أ،أ£أڑأ،أ¦أ£أ‡أٹ : أ*أ* أˆأڈأ‡أˆأ‰ أ‡أ،أ•أ*أچأ‰",
    "أ‡أ،أ¦أ*أ¦أڈ : أ‡أ،أ•أ،أ‡أ‰ أڑأ،أ¬ أ‡أ،أ¤أˆأ*",
    "أ‡أ،أ£أ‡أپ : أ‡أ،أٹأ“أˆأ*أچ أ¦ أ‡أ،أٹأچأ£أ*أڈ",
    "أ‡أژأ‘أ‡أŒ : أ•أڈأ*أ‰ أŒأ‡أ‘أ*أ‰",
    "أ“أ‡أ†أ* : أ‡أ،أٹأ¦أںأ، أڑأ،أ¬ أ‡أ،أ،أ¥",
    "أ£أ“أ‡أڑأڈ : أ‡أ،أ£أ،أںأ*أ¤",
    "أ‡أ”أ‘أ‡أ* أڑأ‡أ£ : أ‘أ*أ*أˆ أ¦ أڑأٹأ*أڈ",
    "2017 / 2018" 
    في المقفوفة igli ضع ما تريده من معلومات الجينيرك من اعدا و نقديم

    الان في on show
    PHP Code:
    x=1y=1;
    Page.StartTimer(10,x);
    for 
    1,do
    Paragraph.SetText("Paragraph"..iigli[y]) ; y=y+1
    end 
    الان في ontimer

    PHP Code:
    if e_ID == 1 then
     
    if Paragraph.GetPos("Paragraph"..x).>= pos[1].Y then
     Page
    .StopTimer(1); Page.StartTimer(104);
     
    x=2;
     else
     
    Paragraph.SetPos("Paragraph"..xParagraph.GetPos("Paragraph"..x).XParagraph.GetPos("Paragraph"..x).Y+5)
     
    Image.SetPos("Image1",Paragraph.GetPos("Paragraph"..x).X-228Paragraph.GetPos("Paragraph"..x).Y-56)
     
    end
    end

    if e_ID == 2 then
     
    if Paragraph.GetPos("Paragraph"..x).>= pos[2].X then
     Page
    .StopTimer(2);
    Page.StartTimer(104); x=3;
     else
     
    Paragraph.SetPos("Paragraph"..xParagraph.GetPos("Paragraph"..x).X+5Paragraph.GetPos("Paragraph"..x).Y)
     
    Image.SetPos("Image1",Paragraph.GetPos("Paragraph"..x).X-228Paragraph.GetPos("Paragraph"..x).Y-56)
     
    end
    end


    if e_ID == 3 then
     
    if Paragraph.GetPos("Paragraph"..x).<= pos[3].Y then
     Page
    .StopTimer(3);
      
    Paragraph.SetPos("Paragraph1"Paragraph.GetPos("Paragraph1").X,- Paragraph.GetSize("Paragraph2").Height)
    Paragraph.SetPos("Paragraph2",- Paragraph.GetSize("Paragraph2").Width Paragraph.GetPos("Paragraph2").Y)
    Paragraph.SetPos("Paragraph3"Paragraph.GetPos("Paragraph3").XPage.GetSize().Height)
      if 
    #igli then Page.Jump("Page2") end

      
    for 1,do
      
    Paragraph.SetText("Paragraph"..iigli[y]) ; y=y+1;
      
    end Label.SetText("Label1"y) ;


    Application.Sleep(500);
    Page.StartTimer(104); x=1;
     else
     
    Paragraph.SetPos("Paragraph"..xParagraph.GetPos("Paragraph"..x).XParagraph.GetPos("Paragraph"..x).Y-5)
     
    Image.SetPos("Image1",Paragraph.GetPos("Paragraph"..x).X-228Paragraph.GetPos("Paragraph"..x).Y-56)
     
    end
    end

    if e_ID == 4 then
     
    if Image.GetPos("Image1").>= Page.GetSize().Height then
     Page
    .StopTimer(4);
      if 
    #igli+3 then  Page.StartTimer(10, x); end
     
    else
     
    Image.SetPos("Image1",Image.GetPos("Image1").Image.GetPos("Image1").Y+5)
     
    end
    end 
    ثم ضف صقحة ثانية و اجعل فيها باراغاف او ليبال فيه الترحيب

    معاينة

  • المسؤول الفني
    • Sep 2018
    • 19801

    #2
    يتبع:
    المشاركة الأصلية بواسطة عبد الهادي بهاب
    السلام عليكم ورحمة الله وبركاته

    الفكرة الثانية

    نضع صورتين التاليتين في مجلد الصور





    نضع لكل منهما بارغراف عرضه متوافق مع المسافة بين الاصبعين

    الان في on preload

    PHP Code:
    pos={}; for i=1,do pos[i] = Paragraph.GetPos("Paragraph"..iend


    Paragraph
    .SetPos("Paragraph2",- Paragraph.GetSize("Paragraph2").Width Paragraph.GetPos("Paragraph2").Y)
    Paragraph.SetPos("Paragraph1",  Page.GetSize().WidthParagraph.GetPos("Paragraph1").Y)

    Image.SetPos("Image2",- Image.GetSize("Image2").Width Image.GetPos("Image2").Y)
    Image.SetPos("Image1",  Page.GetSize().WidthImage.GetPos("Image1").Y)

    ali = {
    "أڑأˆأڈ أ‡أ،أ¥أ‡أڈأ*",
    "أڑأˆأڈ أ‡أ،أ‘أچأ£أ¤",
    "أ‡أ،أ¤أˆأ*",
    "أ‡أˆأ¤ أڑأˆأڈ أ‡أ،أ،أ¥",
    "أ‡أ£أ¤أ‰",
    "أچأڈأ*أŒأ‰" };

    igli = {
    "أ‡أژأ‘أ‡أŒ",
    "أ‡أڑأڈأ‡أڈ",
    "أ•أ،أ¦أ‡ أڑأ،أ¬",
    "أ£أچأ£أڈ",
    "أƒأ£أ¥",
    "أ’أ¦أŒأ¥" }; 
    بحيث نضع في المجموعة igli كلمات الاحراج و الاشارف و الاعادا و و و
    و في المجموعة ali نضع الاسماء

    في الحدث on show

    PHP Code:
    Page.StartTimer(10,1);
    y=1;
    Audio.Load(CHANNEL_NARRATION"AutoPlay\\Audio\\nahih.wma"true)

    Paragraph.SetText("Paragraph1"igli[y]);
    Paragraph.SetText("Paragraph2"ali[y]);
    y=y+
    وضع رابط الملف الموسيفي المارفق للمقدمة في audio

    الان في التايمر

    PHP Code:
    if e_ID == 1 then
     
    if Paragraph.GetPos("Paragraph1").<= pos[1].-10 then
     Page
    .StopTimer(1);
     
    Application.Sleep(1500);
     
    Paragraph.SetPos("Paragraph2",- Paragraph.GetSize("Paragraph2").Width Paragraph.GetPos("Paragraph2").Y)
     
    Paragraph.SetPos("Paragraph1",  Page.GetSize().WidthParagraph.GetPos("Paragraph1").Y)
     
    Image.SetPos("Image2",- Image.GetSize("Image2").Width Image.GetPos("Image2").Y)
     
    Image.SetPos("Image1",  Page.GetSize().WidthImage.GetPos("Image1").Y)
     
    Paragraph.SetText("Paragraph1"igli[y]);
     
    Paragraph.SetText("Paragraph2"ali[y]);
     
    y=y+1Label.SetText("Label1"y)
    if 
    >= #igli then  Page.Jump("Page2");  else  Page.StartTimer(10,1); end
     
    else
     
    Paragraph.SetPos("Paragraph1"Paragraph.GetPos("Paragraph1").X-5Paragraph.GetPos("Paragraph1").Y)
     
    Image.SetPos("Image1",Paragraph.GetPos("Paragraph1").X-110,Image.GetPos("Image1").Y)
     
    Paragraph.SetPos("Paragraph2"Paragraph.GetPos("Paragraph2").X+5Paragraph.GetPos("Paragraph2").Y)
     
    Image.SetPos("Image2",Paragraph.GetPos("Paragraph2").X-210Image.GetPos("Image2").Y)
     
    end
    end 
    لا تنسى وضع صفحة ثانية للترحيب

    معاينة
  • عضو مُشارك
    • Oct 2018
    • 32

    #3
    شكرا
    ​​​فكرة الرائعة اتمنى رفع المشروع
    ​​​لاسف لم استطع تطبيق الشرح
  • عضو فعال
    • Sep 2018
    • 376

    #4
    جزاك الله كل خير
Working...
X