▒ "سوالات،مشکلات و پیشنهادات ساخت نرم افزار های مذهبی" ▒

اما يك سوال ديگر.
بعضي عكس ها مثل بنر-دكمه exit و دكمه بازگشت لازم هست كه در تمام صفحه وجود داشته باشد.براي اين كار راهكاري وجود ندارد كه با يك كد اون عكس يا دكمه در تمام صفحات به وجود بياد و قرار داشته باشه؟؟؟؟

درمورد این کد که تو on show هست شما به تعداد عکس هاتون کپی کنید و فقط شماره متغیر و عکس را بنویسید.
مثل :

<br />
img_top1 = Image.GetPos("Image1").Y;<br />
img_top2 = Image.GetPos("Image2").Y;<br />
img_top3 = Image.GetPos("Image3").Y;<br />
img_top4 = Image.GetPos("Image4").Y;<br />
img_top5 = Image.GetPos("Image5").Y;<br />
...

imgpos1 = Image.GetPos("Image1");<br />
Image.SetPos("Image1", imgpos1.X, -e_Pos+img_top1);<br />
imgpos2 = Image.GetPos("Image2");<br />
Image.SetPos("Image2", imgpos2.X, -e_Pos+img_top2);<br />
imgpos3 = Image.GetPos("Image3");<br />
Image.SetPos("Image3", imgpos3.X, -e_Pos+img_top3);<br />
imgpos2 = Image.GetPos("Image4");<br />
Image.SetPos("Image4", imgpos4.X, -e_Pos+img_top4);

من یک کد قرار میدم که در اون دو عمل متفاوت رفتن به یک صفحه و بستن برنامه را دادم.

selitem = ComboBox.GetSelected("ComboBox1");<br />
itemdata = ComboBox.GetItemData("ComboBox1", a);<br />
if itemdata == "Page2" then<br />
Page.Jump("Page2");<br />
elseif itemdata == "close" then<br />
Window.Close(Application.GetWndHandle(), CLOSEWND_SENDMESSAGE);<br />
end

بري بك گراند از درج تصوير استفاده ميكنم.
مورد دوم درست شد با كليد هاي ctrl+c و ctrl+v
البته درصورتي كه روي عكس نباشد و صفحه خالي باشد پيس وجود دارد.بايد در يك جاي خالي پيس كرد و بعدش گذاشت در جاي دلخواه روي بك گراند.

من طبق اين توضيحات و فيلم اموزشي پيش رفتم.اما خطاي زير را داد.

img_top1 = Image.GetPos("Image2").Y;<br />
img_top1 = Image.GetPos("Image3").Y;

و كد قسمت on poc change

<br />
imgpos2 = Image.GetPos("Image2");<br />
Image.SetPos("Image2", imgpos2.X, -e_Pos+img_top2);<br />
imgpos3 = Image.GetPos("Image3");<br />
Image.SetPos("Image3", imgpos3.X, -e_Pos+img_top3);
<br />

img_top1 = Image.GetPos("Image1").Y;<br />
img_top2 = Image.GetPos("Image2").Y;

imgpos1 = Image.GetPos("Image1");<br />
Image.SetPos("Image1", imgpos1.X, -e_Pos+img_top1);<br />
imgpos3 = Image.GetPos("Image2");<br />
Image.SetPos("Image2", imgpos2.X, -e_Pos+img_top2);

تو عکس اسم تصاویر شما Image1 و Image2 هست اما تو کد هاتون Image3 اوردین در ضمن باید هر خط در on show اعدادش یکی باشه و در کد اسکرول یار هر دو خط.
در on show :

img_top1 = Image.GetPos("Image1").Y;<br />
img_top2 = Image.GetPos("Image2").Y;

خب حالا اون کدی را که گفتم میذارم برای پروژه هایی که تعداد عکسشون زیاده.
تو on show :

imgpos_y={}<br />
for imgpos_y_n=1,4 do<br />
img_topt = Image.GetPos("Image"..imgpos_y_n).Y;<br />
Table.Insert(imgpos_y, imgpos_y_n, img_topt);<br />
end

imgpos={}<br />
for imgpos_n=1,4 do<br />
imgPos = Image.GetPos("Image"..imgpos_n);<br />
Table.Insert(imgpos, imgpos_n, imgPos);<br />
end<br />
for SetPos=1,4 do<br />
Image.SetPos("Image"..SetPos, imgpos[SetPos].X, -e_Pos+imgpos_y[SetPos]);<br />
end

imgpos_y={}<br />
for imgpos_y_n=1,تعداد عکس ها do<br />
img_topt = Image.GetPos("Image"..imgpos_y_n).Y;<br />
Table.Insert(imgpos_y, imgpos_y_n, img_topt);<br />
end

imgpos={}<br />
for imgpos_n=1,تعداد عکس ها do<br />
imgPos = Image.GetPos("Image"..imgpos_n);<br />
Table.Insert(imgpos, imgpos_n, imgPos);<br />
end<br />
for SetPos=1,تعداد عکس ها do<br />
Image.SetPos("Image"..SetPos, imgpos[SetPos].X, -e_Pos+imgpos_y[SetPos]);<br />
end

ممنونم از شما جناب نوروز و همينطور سر كار خانوم افلاكيان عزيز.
جناب نوروز خانوم افلاكيان قبلا در مورد پلاگينgif بهمن كمك هايي كردند.ولي يك مشكلي كه در نرم افزار من هست.سرعت زياد نسبتا زياد بنر ها و عكس هاي متحرك هست.
در يكي از سايت هاي مربوط به اتوپلي چندت ااز دوستان گفتند شايد بخاطر ورژن نرم افزار باشه.من ورژن رو هم عوض كردم.ولي باز تغييري نكرد.
سرعت عكس هارو هم كم كردم.ولي باز درست نشد.
براي اين موضوع بايد چيكار كنم؟؟؟

از پروژه خروجي exeگرفتم.ولي اجرا نميشه.
براتون ميذارم نگاه كنيد.
(عكسي كه گذاشتم.سرعتش تو خود كامپيوتر نصف سرعت تو نمايش برنامه هست.)
http://s2.picofile.com/file/7340895264/gif.apz.html
خروجي 5 مگ شده.تنها يك عكس:Gig::Gig:
http://s1.picofile.com/file/7340897739/gif.exe.html

سلام خانوم افلاكيان.
من با 20 تا تصوير اين كارو كردم.كه حداقل 10 تاي ان رو خودم درست كردم و با سرعت كم(10ثانيه اي) كه در خود برنامه مشاهده عكس 30 انيه طول ميكشه تا حركت كنه.تو برنامه سريع هست.

احتمالا دلیلش نرم افزاری هست که gif هاتون را میسازید.
از لگوهای آماده مثل بنرهای آسک دین تست کنید نتیجه را بگید.

گفتم كه جناب نوروز از چندين بنر مختلف استفاده كردم.ولي باز همينطوري بود.
باز هرچي شما بفرماييد.بنر اسك دين رو از كجا بگيرم؟؟؟؟؟

اینم بنر اسک دین.با این بنر تست کنید.

برا منم ظاهرا اینجوری ولی چون مهم نبوده توجه نکردم.
فعلا من دو تا راه پیشنهاد میدم:
1- استفاده از sider show (اموزشش هست)
2- استفاده از timer (اگه خواستین تا بگم)

جناب نوروز اموزش اول رو كه من پيدا نكردم. لطفا صفحه و ادرس تاپيك رو بفرماييد(نه دراين تاپيك بود نه در تاپيك اموزش)
در مورد تايمر خانوم افلاكيان يك سري كد در همينجا اموزش دادن.نميدانم منظور شما هم همينا هست يا جور ديگر

سلام خانوم افلاكيان در مورد اموزش sider show در AMS
خوب اون سه تا تصوير كه به شكل ستاره در نظر بگيريم رو شما خودتان درست كرديد؟؟؟؟؟؟
مثلا اشكال ديگر بخواهيم بايد خودمان در فتوشاپ شه تا عكس درست كنيم؟؟؟

مورد بعد در مورد كادر صفحه هشت كه متن روش قرار ميديد.من زياد به صورت حرفه اي بلد نيستم با فتوشاپ كار كنم. اين صفحات در سايتي وجود ندارند تا از انها استفاده كنيم؟؟؟

منظورم مثل اين عكس هست
در نرم افزار ديگه يك برگه كاغذ بود اگر اشتباه نكنم.

خانوم افلاكيان.
اقاي نوروز گفتند siger show نه sider show
براي همين در تاپيك ها اين موضوع نبود.
بعدش موضوعsider show در مورد يك جور افكت هست.و به بنر به نظرم مربوط نميشه.

سلام
افکت های تغیر صفحات رو چطوری میشه بیشتر کرد؟
در پناه مهدی عج...

سلام دو تا سوال
1.میخوام برای لیست باکسم امکان جستجو قرار بدم
2.می خوام اول اوتوران یک عکس بیاد و به طور خودکار بره
در پناه مهدی عج...

for i=1,30 do<br />
Page.StartTimer(3000+10*i, i);<br />
end

for j=1,30 do<br />
if e_ID==j then<br />
Image.SetOpacity("Image1", 100-3.3*j);<br />
Page.StopTimer(j);<br />
end<br />
end<br />
if e_ID==31 then<br />
Image.SetVisible("Image1", false);<br />
end

Page.StartTimer(3000, 1);<br />

if e_ID==1 then<br />
Image.SetVisible("Image1", false);<br />
end

سلام خانوم افلاکیان
ببخشید ولی من هیچی از این لینکی که دادید نفهمیدم...
یا علی

inpt = Input.GetText("Input1");<br />
if inpt == "" then<br />
result = Dialog.Message("Notice", "متن جستجو را وارد کنید", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);<br />
end<br />
res = Input.GetText("Input1");<br />
ult =  ListBox.FindItem("ListBox1", -1, LB_BYTEXT, "*"..res.."*");<br />
if ult~=-1 then<br />
ListBox.SelectItem("ListBox1", ult);<br />
Page.SetFocus("ListBox1");<br />
else<br />
Dialog.Message("Notice", "متن مورد نظر یافت نشد", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);<br />
Input.SetText("Input1", "");<br />
Page.SetFocus("Input1");<br />
end

سلام خانوم افلاكيان.
من براي ليست اهنگ.بايد چيكار كنم تا با باز شدند برنامه.اهنگ اول به صورت اتوماتيك پخش بشود ؟؟؟

<br />
play = ComboBox.GetItemData("ComboBox1", 1);<br />
Audio.Load(CHANNEL_USER1, "AutoPlay\\Audio\\"..play..".ogg", true, false);</p>
<p>Audio.Play(CHANNEL_USER1);

جناب نوروز و خانوم افلاكيان
با عرض تبريك روز 13 عيد.
ميخواستم بدونم براي اپديت و به روز رساني پروژه ها راهكاري پيدا كرديد؟؟؟؟

واجب كه بله واجب هست.چون هرماه ميخوام نرم افزار به روز باشه.و از اول درست كردند صفحات-دكمه ها بخش ها ووو سختي خودش را دارا هست.
ممنون ميشم ازتون اگه راهنمايي كنيد.

عكس پروژه هاي كه دارم روش كار ميكنم رو در اينجا قرار ميدم.
تبليغات انجام شده همه گي رايگان ميباشد.
و براي تقدير تشكر از سايت اسك دين بنر اين سايت و معرفي كامل ان در برنامه وجود خواهد داشت.
با تشكر

با سلام خدمت شما خانوم افلاكيان
خروجي برنامه را به چه صورتي ميخواهيد؟؟؟(فرمت ان)