Kral__ Posted July 17, 2013 Share Posted July 17, 2013 Arkadaşlar projemin kategori içerindeki sayfa değiştirme yerinde takıldım kodları veriyim; [spoiler] function sayfa(value) Paragraph.SetText("y1", "Watch !"); Paragraph.SetText("y2", "Watch !"); Paragraph.SetText("y3", "Watch !"); Paragraph.SetText("y4", "Watch !"); Paragraph.SetText("y5", "Watch !"); Paragraph.SetText("y6", "Watch !"); Image.Load("cvr1", "AutoPlay\\Images\\blank.png"); Image.Load("cvr2", "AutoPlay\\Images\\blank.png"); Image.Load("cvr3", "AutoPlay\\Images\\blank.png"); Image.Load("cvr4", "AutoPlay\\Images\\blank.png"); Image.Load("cvr5", "AutoPlay\\Images\\blank.png"); Image.Load("cvr6", "AutoPlay\\Images\\blank.png"); Image.SetEnabled("shdw1", true); Image.SetEnabled("shdw2", true); Image.SetEnabled("shdw3", true); Image.SetEnabled("shdw4", true); Image.SetEnabled("shdw5", true); Image.SetEnabled("shdw6", true); nKtgr = Label.GetText("ktgr"); nSec = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", "Adet", "Say"); Label.SetText("syf", nSec); nX = Paragraph.GetText("sayfa"); if value == "+" then Paragraph.SetText("sayfa", nX+1); nC1v = nSec-nX*6 nC2v = nSec-nX*6-1 nC3v = nSec-nX*6-2 nC4v = nSec-nX*6-3 nC5v = nSec-nX*6-4 nC6v = nSec-nX*6-5 ---1 Label.SetText("1", nC1v); nCover1 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC1v, "Cover"); nKonu1 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC1v, "Konu"); nBegen1 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC1v, "Begen"); nView1 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC1v, "View"); nYil1 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC1v, "Yıl"); Paragraph.SetText("y1", "Watch! "..nYil1); if nCover1 == "" then Image.Load("cvr1", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw1", false); else Image.Load("cvr1", nDir.."/"..nCover1); end Paragraph.SetText("t1", nKonu1); Hotspot.SetProperties("begen1", {TooltipText = "Beğeni Sayısı :"..nBegen1}); Hotspot.SetProperties("view1", {TooltipText = "İzlenme Sayısı :"..nView1}); ---2 nCover2 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC2v, "Cover"); nKonu2 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC2v, "Konu"); nBegen2 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC2v, "Begen"); nView2 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC2v, "View"); nYil2 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC2v, "Yıl"); Paragraph.SetText("y2", "Watch! "..nYil2); if nCover2 == "" then Image.Load("cvr2", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw2", false); else Image.Load("cvr2", nDir.."/"..nCover2); end Paragraph.SetText("t2", nKonu2); Hotspot.SetProperties("begen2", {TooltipText = "Beğeni Sayısı :"..nBegen2}); Hotspot.SetProperties("view2", {TooltipText = "İzlenme Sayısı :"..nView2}); ---3 nCover3 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC3v, "Cover"); nKonu3 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC3v, "Konu"); nBegen3 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC3v, "Begen"); nView3 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC3v, "View"); nYil3 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC3v, "Yıl"); Paragraph.SetText("y3", "Watch! "..nYil3); if nCover3 == "" then Image.Load("cvr3", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw3", false); else Image.Load("cvr3", nDir.."/"..nCover3); end Paragraph.SetText("t3", nKonu3); Hotspot.SetProperties("begen3", {TooltipText = "Beğeni Sayısı :"..nBegen3}); Hotspot.SetProperties("view3", {TooltipText = "İzlenme Sayısı :"..nView3}); ---4 nCover4 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC4v, "Cover"); nKonu4 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC4v, "Konu"); nBegen4 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC4v, "Begen"); nView4 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC4v, "View"); nYil4 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC4v, "Yıl"); Paragraph.SetText("y4", "Watch! "..nYil4); if nCover4 == "" then Image.Load("cvr4", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw4", false); else Image.Load("cvr4", nDir.."/"..nCover4); end Paragraph.SetText("t4", nKonu4); Hotspot.SetProperties("begen4", {TooltipText = "Beğeni Sayısı :"..nBegen4}); Hotspot.SetProperties("view4", {TooltipText = "İzlenme Sayısı :"..nView4}); ---5 nCover5 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC5v, "Cover"); nKonu5 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC5v, "Konu"); nBegen5 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC5v, "Begen"); nView5 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC5v, "View"); nYil5 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC5v, "Yıl"); Paragraph.SetText("y5", "Watch! "..nYil5); if nCover5 == "" then Image.Load("cvr5", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw5", false); else Image.Load("cvr5", nDir.."/"..nCover5); end Paragraph.SetText("t5", nKonu5); Hotspot.SetProperties("begen5", {TooltipText = "Beğeni Sayısı :"..nBegen5}); Hotspot.SetProperties("view5", {TooltipText = "İzlenme Sayısı :"..nView5}); ---6 nCover6 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC6v, "Cover"); nKonu6 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC6v, "Konu"); nBegen6 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC6v, "Begen"); nView6 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC6v, "View"); nYil6 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC6v, "Yıl"); Paragraph.SetText("y6", "Watch! "..nYil6); if nCover6 == "" then Image.Load("cvr6", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw6", false); else Image.Load("cvr6", nDir.."/"..nCover6); end Paragraph.SetText("t6", nKonu6); Hotspot.SetProperties("begen6", {TooltipText = "Beğeni Sayısı :"..nBegen6}); Hotspot.SetProperties("view6", {TooltipText = "İzlenme Sayısı :"..nView6}); end if value == "-" then Paragraph.SetText("sayfa", nX-1); n = Paragraph.GetText("1"); n = String.ToNumber(n); nC6v = n+1 nC5v = n+2 nC4v = n+3 nC3v = n+4 nC2v = n+5 nC1v = n+6 ---1 Label.SetText("1", nC1v); nCover1 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC1v, "Cover"); nKonu1 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC1v, "Konu"); nBegen1 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC1v, "Begen"); nView1 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC1v, "View"); nYil1 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC1v, "Yıl"); Paragraph.SetText("y1", "Watch! "..nYil1); if nCover1 == "" then Image.Load("cvr1", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw1", false); else Image.Load("cvr1", nDir.."/"..nCover1); end Paragraph.SetText("t1", nKonu1); Hotspot.SetProperties("begen1", {TooltipText = "Beğeni Sayısı :"..nBegen1}); Hotspot.SetProperties("view1", {TooltipText = "İzlenme Sayısı :"..nView1}); ---2 nCover2 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC2v, "Cover"); nKonu2 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC2v, "Konu"); nBegen2 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC2v, "Begen"); nView2 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC2v, "View"); nYil2 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC2v, "Yıl"); Paragraph.SetText("y2", "Watch! "..nYil2); if nCover2 == "" then Image.Load("cvr2", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw2", false); else Image.Load("cvr2", nDir.."/"..nCover2); end Paragraph.SetText("t2", nKonu2); Hotspot.SetProperties("begen2", {TooltipText = "Beğeni Sayısı :"..nBegen2}); Hotspot.SetProperties("view2", {TooltipText = "İzlenme Sayısı :"..nView2}); ---3 nCover3 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC3v, "Cover"); nKonu3 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC3v, "Konu"); nBegen3 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC3v, "Begen"); nView3 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC3v, "View"); nYil3 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC3v, "Yıl"); Paragraph.SetText("y3", "Watch! "..nYil3); if nCover3 == "" then Image.Load("cvr3", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw3", false); else Image.Load("cvr3", nDir.."/"..nCover3); end Paragraph.SetText("t3", nKonu3); Hotspot.SetProperties("begen3", {TooltipText = "Beğeni Sayısı :"..nBegen3}); Hotspot.SetProperties("view3", {TooltipText = "İzlenme Sayısı :"..nView3}); ---4 nCover4 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC4v, "Cover"); nKonu4 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC4v, "Konu"); nBegen4 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC4v, "Begen"); nView4 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC4v, "View"); nYil4 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC4v, "Yıl"); Paragraph.SetText("y4", "Watch! "..nYil4); if nCover4 == "" then Image.Load("cvr4", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw4", false); else Image.Load("cvr4", nDir.."/"..nCover4); end Paragraph.SetText("t4", nKonu4); Hotspot.SetProperties("begen4", {TooltipText = "Beğeni Sayısı :"..nBegen4}); Hotspot.SetProperties("view4", {TooltipText = "İzlenme Sayısı :"..nView4}); ---5 nCover5 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC5v, "Cover"); nKonu5 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC5v, "Konu"); nBegen5 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC5v, "Begen"); nView5 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC5v, "View"); nYil5 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC5v, "Yıl"); Paragraph.SetText("y5", "Watch! "..nYil5); if nCover5 == "" then Image.Load("cvr5", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw5", false); else Image.Load("cvr5", nDir.."/"..nCover5); end Paragraph.SetText("t5", nKonu5); Hotspot.SetProperties("begen5", {TooltipText = "Beğeni Sayısı :"..nBegen5}); Hotspot.SetProperties("view5", {TooltipText = "İzlenme Sayısı :"..nView5}); ---6 nCover6 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC6v, "Cover"); nKonu6 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC6v, "Konu"); nBegen6 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC6v, "Begen"); nView6 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC6v, "View"); nYil6 = INIFile.GetValue(nDir.."\\watch\\"..nKtgr..".ini", nC6v, "Yıl"); Paragraph.SetText("y6", "Watch! "..nYil6); if nCover6 == "" then Image.Load("cvr6", "AutoPlay\\Images\\none.png"); Image.SetEnabled("shdw6", false); else Image.Load("cvr6", nDir.."/"..nCover6); end Paragraph.SetText("t6", nKonu6); Hotspot.SetProperties("begen6", {TooltipText = "Beğeni Sayısı :"..nBegen6}); Hotspot.SetProperties("view6", {TooltipText = "İzlenme Sayısı :"..nView6}); end end [/spoiler] Sonraki sayfaya değişte sorun yok fakat Önceki Sayfaya geçişte sorun var onu bir türlü çözemedim... nC1v,nC2v... orayı düzeltmeniz yeterlidir.. Resim; [spoiler] [/spoiler] Quote Link to comment Share on other sites More sharing options...
reyiz Posted July 17, 2013 Share Posted July 17, 2013 Apz dosyasını verme şansınız var mı? Bu şekilde verdiğiniz içim tam olarak ne yapmaya çalıştığınızı anlayamıyor ve yardımcı olamıyorum. Quote Link to comment Share on other sites More sharing options...
Kral__ Posted July 18, 2013 Author Share Posted July 18, 2013 (edited) Sorun çözülmüştür... Edited July 18, 2013 by Kral__ Quote Link to comment Share on other sites More sharing options...
turkoglu98 Posted July 28, 2013 Share Posted July 28, 2013 buarada kral__ ini dosyasını kullanmanı tavsiye etmem bazı bilgisayarların c sürücüsü veri yazmaya kapalı oluyor dolaysıyla program ini dosyasına veri yazdıramıyor buda hata vermesine yol açıyor benim bir programımda ini kullanmıştım kullanıcıların şikayeti üzerine ini yerine windows registry ve globalı kullanarak hallettim Quote Link to comment Share on other sites More sharing options...
Kral__ Posted August 7, 2013 Author Share Posted August 7, 2013 _SystemFolder veya _ProgramFilesFolder ile o sorunu çözebilrsin ;) Yani yolu direk vermiyorum.. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.