해당 함수들이 있습니다.

확장자가 바뀐 파일명을 얻는 함수의 원형은

function ChangeFileExt(const FileName, Extension: string): string;

델파이의 도움말을 참조하시면 됩니다.

그리고, RenameFile 함수를 이용하시면 되겠습니다.

요건 이름을 파일명을 실제로 변경하는 거죠.

이 둘을 응용해서 넘겨진 FileName을 해당 확장자로 바꾸는 함수를 만들어보면,

procedure RenameFileEx(const FileName, Extension: String);
var
  TmpFileName : String;
begin
  TmpFileName := ChangeFileExt(FileName, Extension);
  RenameFile(FileName, TmpFileName);
end;

라고 하면 되겠네요.

확장자가 dat인 하일을 txt로 변경하려면,

RenameFileEx(FileName, '.Txt'); //FileName의 값이 ABC.DAT라고 하면
                                //ABC.TXT라는 화일로 바꾸어 지겠죠.

라고 하시면 되겠죠.

온라인상으로 적는것 이라서 확인을 못해 봤습니다.

                                               유수~