ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Продолжение темы Вопросы по Delphi (до версии 2009) - часть 4 Познаем сами, помогаем другим... Обсуждаем вопросы, не связанные с юникоидными версиями Delphi - для этого есть соответствующая тема (см. ссылки ниже). Правила топика: Прежде чем спрашивать: Желательно изучить вопрос, попытаться найти ответ в прилагаемых мануалах, хелпах и анализируя исходники. Выполнить поиск по топику (открыть "Версия для печати" и поискать ответ там). Применить фильтр по разделу "Прикладное программирование". Ответы на многие старые вопросы могли быть даны в отдельных темах. Продумайте вопрос. На поверхностные вопросы вы получите поверхностные ответы, или вообще ответов не получите. Желательно указывать версии используемого компилятора и операционной системы. Прежде чем отвечать: Если не можете помочь, не мешайте. Если уж вы отвечаете на вопрос, давайте ответ по сути. Если вы не уверены, так и говорите! Ошибочный, но авторитетно звучащий ответ хуже, чем отсутствие ответа. Задавайте дополнительные вопросы, чтобы получить больше информации. Отсутствие ответа не равносильно игнорированию - иногда участники форума просто не знают ответ. Повторная посылка вопроса не приветствуется. Посты типа "неужели никто не знает ответа..." или "может мне все-таки кто-нибудь ответит" недопустимы.   Все большие куски кода (более 5 строк) оформляем в тег [morе] дабы уменьшить размер поста. FAQ по тегу [morе]. Некоторые "родственные" топики: Вопросы по Delphi (версии 2009-2010 Weaver) Вопросы по компонентам для Delphi, C++ Builder Использование DevExpress Вопросы по Ehlib Компоненты и утилиты для Delphi/BCB/FreePascal/Lazarus - только Open Source Коммерческие компоненты и утилиты для Delphi/BCB Прикладное программирование и не только... См. также: Некоторые полезные ресурсы о Delphi Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:09 28-06-2009 | Исправлено: psa1974, 12:00 02-02-2010

diodio Junior Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Добрый день! Подскажите, пожалуйста.   Использую FileCopy и FileDelete из Jedi. Т.е. файл копируется, и если существует по пути копирования, то удаляется. Иногда по каким-либо причинам файл не удаляется, после этого программа уходит в бесконечный цикл по копированию этого файла. Как от этого можно избавиться? Или подскажите, как удалить файл не взирая на то, что он занят другим приложением, либо дождаться, пока файл не "освободится". Спасибо. Всего записей: 111 | Зарегистр. 26-12-2006 | Отправлено: 10:10 30-09-2009

diodio Junior Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору false. Но что это меняет? Всего записей: 111 | Зарегистр. 26-12-2006 | Отправлено: 11:40 30-09-2009

V1s1ter Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору diodio Я тоже сталкивался с таким моментом, но в моем случае нельзя было удалять файлы принудительно. Я посмотрел как подобную проблему решали другие и увидел следующее: 0) Счетчик := 0 1) пытаемся чего-то сотворить с файлом 2) если ладушки - на выход 3) ждем 1 сек 4) обрабатываем очередь сообщений виндовс 5) Счетчик := Счетчик+1 6) если Счетчик < 5 идем на шаг 1 7) спрашиваем у пользователя "пытытся еще?" если ответ да на шаг 0 8) выход         Всего записей: 948 | Зарегистр. 06-02-2007 | Отправлено: 12:11 30-09-2009

diodio Junior Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Спасибо, попробую Всего записей: 111 | Зарегистр. 26-12-2006 | Отправлено: 12:13 30-09-2009

SReg84 Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Привет, ребята! Необходима Ваша помощь Значит, имеется некий драйвер, к примеру dev.sys, к нему "в комплекте" идёт файл с необходимыми параметрами установки dev_install.inf Так вот трабла в чем... Как его установить в систему программно,"по-тихому", а не с помощью Мустера_Установки_Нового_Оборудования? Так, чтобе после ребута, его возможно было бы увидеть в списке "Системные устройства" в Диспетчере устройств. Пробывал просто скопировать эти два файла в %SystemDir%\drivers\ то система при загрузке его "не подхватывает" Если можно, то конечно желательно бы кусочек кода (или ссылку на крайняк), я новичек в программировании... Заранее Огромное спасибо! Всего записей: 939 | Зарегистр. 21-10-2008 | Отправлено: 13:54 30-09-2009

SReg84 Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Цитата: Ну и при чем тут Delphi? Как причем? Мне необходимо реализовать вышеописаную процедуру, именно на дельфи Всего записей: 939 | Зарегистр. 21-10-2008 | Отправлено: 14:37 30-09-2009

ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору SReg84 По тихому вряд ли получится - если у драйвера нет цифровой подписи, то винда ругнется. Второе - подобное поведение свойственно руткитам и прочим вредным вещам, поэтому объясни для чего тебе это надо, в противном случае в андеграунд иди. Ну и третье - либо я ламер в Дельфи, либо это далеко не типовой вопрос. Так как когда я начинал изучать Дельфи то вопрос, как установить драйвер устройства меня занимал в последнюю очередь. И в четвертых, тебе повезло вот код Код:          uses   ShellAPI;   function InstallINF(const PathName: string; hParent: HWND) : boolean; var   instance: HINST; begin { InstallINF }   instance := ShellExecute(     hParent,     PChar('open'),     PChar('rundll32.exe'),     PChar('setupapi,InstallHinfSection DefaultInstall 132 ' + PathName),     nil,     SW_HIDE);       Result := instance>32 end; { InstallINF }     ---------- И создал Бог женщину... Существо получилось злобное, но забавное... Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:19 01-10-2009 | Исправлено: ShIvADeSt, 02:27 01-10-2009

SReg84 Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору ShIvADeSt Цитата: если у драйвера нет цифровой подписи да, дрова не подписаны мелкосфтом.   Цитата: Второе - подобное поведение свойственно руткитам и прочим вредным вещам, поэтому объясни для чего тебе это надо, в противном случае в андеграунд иди. ну почему сразу "вредным"? кстати, дрова общедоступны, вот гуглевская ссылка. Для чего? просто решил наваять ГУИ для разных версий... А насчет кода... так это видел... так что мне не очень то и повезло,т.к я гуглил пару часов перез тем, как задать вопрос. Он просто дублирует П.К.М. на *.inf -> "Install", но в реестре, к примеру я не нахожу тех ключей, которые прописаны в нём(.inf). через tRegistry прописать геморно как то, тк. ключей разных видов туева хуча... Вот я и подумал, может кто то сталкивался с подобной проблемой?   volser Цитата: Ну и при чем тут Delphi? А по-твоему, дельфи только для того, чтоб Хелло Ворлд выводить на экран?       Всего записей: 939 | Зарегистр. 21-10-2008 | Отправлено: 19:03 02-10-2009 | Исправлено: SReg84, 19:05 02-10-2009

Smokeer Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору SReg84 А вы сравните реестр до установки драйвера и после, заодно и файлы (Вообще для подобных задач нужно не так Дельфю копать как внутреннее устройство винды) Разницу без проблем сможете внести с помощью Delphi. Всего записей: 781 | Зарегистр. 25-09-2005 | Отправлено: 21:53 02-10-2009 | Исправлено: Smokeer, 21:54 02-10-2009

ShIvADeSt Moderator Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору SReg84 Цитата: А насчет кода... так это видел... так что мне не очень то и повезло,т.к я гуглил пару часов перез тем, как задать вопрос. Он просто дублирует П.К.М. на *.inf -> "Install", но в реестре, к примеру я не нахожу тех ключей, которые прописаны в нём(.inf). через tRegistry прописать геморно как то, тк. ключей разных видов туева хуча... Вот я и подумал, может кто то сталкивался с подобной проблемой? В девайс менеджере устройство появилось (например в скрытых)? Если да, то вопрос решен, если нет - то установи драйвер как надо (через установку оборудования), перед этим сделав снимок реектра, после установки сравни со снимком. Разницу сравни стем случаем, когда ты ставишь через ПКМ Istall. И вот эту разницу вручную добавляй в реестр. Я так понимаю -тебе главное результат. ---------- И создал Бог женщину... Существо получилось злобное, но забавное... Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:51 03-10-2009

YuriyRR Full Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору UshastikChB1 "Фаронов Шумаков Базы данных.djvu"   http://slil.ru/28040511 Всего записей: 516 | Зарегистр. 07-06-2007 | Отправлено: 04:53 04-10-2009

GPSGURU Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Всем привет. У меня вопрос по делфи. В моей программе, которую я пишу, есть параметры, которые необходимо наблюдать: некоторые поля БД, значения переменных и т.д. Также в программе есть действия (функции), которые можно выполнить: послать почту, вывести сообщение, записать в лог и т.д. Вопрос: как организовать для пользователя создания "связок" наблююдаемый параметр - действие? Например, пользователь выбирает параметры которые нужно отслеживать (например значения 2-х полей БД, допустим поля булевые) и если оба поля сработали (равны true), то выполнить действие (например послать почту с сообщением). Проблема в том, что я даже не знаю как подойти к этой задаче, с какого боку. Как организовать возможность делать такие цепочки событий-срабатываний? Помогите кто  может, у кого есть практика, может где-то описано это уже. Всего записей: 84 | Зарегистр. 06-05-2008 | Отправлено: 08:01 05-10-2009

data man Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору OOD Цитата: подумал что возможно хитрый вирус заразил Delphi 7 Так и есть Delphi-“вирус”: проверьте свою установленную Delphi! Virus.Win32.Induc.a: энцать дней спустя (FAQ) Дабы сократить время на чтение Цитата: Проверьте свои установки Delphi (версий с 4 по 7 включительно) и, если найдёте у себя SysConst.bak, выполните следующие действия: Удалите SysConst.dcu Скопируйте SysConst.bak в SysConst.dcu. Важно именно скопировать, а не переименовать, чтобы SysConst.bak тоже остался на диске - это убережёт систему от повторного заражения, т.к. вирус не производит заражения, если находит SysConst.bak, считая, что свою работу он уже выполнил. ---------- Любой достаточно развитый тролль неотличим от подлинно помешанного на какой-либо идее. Кекс. Антибиотики. Ламбада. Всего записей: 1696 | Зарегистр. 13-10-2005 | Отправлено: 14:33 05-10-2009 | Исправлено: data man, 14:38 05-10-2009

GPSGURU Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Как вариант используйте EurekaLog, там есть функция шифрования файла (антиотладочные приемы). Возможно антивирус срабатывает на какую-то сигнатуру. Всего записей: 84 | Зарегистр. 06-05-2008 | Отправлено: 14:35 05-10-2009

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (до версии 2009) - часть 5

ShIvADeSt (19-05-2010 05:14): Продолжаем тут http://forum.ru-board.com/topic.cgi?forum=33&topic=11215

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование