neocity wrote:

> listview의 아이템이 증가 할때만다 listview의 형태대로 디렉토리를 생성 할려구 합니다. 만약에 CreateDir를 써서 디렉토리를 만든 다음 Treeview의 item을 Rename할 경우 어떻게 해야될지 모르겠습니다.





안녕하세요~ 구창민입니다.



델파이 함수중 ForceDirectory 라는 함수가 있습니다.

하위 디렉토리(다계층 디렉토리)까지 단칼에 생성시키죠.



procedure TForm1.Button1Click(Sender: TObject);

var

Dir: string;

begin

Dir := 'C:Test구창민바보';

ForceDirectories(Dir);

if DirectoryExists(Dir) then

Label1.Caption := Dir + ' was created'

end;







그리고, 말씀하신 두번째 질문은

먼저 ListView의 Item의 이름을 변경하고

실제 디렉토리의 이름을 변경해주면 됩니다.

디렉토리 명의 변경은 RenameFile이란 함수로 할수있죠.



procedure TForm1.Button1Click(Sender: TObject);

var Dir: String;

begin

Dir:= 'C:공유';

if DirectoryExists(Dir) then

if not RenameFile(Dir,'C:안공유') then

ShowMessage('디렉토리명 바꾸기 실패');

end;



그럼, 즐거운 프로그래밍 하시길~