Treelistte Dragdrop Ile Dosya Kopyalamak

[nightmare3519]

Edited September 2, 2014 by nightmare3519

[NotToday]

Plugini verde bende görmüş oluyum

[nightmare3519]

Buyur:

http://www.mediafire.com/?o10gybe9dxja67e

[HalilYanar]

DragDrop u actions klasörünemi alıyoruz ?

[nightmare3519]

[quote name='HalilYanar' date='28 March 2012 - 22:21 ' timestamp='1332966114' post='1176898']
DragDrop u actions klasörünemi alıyoruz ?
[/quote]

Evet

[HalilYanar]

Arkadaşım sana doğru söyliyeyim tam emin değilim dene istersen ;

Global Fuctions :

[quote]bCanDrag = Grid.GetDragAndDrop("Plugin1");

if bCanDrag then
Grid.SetDragAndDrop("Plugin1", false);
else
Grid.SetDragAndDrop("Plugin1", true);
end
[/quote]

NOT :

Global Fuctions'un altındaki eklentiler yerinden DragAndDrop check box u işaretlemeyi unutma..

Edited March 28, 2012 by HalilYanar

[nightmare3519]

Özür dilerim ben konuda söylemeyi unutmuşum ben TreeListte dosya eklemek için dragdrop istiyorum grid hiç kullanmadım bir kez bile oluşturdğum olmamıştır belkide

[HalilYanar]

[quote name='nightmare3519' date='28 March 2012 - 22:48 ' timestamp='1332967691' post='1176914']
Özür dilerim ben konuda söylemeyi unutmuşum ben TreeListte dosya eklemek için dragdrop istiyorum grid hiç kullanmadım bir kez bile oluşturdğum olmamıştır belkide
[/quote]


[quote]bCanDrag = TreeList.GetDragAndDrop("Plugin1");

if bCanDrag then
TreeList.SetDragAndDrop("Plugin1", false);
else
TreeList.SetDragAndDrop("Plugin1", true);
end[/quote]

[DivaneTR]

[b]DragDrop plugini çalışmak için Net Framework 2.0 istiyor. Dün farkettim. Haberiniz ola.[/b]

[nightmare3519]

Konu başlığı düzenlendi !!!

Edited March 30, 2012 by nightmare3519

[Kral__]

al baklaım benim kullandığım galetisinkini biraz değiştirdim

global

[code]sys = {

dir = "AutoPlay\\Docs", -- Programların bulunduğu klasör
proIcons = {}, -- Iconların depolandığı tablo
programs = {}, -- Programların depolandığı tablo
cats = {}, -- Kategori tablosu

load = function() -- Programın başlangıç fonksiyonu

TreeList.ClearRows("Plugin1");
TreeList.ClearColumns("Plugin1");
TreeList.AddColumn("Plugin1", "Yazılımın İsimi", 400)
TreeList.AddColumn("Plugin1", "Md5", 209)
TreeList.AddColumn("Plugin1", "Boyutu", 75)
sys.init();
end,


init = function() -- Programların listelendiği fonksiyon
TreeList.ClearRows("Plugin1");

local prog_Bul = File.Find(sys.dir, "*.exe", false, false, nil, nil); -- Programları bul
if (prog_Bul == nil) then



else


-- Fonksiyon yüklendiğinde tabloları sıfırla
sys.programs = {};
sys.proIcons = {};

for index, path in pairs(prog_Bul) do

sys.programs[index] = path; -- Yolları belirle
nVers = File.GetVersionInfo(path);
local pro_Path = String.SplitPath(path); -- Programın yol bilgilerini parçala
local pro_Boyut = String.GetFormattedSize(File.GetSize(path), FMTSIZE_AUTOMATIC, true);--Burda dosya boyutunu alıyoruz.Normalde File.GetSize(file) şeklinde de alınıyor.Fakat Kb cinsinden yazar.String.GetFormattedSize() komutuyla otamatik birim veriyoruz.Yani veri azsa Kb çoğaldıkca Mb,Gb şeklinde gösterir.
local pro_Md5 = Crypto.MD5DigestFromFile(path);

TreeList.AddRow("Plugin1", pro_Path.Filename.."|".. pro_Md5 .."|"..pro_Boyut, TreeList.ExtractIcon("Plugin1", path, 0), nil, nil)--Burda Rowlara verileri ekliyoruz


end
end



end, --init bitiş



kur = function() -- Seçilen programları kurma fonksiyonu

local say = TreeList.CountRows("Plugin1", false);-- Listicondaki tüm elemanların sayısı

local kurulacak = {}; -- kurulacak programlar tablosu

for i = 0, say do
local proSecilmismi = TreeList.GetRowChecked("Plugin1", i);

if (proSecilmismi) then

local kurPro = sys.programs[i+1];
kurulacak[i+1] = kurPro; -- kurulacak tablosuna programı at

end

end


local kacPro = Table.Count(kurulacak); -- Kurulacak program sayısını al

if kacPro == 0 then
Dialog.Message("Neon Aıo ~ Kurulum", "Lütfen Program Seçiniz.", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else


for index, path in pairs(kurulacak) do
kur = String.SplitPath(kurulacak[index]); -- Programın bilgilerini parçala
File.Run(kurulacak[index], "", "", SW_SHOWNORMAL, true);

end
end
end

};[/code]

On show

[code]sys.load();
Page.StartTimer(1000);[/code]

On Mouse Move

[code]DragAndDrop.SetDataFormat(DataFormat.FileDrop);
DragAndDrop.Start(Application.GetWndHandle());
nFile = DragAndDrop.GetDataObject();

for i,v in pairs(nFile) do
if String.SplitPath(v).Extension == ".exe" then
File.Copy(v, _SourceFolder.."\\AutoPlay\\Docs", true, true, false, true, CopyCallback);
sys.init();
end
end[/code]

Edited April 15, 2012 by Kral__

[KintaRo]

DragDrop'u on timer evresinde kullanmayın. Program uzun süre açık kalınca hata verip kapanıyor. On Mouse Move evresini tercih ediyorum ben.

[HalilYanar]

Peki sürükle bırak ta bu kodlar doğrumu KintaRo abi ?

[quote]bCanDrag = TreeList.GetDragAndDrop("Plugin1");

if bCanDrag then
TreeList.SetDragAndDrop("Plugin1", false);
else
TreeList.SetDragAndDrop("Plugin1", true);
end[/quote]

Edited April 15, 2012 by HalilYanar

[korasoglu]

Birde ProgressEx nasıl kullanırız bunuda açıklık getirilirse harika olur

[Phasco]

dragdropu paylaşır mısınız

[nightmare3519]

3.Mesajda var

[Phasco]

hata verıyor ımd dosyası