Для работы с файлами
FileExist
Function FileExist(AFilename: string):boolean;
// возвращает 1 если файл AFilename существует или 0 если не существует
LineFromFile
Function LineFromFile(AFileName: string; AlineNum):string;
// Возвращает содержимое строки AlineNum из файла AFileName
StringFromFile
Function StringFromFile(AFileName: string):string;
// Возвращает содержимое файла
mediadir
function mediadir: string;
функция Медиа_директорий: текст;
// Возвращает путь на сервере к папке media