Jump to content

Listbox Ve Media Player


HalilYanar
 Share

Recommended Posts

Merhaba arkadaşlar benden bir hocam program yapmamamı istedi. Fakat ben bazı şeyleri yapamadım. Bilenler yardımcı olursa sevinirim.

[img]http://s14.directupload.net/images/120301/ha343754.png[/img]

Resimdede gösterdiğim gibi arkadaşlar gözat tıklayınca gözat penceresi açılıcak ve seçtiğim video listbox
da gözükücek ona çift tıklayınca video oynucak kaydet dedikten sonra yaptıklarımız .ini dosyasına kaydolucak. Şimdiden teşekkürler. Edited by HalilYanar
Link to comment
Share on other sites

yanlış türde dosya gondermişsin, File>Export komutunu kullanmalıydın, neyse ben yeni proje oluşturdum.

Gözat buttonu ile seçilen dosyaları listboxa ekler,

ListBox'a çift tıklayınca videoları oynatır.

Kaydet'e basınca listeyi kaydeder,

Eğer daha önceden kaydedilmiş liste varsa ilk açılışta onları listboxa ekler.

[code]http://www.mediafire.com/?iet94m99x58wvyr[/code]

Link to comment
Share on other sites

Abi senin gönderdiğin apz den yaptım ama kaydetmiyo söylediğim gibi acaba ndn al abi .apz

http://www.upload.gen.tr/d.php/www/j3esjf1l/Deneme.rar.html

Abi lütfen yardım et.

Edited by HalilYanar
Link to comment
Share on other sites

  • 1 ay sonra...

Yaz için güzel projeler düşünüyorum birde şu kaydet butonunu beceremedim ne kadar beceriksizim :D

@Kral__ Yazın ki projelerimde senin görselliğine ihtiyacım olucak :)

Ve buda KintaRo Abimin verdiği projeyi düzenledim hocama verdim kullanıyor..

[img]http://i.imgur.com/dyhT7.png[/img]

Kaydet butonu bir türlü çalışmıyor :pardon:

Edited by HalilYanar
Link to comment
Share on other sites

dosya = Dialog.FolderBrowse("Mp3 Klasörünü seçin", _DesktopFolder)
StatusDlg.Show(0, false);
tblFiles = File.Find(dosya, "*.mp3", true, false, nil, nil);
if tblFiles then
for i,v in pairs (tblFiles) do
local tblSplit = String.SplitPath(v)
ListBox.AddItem("list", tblSplit.Filename, v);
end
end
StatusDlg.Hide();


al bakalım olucakmı

kral player apz
http://speedy.sh/dd8C9/Kral-vVv-Kral.apz

al bakalım incele eski playerım

Edited by Kral__
Link to comment
Share on other sites

[quote name='Kral__' date='23 April 2012 - 13:22 ' timestamp='1335180144' post='1191019']
dosya = Dialog.FolderBrowse("Mp3 Klasörünü seçin", _DesktopFolder)
StatusDlg.Show(0, false);
tblFiles = File.Find(dosya, "*.mp3", true, false, nil, nil);
if tblFiles then
for i,v in pairs (tblFiles) do
local tblSplit = String.SplitPath(v)
ListBox.AddItem("list", tblSplit.Filename, v);
end
end
StatusDlg.Hide();


al bakalım olucakmı

kral player apz
http://speedy.sh/dd8C9/Kral-vVv-Kral.apz

al bakalım incele eski playerım
[/quote]


@Kral__

Ben kaydet butonunu yapamadım sadece list box' a ekliyor zaten KintaRo abi eklemişti kaydet butonuna kodlar ama çalışmıyor.

Kaydet butonundaki kodlar bunlar :

[quote]nCount = ListBox.GetCount("ListBox1")
if nCount ~= 0 then
for i=1,nCount do
sData = ListBox.GetItemData("ListBox1", i)
INIFile.SetValue("Autoplay\\Docs\\data.ini", String.SplitPath(sData).Filename, "isim", String.SplitPath(sData).Filename)
INIFile.SetValue("Autoplay\\Docs\\data.ini", String.SplitPath(sData).Filename, "yol", sData)
end
end[/quote]

Bu kod çalışmıyor yardım edebilirseniz sevinirim.

Link to comment
Share on other sites

page on show

tblData = INIFile.GetSectionNames("AutoPlay\\Docs\\data.ini")
if tblData ~= nil then
for i in pairs(tblData) do
ListBox.AddItem("list", tblData[i], "")
end
end

listbox on duable click

nSecim = ListBox.GetSelected("list")
if nSecim ~= nil then
Secim = ListBox.GetItemText("list", nSecim[1])
nData = INIFile.GetValue("AutoPlay\\Docs\\data.ini", Secim, "yol")
MediaPlayer.Load("Plugin1", nData)
end

al bakalım olucak mı

Link to comment
Share on other sites

@Kral__

Kardeş dediğini yaptım olmadı ama sen kodları eklesen programda açtığımız müzikleri kaydet butonunu kaldıralım olmazsa müziği eklediğimiz an gözat butonundan ini dosyasına kaydetsin açılışta listelensin.

.apz :

[quote]http://www.mediafire.com/?k8zcj330c7o5awa[/quote]

Edited by HalilYanar
Link to comment
Share on other sites

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.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...