Функция frename

[OKStyle]

Поскольку стандартной функции по переименованию файлов нет, была написана такая функция. Принцип работы: открыли, все скопировали, удалили, создали новый - записали. Я бы ещё сюда добавил проверку на существование файла и его статус (открыт/закрыт). Если всё это есть в коде до использования функции, то и не надо.

stock frename(old_path[], new_path[])
{
    new File:file = fopen(old_path, io_read), str[128], big_str[2048]; // 2048 - максимальное кол-во символов в файле, 128 - максимальная длина строки
    while(fread(file, str)) strcat(big_str, str);
    fclose(file);
    fremove(old_path);
    file = fopen(new_path, io_write);
    fwrite(file, big_str);
    fclose(file);
    return 1;
}

Использовать так:

frename("Mr.Frog.ini", "Frog_Frog.ini"); // переименует Mr.Frog.ini в Frog_Frog.ini

Автор: frog163