File.GetFileSize
| GetFileSize (Размер файла) | |||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||
Функция возвращает размер указанного файла в байтах. Если файл не существует, функция возвращает 0.
Синтаксис
File.GetFileSize(<Путь и имя файла (STRING)>):<Размер файла в байтах (INT)>
Аргументы
<Путь и имя файла (STRING)>- Путь и имя файла. Путь может быть как серверным и так и локальным (Имена файлов).
Возвращаемое значение
Возвращается целое число, размер существующего файла в байтах.
Примеры
Файл:="";
If OpenFileDialog(Файл,"Выберите файл с образом удостоверения","Файлы в формате JPG|*.jpg",1,"jpg") Then
If File.GetFileAttributes(Файл) And _FILE_ATTRIBUTE_READONLY<>0 Then
Box("Файл имеет атрибут только для чтения! Снимите пометку перед использованием!",Q_STOP);
Exit;
EndIf;
аРазм:=File.GetFileSize(Файл);
If аРазм/1024>МаксРазмер Then
Box("Размер файла удостоверения слишком велик ("+глФРМ(аРазм/1024)+"Кб)! Не разрешается добавлять удостоверения размером более "+
МаксРазмер+"Кб! Измените разрешение при сканировании, либо отредактируйте картинку в граф. редакторе!",Q_STOP);
Exit;
EndIf;
//Проверка на корректный формат
аБуф:=Buffer.Create();
аБуф.LoadFromFile(Файл,0,2);
if аБуф.GetWord(0)<>55551 Then //$d8ff
Box("Поддерживаются только картинки в формате JPG, даже если выбранный файл имеет расширение JPG, внутренний формат его не соответствует этому расширению!",Q_STOP);
Exit;
EndIf;
...
EndIf;