DevHyun

예를들어 C:\TEMP Directory가 있으면 제거, 없으면 생성하는 작업을 한다면? Procecure TForm1.Button1Click(Sender: TObject); begin //if DirectoryExists('확인하고자 하는 경로') then if DirectoryExists('C:\TEMP') then begin //RemoveDirectory('경로'); RemoveDirectory('C:\TEMP'); end else begin //CreateDir('경로'); CreateDir('C:\TEMP'); end; end;

파일 copy나 move 후 윈도우 탐색기에서 특정 경로의 directory를 오픈하고 싶을때 uses ..., shellapi ... .. . procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(Handle, 'open', PChar('경로'), nil, nil, SW_SHOWNORMAL); end;