csv파일을 excel루 open하구 닫지 않은 상태에서 다시 전환하믄 'Can't not Create'라구 error가...--;;;



/////***************소스입니다!!!***********************//

procedure SetCsv2Excel(CsvData:String;const SaveDialog:TSaveDialog;const Title:string);

var

sExcelData : TStrings;

F: TextFile;

begin

if (CsvData <> '') then

begin

try

sExcelData := TStringList.Create;

CsvData := Title+CsvData;

sExcelData.Add(CsvData);



sExcelData.SaveToFile(SaveDialog.FileName);

SaveDialog.Filter := '(*.*)|*.*';



SaveDialog.Execute;

ShellExecute(GetDesktopWindow,'open',Pchar

(SaveDialog.FileName),nil,nil,SW_NORMAL);

finally

sExcelData.free;

end;

end // end of while

else

showmessage('엑셀로 변환할 자료가 없습니다!');

end;



전 SaveDialog를 이용해서 먼저 저장 한 후 그 파일을 엽니다

그 파일을 사용중인데 다시 저장하고 open하려니 나는 error인거 같은데...

방법이 영 생각 나지 않습니다.

도움을 부탁드립니다(*^-^)