dragon3781 Posted November 19, 2011 Share Posted November 19, 2011 Merhabalar , Hazır Indıgorose sitesinden indirilmiş .apz projede hata vermektedir. Projede Clear Temizle yaptıgımda dırek bu hatayı verıyor , proje kapanırken aynı hatayı tekrar verıyor . [img]http://c1111.hizliresim.com/r/m/mlgx.jpg[/img] Hata plugıns dosyasından mı kaynaklanmakta , yada ındıgorse forumdan anladıgım kadarıyla orjınal olmayan projelerde ( crack ) bu hata oluyormus sanırım . Bunun orjınal proje ile bir alakası varmı acaba , bilen bir arkadas aydınlatırsa sevinirim. Proje dosyası ; http://www.multiupload.com/EDO623RJF9 Quote Link to comment Share on other sites More sharing options...
ReddKill Posted November 19, 2011 Share Posted November 19, 2011 4 saufada btnbıtton 13 de hata var.Kod hatası var Quote Link to comment Share on other sites More sharing options...
pilgetir Posted November 19, 2011 Share Posted November 19, 2011 (edited) Hatanın sebebi eski sürüm ams ile tasarlanmış ve eski sürümde yani 8den öncekilerde tablo yapısı aşağıdaki gibi idi;Muhtemelen çıkarkende hata veriyordu oda tablo yapısından kaynaklanıyor [quote] for strCount, strDate in tbSpecial do[/quote] ams 8de ise tablo yapısı böyle [quote] for strCount, strDate in [b]pairs ([/b]tbSpecial[b])[/b] do[/quote] btnClear Onclickdeki kodu bununla değiştir; [quote]--Set the Text Input.SetText("inpBlog",""); --Get the selection tbSel = Calendar.GetSelection("calendar"); if (tbSel) then tbBlog[tbSel.Begin] = ""; --Remove the Selections special date (if it exists) becuase --the text is blank tbSpecial = Calendar.GetSpecialDates("calendar"); if (tbSpecial) then Calendar.ClearSpecialDates("calendar"); --Now re-Add all special dates for strCount, strDate in pairs (tbSpecial) do if (strDate ~= tbSel.Begin) then Calendar.AddSpecialDate("calendar",strDate); end end end end[/quote] Page1> On Close evresindeki kodu bununla değiştir. [quote]-- Initialize variables tbWriteOut = {}; nCount = 1; -- Check for table existance if (tbBlog) then -- Step through each item in the table for strDate, strText in pairs (tbBlog) do if (strText ~= "") then -- The current line is not blank, output date to 'output' table tbWriteOut[nCount] = strDate; nCount = nCount + 1; -- Output notes to 'output' table, and replace LUA line breaks with an ASCII placeholder tbWriteOut[nCount] = String.Replace(strText, "\r\n", "\002"); nCount = nCount + 1; end end -- Write the 'output' table to a text file strTextFilePath = Shell.GetFolder(SHF_MYDOCUMENTS).."\\CalNotes.txt"; TextFile.WriteFromTable(strTextFilePath,tbWriteOut); end[/quote] Edited November 19, 2011 by pilgetir Quote Link to comment Share on other sites More sharing options...
dragon3781 Posted November 19, 2011 Author Share Posted November 19, 2011 Evet , düzeldi gerçekten. tablo yapısındaki sürüm farklılığınıda ögrenmiş oldum sayende. Quote Link to comment Share on other sites More sharing options...
dragon3781 Posted November 19, 2011 Author Share Posted November 19, 2011 Sonunda projem bitti fakat Combobox ile Gruplama yapamıyorum SQL den veri çekerek , bu konu ile ilgili örnek çalışma varmı acaba hic elinizde .. Örnek Olarak ; SQL içeriği Tablolar : a tablosu , b tablosu , c tablosu Combobox1 : A Tablosunu Combobox2 : B tablosunu Combobox3 : C tablosunu Secılen verılerde filtrelenerek Lıstboxa aktarılacak ; Quote Link to comment Share on other sites More sharing options...
pilgetir Posted November 19, 2011 Share Posted November 19, 2011 fikir vermesi açısından şöyle yapalım; bir adet ınput 1 adet buton ve bir adet combobox oluştur ınput nesnesinin adını 1 yap Kaydet butonu onclick; [quote]SQLite3Connection:execute("insert into okulbilgileri (kurumadi,kurumadikisa,birimadi,ili,ilcesi,kasabakoyu,adres,ailebirligibaskani,ailebirligibaskaniyardimcisi,memur,kaymakam,milliegitimmuduru,malmuduru,sayman,okulkodu,vergikimlikno,epostaadresi,telefonbir,telefoniki,fax) values ('"..kurumadi.."','"..kurumadikisa.."','"..birimadi.."','"..ili.."','"..ilcesi.."','"..kasabakoyu.."','"..adres.."','"..ailebirligibaskani.."','"..ailebirligibaskaniyardimcisi.."','"..memur.."','"..kaymakam.."','"..milliegitimm.."','"..malmuduru.."','"..sayman.."','"..okulkodu.."','"..vergikimlikno.."','"..epostaadresi.."','"..telefonbir.."','"..telefoniki.."','"..fax.."') "); Dialog.Message("","Kayıt Başarılı"); SQLite3Cursor, err = SQLite3Connection:execute("SELECT * FROM okulbilgileri"); listele = SQLite3Cursor:fetch({}, "a") ComboBox.ResetContent("ComboBox1"); while listele do ComboBox.AddItem("ComboBox1", listele.kurumadi); listele = SQLite3Cursor:fetch(listele, "a"); end[/quote] Page1> On Show; [quote]SQLite3Cursor, err = SQLite3Connection:execute("SELECT * FROM okulbilgileri"); listele = SQLite3Cursor:fetch({}, "a") ComboBox.ResetContent("ComboBox1"); while listele do ComboBox.AddItem("ComboBox1", listele.kurumadi); listele = SQLite3Cursor:fetch(listele, "a"); end[/quote] Quote Link to comment Share on other sites More sharing options...
kapucu1971 Posted July 4, 2012 Share Posted July 4, 2012 takvim apz si olan yayınlayabilirmi Quote Link to comment Share on other sites More sharing options...
KintaRo Posted July 4, 2012 Share Posted July 4, 2012 demek ki neymiş? hiç bir hata sebepsiz değilmiş. Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted July 4, 2012 Share Posted July 4, 2012 [color="#8B0000"]Tablo hataları genelde eski sürümdeki syntax'ı yeni sürümde kullanırken olur. pairs (table) şeklinde denerseniz sorunu giderebilirsiniz. Tabi sorun tablo ile ilgili başka bi sorun değilse.[/color] 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.