lerik2703
Full Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Цитата:| У меня такой ошибки не возникает. |
Видимо потому что у тебя английская версия  просто глюк русика!
при том твой пример работает а вот со строкой String.Replace уже ошибка!
Цитата:| ListBox открывалось содержимое этой папки в формате pdf.- |
Код: sDate = ComboBox.GetItemData("ComboBox2", e_Selection);
if sDate == "korni" then
sFilePatch=_SourceFolder.."\\Autoplay\\Docs\\Pop\\Корни"
elseif sDate == "ddt" then
sFilePatch=_SourceFolder.."\\Autoplay\\Docs\\Rok\\Ддт"
else
sFilePatch=""
end
if sFilePatch ~= "" then
file = File.Find(sFilePatch, "*.pdf", false, false, nil);
if file ~= nil then
ListBox.DeleteItem("ListBox1", -1);
for j,strFilePatch in pairs (file) do
title = strFilePatch;
title = String.Right(title, (String.Length(title) - String.ReverseFind(title, "\\", true)));
ListBox.AddItem("ListBox1", title , strFilePatch);
end
else
Dialog.Message("", "Не найдено ни одного Файла ", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end
end |
Как-то так
Код для открытия файла во вкладку on Double-Click объекта ListBox
Код: selected_items = ListBox.GetSelected("ListBox1");
if (selected_items ~= nil) then
for index, item in pairs (selected_items) do
result = ListBox.GetItemData("ListBox1",item);--получаем путь к файлу
end
File.Open(result, "", SW_SHOWNORMAL); --открываем файл (здесь вожможно несколько вариантов)
end |
|
Всего записей: 403 | Зарегистр. 05-01-2010 | Отправлено: 11:24 03-12-2010 | Исправлено: lerik2703, 12:56 03-12-2010 |
|
Дружественная тема в Варезнике
Можете выложить пример рабочего скрипта?