السلام عليكم ورحمة الله وبركاته
افتح صفحة جديدة ..........
ضع في مجلد الصور هذه الصورة
ضع 3 من عنصر البارغراف و اجعل عرضه متوافقا مع المسافة بين الاصبعين و يظهر كانه يمسك الاطار الاسود
و اجلعهم الواحد اسفل الاخر
في الحدث on preload ضع الكوذ التالي
في المقفوفة igli ضع ما تريده من معلومات الجينيرك من اعدا و نقديم
الان في on show
الان في ontimer
ثم ضف صقحة ثانية و اجعل فيها باراغاف او ليبال فيه الترحيب
معاينة
افتح صفحة جديدة ..........
ضع في مجلد الصور هذه الصورة
ضع 3 من عنصر البارغراف و اجعل عرضه متوافقا مع المسافة بين الاصبعين و يظهر كانه يمسك الاطار الاسود
و اجلعهم الواحد اسفل الاخر
في الحدث on preload ضع الكوذ التالي
PHP Code:
Image.SetPos("Image1",- Image.GetSize("Image1").Width , - Image.GetSize("Image1").Height);
pos={}; for i=1,3 do pos[i] = Paragraph.GetPos("Paragraph"..i) end
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").X, Page.GetSize().Height)
igli = {
"أأںأ‘أ‰ : أˆأ¥أ‡أˆ أڑأˆأڈ أ‡أ،أ¥أ‡أڈأ*",
"أٹأ•أ£أ*أ£ : أƒأˆأ¦ أ‚أ،أ‡أپ",
"أٹأŒأ‘أ*أں: أ‡أ،أٹأ‡أ*أ£أ‘ أأ* أ‡أ،أ‡أ¦أٹأ¦أˆأ،أ‡أ*",
"أ‡أڑأڈأ‡أڈ : أ‡أ،أˆأ‡أ‘أ›أ‘أ‡أ",
"أژأ،أأ*أ‡أٹ : أˆأ*أ–أ‡أپ",
" أٹأچأ‘أ*أں: أٹأ‡أ*أ£أ‘",
"أ‡أںأ¦أ‡أڈ : أٹأ‡أ*أ£أ‘أ¦ أ‡أ¦أ¤أ”أ‡أ¦",
"أ‡أ،أ£أڑأ،أ¦أ£أ‡أٹ : أأ* أˆأڈأ‡أˆأ‰ أ‡أ،أ•أأچأ‰",
"أ‡أ،أ¦أأ¦أڈ : أ‡أ،أ•أ،أ‡أ‰ أڑأ،أ¬ أ‡أ،أ¤أˆأ*",
"أ‡أ،أ£أ‡أپ : أ‡أ،أٹأ“أˆأ*أچ أ¦ أ‡أ،أٹأچأ£أ*أڈ",
"أ‡أژأ‘أ‡أŒ : أ•أڈأأ‰ أŒأ‡أ‘أ*أ‰",
"أ“أ‡أ†أ : أ‡أ،أٹأ¦أںأ، أڑأ،أ¬ أ‡أ،أ،أ¥",
"أ£أ“أ‡أڑأڈ : أ‡أ،أ£أ،أںأ*أ¤",
"أ‡أ”أ‘أ‡أ أڑأ‡أ£ : أ‘أأ*أˆ أ¦ أڑأٹأ*أڈ",
"2017 / 2018" }
الان في on show
PHP Code:
x=1; y=1;
Page.StartTimer(10,x);
for i = 1,3 do
Paragraph.SetText("Paragraph"..i, igli[y]) ; y=y+1
end
PHP Code:
if e_ID == 1 then
if Paragraph.GetPos("Paragraph"..x).Y >= pos[1].Y then
Page.StopTimer(1); Page.StartTimer(10, 4);
x=2;
else
Paragraph.SetPos("Paragraph"..x, Paragraph.GetPos("Paragraph"..x).X, Paragraph.GetPos("Paragraph"..x).Y+5)
Image.SetPos("Image1",Paragraph.GetPos("Paragraph"..x).X-228, Paragraph.GetPos("Paragraph"..x).Y-56)
end
end
if e_ID == 2 then
if Paragraph.GetPos("Paragraph"..x).X >= pos[2].X then
Page.StopTimer(2);
Page.StartTimer(10, 4); x=3;
else
Paragraph.SetPos("Paragraph"..x, Paragraph.GetPos("Paragraph"..x).X+5, Paragraph.GetPos("Paragraph"..x).Y)
Image.SetPos("Image1",Paragraph.GetPos("Paragraph"..x).X-228, Paragraph.GetPos("Paragraph"..x).Y-56)
end
end
if e_ID == 3 then
if Paragraph.GetPos("Paragraph"..x).Y <= 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").X, Page.GetSize().Height)
if y > #igli then Page.Jump("Page2") end
for i = 1,3 do
Paragraph.SetText("Paragraph"..i, igli[y]) ; y=y+1;
end Label.SetText("Label1", y) ;
Application.Sleep(500);
Page.StartTimer(10, 4); x=1;
else
Paragraph.SetPos("Paragraph"..x, Paragraph.GetPos("Paragraph"..x).X, Paragraph.GetPos("Paragraph"..x).Y-5)
Image.SetPos("Image1",Paragraph.GetPos("Paragraph"..x).X-228, Paragraph.GetPos("Paragraph"..x).Y-56)
end
end
if e_ID == 4 then
if Image.GetPos("Image1").Y >= Page.GetSize().Height then
Page.StopTimer(4);
if y < #igli+3 then Page.StartTimer(10, x); end
else
Image.SetPos("Image1",Image.GetPos("Image1").X , Image.GetPos("Image1").Y+5)
end
end
معاينة
