Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Вопросы по Delphi (до версии 2009) - часть 6

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 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 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125

Открыть новую тему     Написать ответ в эту тему

ShIvADeSt



Moderator
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Продолжение темы Вопросы по Delphi (до версии 2009) - часть 5

Познаем сами, помогаем другим...
Обсуждаем вопросы, не связанные с юникоидными версиями Delphi - для этого есть соответствующая тема (см. ссылки ниже).


 
Правила топика:
    Прежде чем спрашивать:
  1. Желательно изучить вопрос, попытаться найти ответ в прилагаемых мануалах, хелпах и анализируя исходники.
  2. Выполнить поиск по топику (открыть "Версия для печати" и поискать ответ там).
  3. Применить фильтр по разделу "Прикладное программирование". Ответы на многие старые вопросы могли быть даны в отдельных темах.
  4. Продумайте вопрос. На поверхностные вопросы вы получите поверхностные ответы, или вообще ответов не получите.
  5. Желательно указывать версии используемого компилятора и операционной системы.
    Прежде чем отвечать:
  1. Если не можете помочь, не мешайте.
  2. Если уж вы отвечаете на вопрос, давайте ответ по сути.
  3. Если вы не уверены, так и говорите! Ошибочный, но авторитетно звучащий ответ хуже, чем отсутствие ответа.
  4. Задавайте дополнительные вопросы, чтобы получить больше информации.
  • Отсутствие ответа не равносильно игнорированию - иногда участники форума просто не знают ответ. Повторная посылка вопроса не приветствуется. Посты типа "неужели никто не знает ответа..." или "может мне все-таки кто-нибудь ответит" недопустимы.  
  • Все большие куски кода (более 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 | Отправлено: 05:13 19-05-2010 | Исправлено: akaGM, 02:33 15-07-2020
    GRom V

    Full Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    MikeZ
    greenpc
    Огромное спасибо! Действительно все просто...
     
    Добавлено:
    А можно как нить сделать чтоб клавиша alt отлипала после первого нажатия мышкой?
     
    И можно ли заблокировать кнопку Windows на клаве?

    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 03:53 04-11-2010 | Исправлено: GRom V, 09:22 04-11-2010
    Frodo_Torbins

    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    GRom V
    Можно, с помощью ловушек: http://www.delphimaster.ru/articles/hooks/index.html

    Всего записей: 2318 | Зарегистр. 24-05-2007 | Отправлено: 11:45 04-11-2010
    MikeZ

    Full Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    GRom V
    Попробуй, например, TrasWinGod - компонент-перехватчик мыши, клавиатуры и сист. событий. Некоторые антивирусы принимают способность перехватывать события за угрозу, но это просто реализация ловушек, теорию которых дал Frodo_Torbins.

    Всего записей: 407 | Зарегистр. 01-02-2004 | Отправлено: 15:58 04-11-2010
    Sarge1978



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Всем привет!
    Можно ли как-то узнать версию Delphi,  с помощью которой была собрана программа?

    Всего записей: 134 | Зарегистр. 12-03-2005 | Отправлено: 11:20 05-11-2010
    Frodo_Torbins

    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Sarge1978
    Можно, но не на 100% точно. Обычно применяют тот же принцип, что и в антивирусах - ищут сигнатуры присущие только данной конкретной версии делфи. Пример такой проги: http://exeinfo.fortunecity.com/

    Всего записей: 2318 | Зарегистр. 24-05-2007 | Отправлено: 12:15 05-11-2010
    Sarge1978



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Frodo_Torbins
    Спасибо, за ответ. Дальше сам.

    Всего записей: 134 | Зарегистр. 12-03-2005 | Отправлено: 15:04 05-11-2010 | Исправлено: Sarge1978, 16:29 05-11-2010
    GRom V

    Full Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Кто нить знает как можно заблокировать кнопку "Пуск" в виндовс 7?
     

    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 16:47 06-11-2010
    Frodo_Torbins

    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    GRom V
    Как именно заблокировать? Скрыть совсем, подменить своей, сделать чтобы не нажималась? И для чего вообще это нужно?

    Всего записей: 2318 | Зарегистр. 24-05-2007 | Отправлено: 18:16 06-11-2010
    GRom V

    Full Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Frodo_Torbins

    Цитата:
    Как именно заблокировать? Скрыть совсем, подменить своей, сделать чтобы не нажималась? И для чего вообще это нужно?

     
    Смысл - чтоб не работала. На комп будет установлена специалезированная программа, и не чего кроме нее возможности запустить быть не должно. Все получилось кроме меню пуск - в семерочке примеры которые нашел не работают...

    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 04:23 07-11-2010
    Bonivur



    Advanced Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    GRom V
    А кто мешает воткнуть флэшку с FAR или Total Commander и запустить всё что надо? Или же создать текстовый документ со строчкой вызова программы (например, C:\Windows\Notepad.exe) и поменять расширение на .bat ?

    ----------
    Что будет стоить тысяча слов когда важна будет крепость руки? (В.Цой)

    Всего записей: 655 | Зарегистр. 22-06-2003 | Отправлено: 11:12 07-11-2010
    GRom V

    Full Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Bonivur

    Цитата:
    А кто мешает воткнуть флэшку с FAR или Total Commander и запустить всё что надо? Или же создать текстовый документ со строчкой вызова программы (например, C:\Windows\Notepad.exe) и поменять расширение на .bat ?

     
    Чтобы создать батник нужно хотябы гдето его создать...рабочего стола как такогого не будет, флешка легко отключается в диспетчере устройств, который блокируется программой...и т.д. ну это уже уход от темы.. у меня на данный момент  одна - Как отключить меню пуск в Win 7! Можно конечно заблокировать explorer, но эт не правильно как то...

    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 15:44 07-11-2010
    Bonivur



    Advanced Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    GRom V
    А  

    Код:
     
    EnableWindow(FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'Button', nil), FALSE);
     

    не работает ?

    ----------
    Что будет стоить тысяча слов когда важна будет крепость руки? (В.Цой)

    Всего записей: 655 | Зарегистр. 22-06-2003 | Отправлено: 16:10 07-11-2010
    Frodo_Torbins

    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    В принципе вариант Bonivurа должен сработать.
    Хотя иногда бывает, что у пользователя стоит нестандартный шел. В этом случае единственный более менее надежный способ (кстати используемый в UAC) - это запуск проги на отдельном рабочем столе. Тут затруднения возникнут даже у очень продвинутых пользователей.
    Но опять же при наличии времени пользователь может извернутся например через "Windows XP Mode". Короче получаем проблему меча и щита.

    Всего записей: 2318 | Зарегистр. 24-05-2007 | Отправлено: 16:40 07-11-2010 | Исправлено: Frodo_Torbins, 16:42 07-11-2010
    GRom V

    Full Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Bonivur

    Цитата:
    Код:  
    EnableWindow(FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'Button', nil), FALSE);  
     

     
    Спасибо за попытку, но к сожелению в семерке не пашет... - кнопка пуск работает...

    Всего записей: 466 | Зарегистр. 31-10-2006 | Отправлено: 08:06 08-11-2010
    ShIvADeSt



    Moderator
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    GRom V
    ИМХО отдельная тема будет уместнее.

    ----------
    И создал Бог женщину... Существо получилось злобное, но забавное...

    Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 08:20 08-11-2010
    Bonivur



    Advanced Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    GRom V
    пробовал удалить ключ  
    HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{a2a9545d-a0c2-42b4-9708-a0b2badd77c8}  


    ----------
    Что будет стоить тысяча слов когда важна будет крепость руки? (В.Цой)

    Всего записей: 655 | Зарегистр. 22-06-2003 | Отправлено: 10:24 08-11-2010
    mr_gorka



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Здравствуйте  
     
    Задача :  
    Пользователь указывает высоту (h) в мм .
    Нужно, выбрать оптимальное сочитания колец
    (что бы осталось как можно меньше мм, в лучшем случае 0)
     
    Существуют кольца такой высоты :
    1) 890 мм
    2) 490 мм
    3) 290 мм
     
    Обязательные кольца:
    1) 70 мм
    2) 150 мм
     
    То есть от указанной высоты (h) мы сразу отнимаем эти кольца.  
    h:=h-(70+150);
     
    Вот интерфейс, что бы понятней было ..
    Подробнее...
     
    P.S. Извините если ошибся разделом.  
           Заранее Спасибо.
     
    Спасибо решено )..

    Всего записей: 71 | Зарегистр. 26-09-2007 | Отправлено: 18:42 08-11-2010 | Исправлено: mr_gorka, 16:43 09-11-2010
    pavlo1704

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Прошу помощи. Делаю проект на Delphi7 под Windows XPMode. На Виртуальной машине .exe запускается, а в Windows 7 - собщение: Зпуск программы невозможен, т.к. на компе отсутствует dss70.bpl. В чем  причина?

    Всего записей: 21 | Зарегистр. 16-04-2009 | Отправлено: 14:35 09-11-2010
    ShIvADeSt



    Moderator
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    pavlo1704

    Цитата:
    т.к. на компе отсутствует dss70.bpl. В чем  причина?

    Мммм попытаюсь предположить - на компе с вин7 нет такого файла. Возьми его с виртуалки и кинь в системную папку вин7 и все заработает.

    ----------
    И создал Бог женщину... Существо получилось злобное, но забавное...

    Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 14:39 09-11-2010
    Frodo_Torbins

    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    А еще лучше его кинуть не в системную папку, а в папку с программой - нечего захламлять машины пользователей.

    Всего записей: 2318 | Зарегистр. 24-05-2007 | Отправлено: 14:42 09-11-2010
    Открыть новую тему     Написать ответ в эту тему

    Страницы: 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 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125

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


    Реклама на форуме Ru.Board.

    Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
    Modified by Ru.B0ard
    © Ru.B0ard 2000-2024

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru