Ams'de Klasör İçeriğini Nasıl Görüntüleyebilirim

[rockinking]

Merhaba Ben By_Facia Arkadaşın Yazdığı Masaüstü Programından yararlanıp ve etkilenip
onun gibi ama biraz farklı program yapmaya çalışıyorum
fakat bir şeyi bir türlü beceremedim daha doğrusu olabilirmi olmazmı diye size de danışmak istedim.

Takıldığım Olay Şu ;

2. Resimdeki Numaralı kutulara ben her yeni ekleyeceğim programı,Oyun vs.. yi
her seferinde programı ams ile tekrar editlemekle uğraşmak yerine şöyle bir şey aklıma geldi.
ustalar burada size ihtiyacım var

mesela ben autorun klasörünün içine "oyunlar" diye bir klasör Açayım ve bu klasörün içine

örn:

"Half-life.lnk" Ve "Half-life.jpg" link ve resmini atayım

sonra programda (2. resimde gösterdiğim) kutu

resim olarak "Half-Life.jpg" resmini alsın
Link Olarak "Half-Life.lnk" linki alsın

ve ben programa oyun dahil etmek istediğimde hiç Ams ile editmelek zorunda Kalmadan link ve jpeg leri oyun klasörüne atarak

Programı AMS ile editlememe gerek kalmasın

mesela

"nero.lnk" "nero.jpg"
"ultraiso.lnk" "ultraiso.jpg"
"Photoshop.lnk" "Photoshop.jpg"
"Ams.lnk" "Ams.jpg"
"Firefox.lnk" "Firefox.jpg"
"Clonecd.lnk" "Clonecd.jpg"

ben bu klasöre Bunları Attım 6 adet
link ve resim programdaki 6 adet kutuya bu linkler ve resimler sırayla yerleşse

Böyle Birşey mümkünmüdür acaba

Proje Dosyasıda Bu : http://hotfile.com/dl/135106143/48ad769/My_Project1.rar.html

Şimdiden teşekkürler yardımınızı Bekliyorum

program "1280*1024" Çözünürlükte Çalışıyor Edited November 25, 2011 by rockinking

[pilgetir]

Sanırım bu mümkün olmasa gerek tam emin değilim.

[prototype]

Tam olarak istediğiniz bumuydu;

[code]http://www.indirmatik.net/downloads/ams/prototype/klasor.rar[/code]


Oyun kısayollarını "AutoPlay\Oyunlar" klasörünün içine atmanız yeterli.

[prototype]

Tam olarak istediğiniz bumuydu;

[code]http://www.indirmatik.net/downloads/ams/prototype/klasor.rar[/code]


Oyun kısayollarını "AutoPlay\Oyunlar" klasörünün içine atmanız yeterli.

[rockinking]

[quote name='prototype' date='15 November 2011 - 17:40 ' timestamp='1321378823' post='1112229']
Tam olarak istediğiniz bumuydu;

[code]http://www.indirmatik.net/downloads/ams/prototype/klasor.rar[/code]


Oyun kısayollarını "AutoPlay\Oyunlar" klasörünün içine atmanız yeterli.
[/quote]




Yok Bu Tarza Değil Tam olarak Anlatamadım Herhalde ŞöylE Anlatayım Ben her Yeni Oyun Aldığımda Bu Yaptığım Programı Editleyip Yeniden
buton ekleyip buna yol göstermek yerine o klasörün içine attığım aynı isimlerdeki oyunun kısayolunu ve resmini programda belirlediğim yerde görünmesi istiyorum yani ben hiç programı editlemeyeceğim sadece mesela bir image kutusu koydum programıma oyunlar klasörüne
"half life.jpg" isimli bir resim attığımda bu kutuya bu resim gelecek "half life.lnk" kısayoluda bu kutuya tıkladığımda açılacak

[DivaneTR]

[center][b]Biraz Uğraştım Fakat [color="#FF0000"]Yapamadım[/color] Tam Olarak. Aslında İstediğin Şey Mümkün Gibi Görünüyor. Bir Örnek Hazırladım. Şimdilik Beynimizde Birşeyler Oluşturmamıza Yönelik Bir Örnek. Fakat Kısayolu [color="#FF0000"]Çalıştırmıyor.[/color] Kısayolu Çalıştıracak Kombinasyonu Sağlarsak İşlem Tamamdır. AutoPlay\Docs Klasörü İçine photoshop.png ve photoshop Kısayolunu Koydum. Kodlar Tamam. Fakat File.Run İle Çalıştıramadım Kısayolu. Yardım Eden Olursa Projeyi Tamamlayabiliriz.[/b][/center]

[center][img]http://i.imgur.com/XSCRZ.png[/img][/center]

[center][b]Proje[/b][/center]
[center][code]http://hotfile.com/dl/135132808/a59ad8d/Ksayol.rar.html[/code][/center]

[prototype]

@Baba_ file.run yerine file.open komutu olabilir mi acaba ?.. Şuan cafedeyim deneyemiyorum.

[DivaneTR]

[b]Denedim. Olmuyor.[/b]

[NotToday]

Peki kısayol yerine iniden yolunu alsa.Daha sonra bu yolu değiştirmek mümkün olur.Böyle bir alternati işe yarar mı ?

Edited November 15, 2011 by ReaLyMaN

[DivaneTR]

[center][b]Evet. Yapılabilir.[/b][/center]

[KintaRo]

[code]Shell.Execute("AutoPlay\\Docs\\Nero Express.lnk", "open", "", "AutoPlay\\Docs", SW_SHOWNORMAL, false)[/code]

kısayol çalıştırma bu kadar unutmayın Shell.Execute executable olmayan dosyaları (Örn: jpg gibi) hangi programla ilişkilendirilmişse onla açmaya çalışır. Yani psd dosyasını shell.execute() ile çalıştırdığınızda photoshop kurulu ise onla açar başka bir grafik programınız varsa onla açar vesaire.

[rockinking]

[quote name='Baba_' date='15 November 2011 - 21:25 ' timestamp='1321392320' post='1112389']
[center][b]Biraz Uğraştım Fakat [color="#FF0000"]Yapamadım[/color] Tam Olarak. Aslında İstediğin Şey Mümkün Gibi Görünüyor. Bir Örnek Hazırladım. Şimdilik Beynimizde Birşeyler Oluşturmamıza Yönelik Bir Örnek. Fakat Kısayolu [color="#FF0000"]Çalıştırmıyor.[/color] Kısayolu Çalıştıracak Kombinasyonu Sağlarsak İşlem Tamamdır. AutoPlay\Docs Klasörü İçine photoshop.png ve photoshop Kısayolunu Koydum. Kodlar Tamam. Fakat File.Run İle Çalıştıramadım Kısayolu. Yardım Eden Olursa Projeyi Tamamlayabiliriz.[/b][/center]

[center][img]http://i.imgur.com/XSCRZ.png[/img][/center]

[center][b]Proje[/b][/center]
[center][code]http://hotfile.com/dl/135132808/a59ad8d/Ksayol.rar.html[/code][/center]
[/quote]



Evet @Baba_ anlatmak istediğim olay buna benziyor ama tam olarak değil
Şöyle İzah Edeyim;

listbox da seçtiğimiz linki , çalıştır butonuna basınca çalıtırıyorya

şöyle birşey mümkün olmazmı

mesela image kutusu direk olarak resmi bünyesine alsın linkide bünyesine alsın ve resme tıklayıncada açsın

Yani ListBox dan seçip de çalıştır tuşuna basmak yerine ,

direk resme basıpta programı açabilmek


[center][img]http://c1111.hizliresim.com/r/j/kq1t.png[/img][/center]

Bu resimi Şöyle İzah Edeyim Ben Docs Klasörüne

"Photoshop.lnk","Photoshop.jpg" Ve "Nero.lnk","Nero.jpg"

Link Ve Resimleri Attım
Ve Projede Resimdeki Gibi görünsün ve Resimlere Tıklayınca Açılsın

"Bu arada İlla .lnk uzantı olası mühim değil bir bat dosyası oluşturup onun içinden de kısayol komutu verilebilir"

[DivaneTR]

[b]Ben Örnek Amaçlı Yaptım Zaten. KintaRo'nun Verdiği Kod Yardımı İle Projeyi Düzenleyebilirsin. İstediğin Şekilde Yaparsın. Takıldığın Yer Olursa Yine Burdan Sorarsın. Projenin Tamamını Biz Yapmayalım Yani.[/b]

[Mehmet]

[quote name='KintaRo' date='16 November 2011 - 06:33 ' timestamp='1321425220' post='1112512']
[code]Shell.Execute("AutoPlay\\Docs\\Nero Express.lnk", "open", "", "AutoPlay\\Docs", SW_SHOWNORMAL, false)[/code]

kısayol çalıştırma bu kadar unutmayın Shell.Execute executable olmayan dosyaları (Örn: jpg gibi) hangi programla ilişkilendirilmişse onla açmaya çalışır. Yani psd dosyasını shell.execute() ile çalıştırdığınızda photoshop kurulu ise onla açar başka bir grafik programınız varsa onla açar vesaire.
[/quote]
evet autoitde aynı yöntem kullanılıyor yani benzer

ShellExecute
ShellExecuteWait

exe uzantılı olmayan kısayollar msi uzantıları falan gerçekten bu kodlar basit ama işimize yaradığı zamanda bulamadığımız yöntemler unutmamak gerekir

[rockinking]

Kısayol Açmak İçin Şöyle Yaptım;

[codebox]Secilen = ListBox.GetSelected("ListBox1");
sAd = ListBox.GetItemText("ListBox1", Secilen[1]);
Shell.Execute("AutoPlay\\Docs\\Program\\"..sAd..".lnk", "open","", "AutoPlay\\Docs\\Program", SW_SHOWNORMAL, false);
[/codebox]



Proje de 1. Aşaması TamamDır Çok Teşekkür Ediyorum sizlere

Proje Dosyası
http://hotfile.com/dl/135280247/1765957/TGMK.rar.html

Geliştiren Olursa Paylaşırsa Sevinirim

Fakat Ufak Bir sorun daha var bunu Çözemedim?

[code]tblFiles = File.Find(sYol, "*.png", true, false, nil, nil);[/code]
bu Kodda Sadece png uzantılılıraı açıyor Ben Hem Png Hemde Jpg Nasıl Yapabilirim çok uğraştım ama bir türlü olmuyor?

[NotToday]

Bunu bir dene

[quote]tblFiles = File.Find(sYol, "*.jpg", true, false, nil, nil);
tblFiles = File.Find(sYol, "*.png", true, false, nil, nil);[/quote]

Edited November 17, 2011 by ReaLyMaN

[Mehmet]

sanırım jpg veya png ilgili resme tıkladığında açmak istediğin klasör açılsın demek istemişssin
aslında bunu ufak bir autoit koduylada yapmanda mümkün
o nesne herne ise jpg png gif
tıkladığında
RunWait("explorer.exe " & "klasöryolu\altklasör")
veya
Run("explorer.exe " & "klasöryolu\altklasör")

Edited November 17, 2011 by MeHMeTBeN

[KintaRo]

mehmet, forumları karıştırdın galiba

[quote]Fakat Ufak Bir sorun daha var bunu Çözemedim?

[code]tblFiles = File.Find(sYol, "*.png", true, false, nil, nil);[/code]

bu Kodda Sadece png uzantılılıraı açıyor Ben Hem Png Hemde Jpg Nasıl Yapabilirim çok uğraştım ama bir türlü olmuyor? [/quote]

burda tam olarak ne yapmak istiyorsun, o kısmın tüm kodlarını ver düzenleyeyim.

[rockinking]

[quote]burda tam olarak ne yapmak istiyorsun, o kısmın tüm kodlarını ver düzenleyeyim.
[/quote]


Yapmak İstediğim Şu

Klasörün içinde png ve jpg dosyaları var ama ben bu kodu *.png yaparsam sadece pngleri gösteriyo

*.jpg yaparsam sadece jpg uzantılıları gösteriyo
ben 2 sinide nasıl gösterttirebilirim onu sordum
[codebox]sYol = _SourceFolder.."\\AutoPlay\\Docs\\Oyun\\"
tblFiles = File.Find(sYol, "*.png", true, false, nil, nil);
if tblFiles then
for i,v in pairs (tblFiles) do
local tblSplit = String.SplitPath(v)
ListBox.AddItem("ListBox1", tblSplit.Filename, v);
end
end
[/codebox]

[KintaRo]

[codebox]sYol = _SourceFolder.."\\AutoPlay\\Docs\\Oyun\\"

tPng = File.Find(sYol, "*.png", true, false, nil, nil);
tJpg = File.Find(sYol, "*.jpg", true, false, nil, nil);

if tPng then
for i,v in pairs (tPng) do
local tblSplit = String.SplitPath(v)
ListBox.AddItem("ListBox1", tblSplit.Filename, v);
end
end

if tJpg then
for i,v in pairs (tJpg) do
local tblSplit = String.SplitPath(v)
ListBox.AddItem("ListBox1", tblSplit.Filename, v);
end
end[/codebox]