Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Сообщения: 27449
Благодарности: 8088

Профиль | Отправить PM | Цитировать


Цитата YuS_2:
А смотреть - всегда полезно, прежде чем, что-то удалять и уничтожать... »
Ну, не знаю… Вот именно из своей практики использования — не смотрю. Тупо пытаюсь удалять искомый поток Zone.Identifier с текущего или выделенных файлов панели:
Скрытый текст
Код: Выделить весь код
local FILE_ATTRIBUTE_DIRECTORY = 0x00000010

if APanel.Visible then                                                                                                              -- Активная панель видима?
	if APanel.FilePanel and APanel.Type == 0 then                                                                                   -- Активная панель файловая?
		if APanel.Selected then                                                                                                     -- Активная панель содержит выделенные элементы?
			for i = 1, APanel.ItemCount do                                                                                          -- Перебираем все элементы активной панели
				if Panel.Item(0, i, 8) then                                                                                         -- i-тый элемент активной панели выделен?
					if bit64.band(Panel.FAttr(0, Panel.Item(0, i, 0)), FILE_ATTRIBUTE_DIRECTORY) ~= FILE_ATTRIBUTE_DIRECTORY then   -- i-тый элемент не папка?
						win.DeleteFile(APanel.UNCPath .. "\\" .. Panel.Item(0, i, 0) .. ":Zone.Identifier")
					end

					Panel.Select(0, 0, 1, i)
				end
			end
		else
			win.DeleteFile(APanel.UNCPath .. "\\" .. APanel.Current .. ":Zone.Identifier")
		end
	else
		mf.msgbox("Не файловая панель", "Активная панель не файловая", 0x00010001)
	end
else
	mf.msgbox("Нет видимых панелей", "Нет видимых панелей", 0x00010001)
end

Я не к тому, что смотреть совсем не надо. Просто лично у меня концепция «сначала посмотри, есть ли поток Zone.Identifier, потом удали его» в практическом использовании достаточно быстро выродилась в «просто удали поток Zone.Identifier», потому как это быстрее, а конечный результат тот же .

Отправлено: 00:18, 15-08-2019 | #9