Jump to content
Son zamanlarda artan kullanıcı hesap hırsızlıkları sebebiyle tüm kullanıcılara şifre sıfırlama maili gönderilmiştir. Lütfen güveli şifreler seçiniz. Mevcut e-mail adresinize erişemiyorsanız, en aşağıdaki destek linkinden bize ulaşınız. ×

Ams De Listbox Sorunu


sPYcas
 Share

Recommended Posts

sa arakdaşlar amsde listboxa ekledigimiz ögelere ayrı ayrı görev atamak istiyorum bunu nasıl yaparım acaba. görev atama işlemi sade bir klasör açtıracagım. ancak komutu hempsi için algılıyor ve birine tıklayınca bütün klasörleri açıyor. ben tek tek göre atamak istiyorum bunu nasıl yaparım arkadaşlar yardımlarını bekliyorum....
Link to comment
Share on other sites

Bunu iki şekilde yapabilirsin.

1- Seçilen metne göre hareket etmek:

[code]nSelected = ListBox.GetSelected(this)

if nSelected ~= -1 then
sSelected = ListBox.GetItemText(this, nSelected)
if sSelected == "Item 1" then
-- Item 1 seçilince çalışacak kodlar
elseif sSelected == "Item 2" then
-- Item 2 seçilince çalışacak kodlar
end
end[/code]

2- Seçilen sıraya göre hareket etmek:

[code]nSelected = ListBox.GetSelected(this)

if nSelected ~= -1 then
if nSelected == 1 then
-- 1. sıradaki seçilince çalışacak kodlar
elseif nSelected == 2 then
-- 2. sıradaki seçilince çalışacak kodlar
end
end[/code]

Link to comment
Share on other sites

kintaro krdeş bunlar olmadı galiba anlatadım tam olarak. listboxa eklediklerime klaösr açtırtacagım. yani 1.sine çift tıklandıgında bir klaösr. 2.sine tıklandıgında ise başka bir klsör açılacak ayrı ayrı işlem yapacak jer birisi werdgin kodları ikisinede denedim ama çalışmadı bile hiç bir işlem yapmadı.. klasör açtırtıyorum ancak hepsini açıyor... ben ise hangisine tıklanırsa ona atadıgım klasörün açılmasını istiyorum... yardımların için teşekkürler..

Link to comment
Share on other sites

verdiğim kodların altına File.ExploreFolder komutu ile bunu pekala yapabilirdin. Neyse 3. yolu vereyim;

[img]http://min.us/jmZLK2.png[/img]

resimdeki gibi [b]Item Text[/b] kısmına metni, [b]Item Data[/b] kısmınada klasör yolunu girin, ve listbox on double click evresine sunları yazın:

[code]nSelected = ListBox.GetSelected(this)
if nSelected ~= -1 then
sData = ListBox.GetItemData(this, nSelected)
File.ExploreFolder(sData, SW_SHOWNORMAL)
end[/code]

Link to comment
Share on other sites

ya docs klasorunun içinde programlar diye bi klasor olsun onu açtırmak istiyorsun diyelim mesela

text kısmına Programlar yaz

item kısmına programlar yaz

File.ExploreFolder(sData, SW_SHOWNORMAL)

satırınıda

File.ExploreFolder(_SourceFolder .. "\\Autoplay\\Docs\\" .. sData, SW_SHOWNORMAL)

seklinde değiştir.

Link to comment
Share on other sites

getselected'in number yerine table döndürdüğünü unutmuşum pardon. şunu dene;

[quote]nSelected = ListBox.GetSelected(this)
if nSelected ~= -1 then
sData = ListBox.GetItemData(this, nSelected[1])
File.ExploreFolder(_SourceFolder .. "\\Autoplay\\Docs\\" .. sData, SW_SHOWNORMAL)
end[/quote]

Link to comment
Share on other sites

nSelected = ListBox.GetSelected(this)
if nSelected ~= -1 then
sData = ListBox.GetItemData(this, nSelected[1])
--File.ExploreFolder(_SourceFolder .. "\\Autoplay\\Docs\\" .. sData, SW_SHOWNORMAL)
File.ExploreFolder("AutoPlay\\Docs\\8051 Mikrokontrolcü Ailesi", sData, SW_SHOWNORMAL);
end

bu kodda çalışmadı... yada ben yapamadım. kintara ustam bu böyle olmayacak.. dediğim gibi sen bir örnek yapsan basitce birşey..ancak öle çözünecek bu sorun... yardımların için teşekkürler...

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...