Jump to content

systembilisim

Üye
  • Posts

    114
  • Joined

  • Last visited

Everything posted by systembilisim

    1. Cyph3r

      Cyph3r

      hep reklam... hep reklam.... bir kerede tnc için şöyle yanarlı dönerli bişey hazırlasan ya :)

    2. systembilisim

      systembilisim

      siz istedinizde biz yokmu dedik abi

    3. Cyph3r

      Cyph3r

      :D bekliyoruz o zaman...
  1. merhaba arkadaşlar bana  Windows Embedded 8.1 Industry  lazım forumda buldum ama linkler silinmiş torrent olursa çok iyi olur teşekkürler
  2. battlefield 4 premium

    1. Show previous comments  1 more
    2. systembilisim
    3. NotToday

      NotToday

      Ya bu tür çalışmalarda farklılık yapmak lazım da hep aynı kalıba alışmışız.Dışına çıkıp yeni bir araç yapamıyoruz :(

    4. KintaRo

      KintaRo

      ProBox AI

  3. arkadaşlar program normal açılıyor ama program ekle diyorum ekleyeceğim programı seçiyorum ekleme bittikten sonra bu hatayı alıyorum burda yanlı birşeylermi var anlamadım [spoiler]nSec = TreeList.GetSelected("Plugin1") if nSec ~= -1 then tblMenu = {}; tblMenu[1] ={}; tblMenu[1].Text = "Programı Sil"; tblMenu[1].ID = 100; tblMenu[1].IconID = 11; tblMenu[1].Checked = false; tblMenu[1].Enabled = true; tblMenu[2] ={}; tblMenu[2].Text = "Yeniden Adlandır"; tblMenu[2].ID = 101; tblMenu[2].IconID = 1; tblMenu[2].Checked = false; tblMenu[2].Enabled = true; ptMouse = System.GetMousePosition(false, nil); nRes = Application.ShowPopupMenu(ptMouse.X, ptMouse.Y, tblMenu, TPM_RIGHTALIGN, TPM_TOPALIGN, true, false); if(nRes == 100)then ---- Program Sil nSec = TreeList.GetSelected("Plugin1"); nText = TreeList.GetCellText("Plugin1", nSec, 1); result = Dialog.Message(""..nText.." Siliniyor", ""..nText.." Adlı Programı Silmek İstediğinizden Eminmisiniz?.", MB_YESNO, MB_ICONINFORMATION, MB_DEFBUTTON1); if result == 6 then File.Delete(_SourceFolder.."\\AutoPlay\\Docs\\Programlar\\"..nText..".exe", false, false, false, nil); elseif result == 7 then end Program.Listele(); end if(nRes == 101)then nSec = TreeList.GetSelected("Plugin1"); nText = TreeList.GetCellText("Plugin1", nSec, 1); result = Dialog.Input("Yeniden Adandır", "Program Adı:", ""..nText.."", MB_ICONQUESTION); if result == "CANCEL" then else File.Rename(_SourceFolder.."\\AutoPlay\\Docs\\Programlar\\"..nText..".exe" , _SourceFolder.."\\AutoPlay\\Docs\\Programlar\\"..result..".exe", ""); end Program.Listele(); end else tblMenu = {} tblMenu[1] = {} tblMenu[1].Text = "Programı Ekle"; tblMenu[1].ID = 102; tblMenu[1].IconID = 11; tblMenu[1].Checked = false; tblMenu[1].Enabled = true; tblMenu[2] = {} tblMenu[2].Text = "Yenile"; tblMenu[2].ID = 103; tblMenu[2].IconID = 1; tblMenu[2].Checked = false; tblMenu[2].Enabled = true; ptMouse = System.GetMousePosition(false, nil); nRes = Application.ShowPopupMenu(ptMouse.X, ptMouse.Y, tblMenu, TPM_RIGHTALIGN, TPM_TOPALIGN, true, false); if (nRes == 102) then Sec = Dialog.FileBrowse(true, "Program Seçiniz..", _DesktopFolder, "Katılımsız Programlar|*.exe|", "", "dat", true, false); if Sec[1] ~= "CANCEL" then cnt = Table.Count(Sec); for i,v in pairs (Sec) do Split = String.SplitPath(v); function FileProgress(Source, Destination, Copied, Total, FileCopied, FileTotal) Progress.SetCurrentPos("Progress1", (Copied / Total) * 100); isim = String.SplitPath(Destination).Filename..String.SplitPath(Destination).Extension kopya = String.GetFormattedSize(Copied, FMTSIZE_MB, true) toplam = String.GetFormattedSize(Total, FMTSIZE_MB, true) yuzde = Math.Floor((Copied / Total) * 100); Progress.SetText("Progress1", "["..i.."/"..cnt.."]".."%"..yuzde.." "..isim.." Kopyalanıyor ["..kopya.."/"..toplam.."]"); Progress.SetCurrentPos("Progress1", ((Copied/Total) * 100)); return true end Progress.SetProperties("Progress1", {TooltipText = "Kopyalanan Program : "..Split.Filename } ); File.Copy(v, _SourceFolder.."\\AutoPlay\\Docs\\Programlar\\"..Split.Filename..".exe", true, true, false, true, FileProgress); Progress.SetText("Progress1", ""); Progress.SetCurrentPos("Progress1", 0); Progress.SetProperties("Progress1", {TooltipText = ""}); end end Program.TreeList(); Program.Listele(); Program.Say() end if (nRes == 103) then Program.TreeList(); Program.Listele(); Program.Say() end end[/spoiler]
  4. @murat3246683 kardeşim çok saol ama projeyi açıtığımda "TREELIST" diye bi eksiklikten sözediyor bunu nasıl gidereceğim
  5. merhaba arkadaşlar AMS ile kur hazırlıyorum biraz yardıma ihtiyacım var kintaro'nun hazırladığı ProBox sa benzer bi kur hazırlamam gerekiyor yani onunki kadar olmasada kur açıldıktan sonra içine program atma  seçmeli kura benzer işlevler yapacak bir projeye ihtiyacım var teşekkürler.
  6. merhaba arkadaşlar aşağıdaki sistem özelliklerini gösteren pencereye OEM bilgilerimi eklemek istiyorum bunun için bi çok uygulama var ama bunu ".bat" dosyası ile yapmam lazım bunu nasıl yapabilirim teşekkürler..
  7. unutamıyorum...

×
×
  • Create New...