Delphi的DirectoryListBox1控件上,如何按F2让目录可编辑?
procedure TForm4.sBitBtn11Click(Sender: TObject);var
s: AnsiString;
begin
DirectoryListBox1.OpenCurrent;
s := DirectoryListBox1.GetItemPath(DirectoryListBox1.ItemIndex);
CreateDir(s + '\新建子文件夹1');
DirectoryListBox1.Update;
end;
问题1: Delphi的DirectoryListBox1控件上,如何按F2让选中的目录可编辑?
问题2:DirectoryListBox1 上面,如何删除选中的文件夹? 试了几种方法,都不能删除子文件夹呢? 试了下面的不行啊。
// DirectoryListBox1.SetFocus;
//DirectoryListBox1.CanFocus;
// DirectoryListBox1.Focused;
页:
[1]