Table.Object.LastLoadedImagePath
Revision as of 18:36, 3 September 2020 by Admin (talk | contribs) (Created page with "{{infobox function |name=Object.LastLoadedImagePath |object=Электронная таблица |caption=Доступ к сво...")
Object.LastLoadedImagePath (Доступ к свойствам объектов) | |||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
Атрибут возвращает наименование файла последней загруженной картинки для визуальных объектов таблицы с типом картинка. Если картинка не была загружена с диска или объект не является картинкой, атрибут возвращает пустую строку. Признак сохраняется в объекте, к примеру, для универсальных обработчиков печати, и будет заполнен только если картинка была загружена в виде файла. Атрибут работает только, когда визуальный объект был выбран для работы в текущем объекте.
Синтаксис
Table.Object.LastLoadedImagePath:<Наименование файла последней загруженной картинки (STRING)>
Возвращаемое значение
Возвращает строковое значение.
Примеры
//Сохраним список файлов, загруженных в таблицу Таб с диска вместе с индексами объектов, контрольной суммой и размерами. СтрФайлы:=""; For i:=1 To Таб.Objects.Count Do Об:=Таб.Objects(i); If Об.LastLoadedImagePath<>"" Then Файл:=Об.LastLoadedImagePath; If File.DoesFileExist(Файл) Then CRC:=File.ComputeFastCRC(Файл); Размер:=File.GetFileSize(Файл); СтрФайлы:=СтрФайлы+?(СтрФайлы<>"",Chr(1))+Файл+Chr(2)+Str(CRC)+Chr(2)+Str(Размер)+Chr(2)+i; EndIf; EndIf; EndDo; //Сохраним таблицу в память без загруженных картинок Буфер:=Buffer.Create(); Размер:=Таб.SaveToBuffer(Буфер,0,"SFT",1); ...