DirectoryListBox

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
aveysel
Üye
Mesajlar: 151
Kayıt: 16 Mar 2004 03:53
Konum: Internet
İletişim:

DirectoryListBox

Mesaj gönderen aveysel »

DiroctoryListBox da bir üst klasöre nasıl çıkabilirim?
Select * From LiFe Where Your EYES
http://Www.Gebze.Org
P206
Kıdemli Üye
Mesajlar: 395
Kayıt: 17 Haz 2003 12:36
Konum: İstanbul

Mesaj gönderen P206 »

Merhaba,

Aklıma gelen bir yol aşağıda ki gibi. Bunun başka bir komutlada belki yapılabilir ama.

var
a:string;
i,tut:integer;
begin
a:=DirectoryListBox1.Directory;
for i:=length(a) DOWNto 0 do
if a='\' then begin
tut:=i;
Break;
end;
DirectoryListBox1.Directory:=copy(a,1,tut);
end;

Bu şekilde yapabilirsin.

Kolay Gelsin.
Cevapla