Klasör isimlerinin DropDownList İle Gösterilmesi Gönderen: cemaliozan Tarih: 06 October 2007 11:08:01
Kodlama dili (delphi)
procedure TWebForm_GaleriDuzenle.Button_Galeri1_Click(sender: System.Object; e: System.EventArgs);
Var
DirInfo : DirectoryInfo;
DirList : Array of DirectoryInfo ;
i : Integer;
Item : ListItem;
begin
try
DirInfo := DirectoryInfo.Create(Server.MapPath('../galeri/kucukboy'));
DirList := DirInfo.GetDirectories;
DropDownList_DirList.Items.Clear;
For i:=Low(DirList) to High(DirList) do
begin
Item := ListItem.Create(DirList[i].get_Name.ToString,DirList[i].get_Name.ToString);
DropDownList_DirList.Items.Add(Item);
end;
finally
DirInfo.Free;
end;
end;