Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

---|Ветка была без названия|---

Страницы: < 1 2 3 4 5 6 7 8 >
SeF © (2002-12-17 04:54:00)

Поставили мне задачу свой subj сделать в игровой зал.
вопрос:
какие сообщения необходимо ловить.(хотябы основные).
как реагировать на них.

приму приму большенство ответов кроме: на х.. тебе надо делать, воспользуйся тойто прогой. etc..

jonni (2003-06-02 00:01:00) [21]

ya voobsche prosto nikomu ne dayu
bili odni da i to teper" na nih ti sebe ishodniki sobiraesh..

ladno eto o grustnom.....

teper" o horoshem .......

ya seychas pishu shell ochen; mnogo nashel informacii pro to kak i chto nuzno nedalat"..... vse na MSVC no legko perevodit"sya na delphi......
esche tak ze est" u menya nekotoraya chast" na Delphi....tray task bar zapusk servicov...... voobschem pochti vse chto nuzno dlya svoego shella (prosto est" na polovinu opensource na del"phi odnogo shella)
tebe interesno???

Spartak (2003-05-31 08:05:00) [22]

>jonni

Почему же хреново ?
я просто меняю исходники ! если кому надо то пусть попросят просто так я и дам :) Я же его не продаю ... Но и выкладывать посто так не хочю ! ты же тоже не всем даёшь исходники !

jonni (2003-05-31 00:20:00) [23]

TO SPARTAK!!!
slushay ti postupaesh hrenovo ya tebe skazu .. o chem rech bila pro CLubTimer.........esli vderug to dlya vseh i otkrito i open source!!!
vo vtorih eto kommercheskaya rabota voobscheta i po zakonu kak to vihodit krivo

tak chto podumay.....

Orion2 (2003-05-30 11:42:00) [24]

А киньте мне в ящик хоть один исходничек шела. Пожалуйста. Очень интересно посмотреть как оно все работает.

Spartak (2003-04-25 10:08:00) [25]

Народ предлогаю меняться исходниками ! У меня есть 1 SHELL почти готовый , только без systray . + 1 программа для сервера !
+ 2 программs на с++ builder готовая TimeLocker + ClubTimer .

Сам занимаюсь этой проблемой уже 2 год ! меняю только на исходные коды на delphi ! так что если у кого есть свои наработки то можете писать на x_user_x@mail.ru

так же можете посмотреть программы на www.club-soft.narod.ru

_ALEXey_ (2003-04-10 17:12:00) [26]

Кое-что есть!

Сейчас пытаюсь отследить работу с принтером: когда, кто, что и сколько печатал. Правда, пока тщетно!

А есть уже основа клиентской и админовской части. Есть регулятор громкости, медиа-проигрыватель (стандартный Виндовый, но с отсутствием главного и контекстных меню, чтобы не дать доступ юзерам к файловой системе), примитивный будильник, вычисляется рейтинг программ (кол-во запусков), создаются ярлыки собственного формата, запускаются проги.
Есть несколько типов пользователей, вход для админа по паролю, изменение пароля (пока простая шифрация паролей, но в планах - его криптографировать), протоколирование различных событий.

В общем всего понемногу.

DVM, не сочтите за дерзость, но я тут почитал - вы уже занимались подобной задачей и высылали исходники, может и мне вышлите ?!?!?!? Я посмотрю, может у вас есть какие-нибудь более оптимальные решения, чем у меня; идеи, до которых я не додумал. Буду очень признателен!

С/У ALEXey alexeyprimary@mail.ru

DVM (2003-04-10 14:07:00) [27]

> Может продолжим дискуссию!
> У меня такая же задача - шелл для клуба.

и есть наработки?

_ALEXey_ (2003-04-10 13:43:00) [28]

Может продолжим дискуссию!
У меня такая же задача - шелл для клуба.

blabla (2003-03-08 21:12:00) [29]

тут про объединение говорят =)
пусть каждый выложит свои интересные наработки - API,
свои варианты решений ОДНОЙ КОНКРЕТНОЙ задачи.
и описание - как работает,что подключать,какие баги,какие параметры.
просьба всех заинтересовавшихся - попробовать исходники у себя,
описать найденные баги и как с ними бороться.

>msts
писать надо не под версию Делфи!
надо там маленько,стандартненько,чтоб и под наибольшим количеством
виндов шло,и использовались более/менее стандартные функции.
тогда при надобности ее будет можно даже на ассембер переписать,но
это фигня,надо придерживаться стандартов в любом случае,чтоб работало
не только на твоей машине.

blabla (2003-03-08 21:10:00) [30]
я правда под вин9x пишу =)
не,всетаки если отбить shell=explorer.exe некоторые гады (hogs of war к примеру) не грузятся,а
просто виснут в памяти =( и все притормаживает.это тока на пень4 сойдет,а если ОЗУ = 32 кб ?
и не обязательно explorer.exe ваще убивать,его можно спрятать.

var i:integer;
begin
i := 0;
{запрещаем системные комбинации кнопок}
SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @i, 0);
// второй параметр : 0-включить,1-выключить
// необходим unit WinProcs
end;

я пробовал под win9x и все корректно отрабатывало =) даже после закрытия приложения =P
работает только alt+F4 и ничего кроме,хотя кнопки все активны при надобности.
отшибает 100% "пуск", ctrl+alt+del, alt+tab, ctrl+esc, ctrl+d и много другого.

далее отшибаем "пуск" из трея,но нужный нам трей остается жив!
трей не обязательно отшибать и писать свой,если трей уже есть =)
var h:thandle;
begin
h := FindWindow("Shell_TrayWnd", nil); {"ProgMan" для рабочего стола}
h := GetWindow(h, GW_CHILD);
ShowWindow(h, SW_SHOW) ( h, SW_HIDE)
я правда под вин9x пишу =)
не,всетаки если отбить shell=explorer.exe некоторые гады (hogs of war к примеру) не грузятся,а
просто виснут в памяти =( и все притормаживает.это тока на пень4 сойдет,а если ОЗУ = 32 кб ?
и не обязательно explorer.exe ваще убивать,его можно спрятать.

var i:integer;
begin
i := 0;
{запрещаем системные комбинации кнопок}
SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1, @i, 0);
// второй параметр : 0-включить,1-выключить
// необходим unit WinProcs
end;

я пробовал под win9x и все корректно отрабатывало =) даже после закрытия приложения =P
работает только alt+F4 и ничего кроме,хотя кнопки все активны при надобности.
отшибает 100% "пуск", ctrl+alt+del, alt+tab, ctrl+esc, ctrl+d и много другого.

далее отшибаем "пуск" из трея,но нужный нам трей остается жив!
трей не обязательно отшибать и писать свой,если трей уже есть =)
var h:thandle;
begin
h := FindWindow("Shell_TrayWnd", nil); {"ProgMan" для рабочего стола}
h := GetWindow(h, GW_CHILD);
ShowWindow(h, SW_SHOW) {показать}
// ShowWindow(h, SW_HIDE); {спрятать}
end;

а вот управление с другого компа-на ваше усмотрение =) мне оно было ни к чему.
а если еще доступ в интернет или по винту - свою прогу надо =(
я через реестр запретил винт!

Скрытие дисков в Моем компьютере (Windows 9x и NT)
Этот параметр управляет отображением дисков в "Моем компьютере", он дает возможность скрыть все диски или только выбранные.
Параметр "NoDrives" определяет, какие из дисков являются видимыми. Порядок устанавливается с самого низкого бита - диск A: до 26-ого бита - диск Z: Чтобы скрыть диск, включите его бит.
Если Вы не умеете работать с шестнадцатеричными числами, установите эти десятичные числа для скрытия диска(ов):
A: 1, B: 2, C: 4, D: 8, E: 16, F: 32, G: 64, H: 128, I: 256, J: 512, K: 1024, L: 2048, M: 4096, N: 8192, O: 16384, P: 32768, Q: 65536, R: 131072, S: 262144, T: 524288, U: 1048576, V: 2097152, W: 4194304, X: 8388608, Y: 16777216, Z: 33554432, ALL: 67108863
Обратите внимание: Эти диски будут все равно отображены в Диспетчере файлов, для удаления Диспетчера файлов, удалите файл winfile.exe.
Ключ: [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]
Параметр: NoDrives
Тип: REG_DWORD

и в моем компе его нет и в осле при сейве/лоаде нету,но я жму
файл\открыть и пишу c: затем ставлю открыть как веб-папку.
ругнется,спросит открыть ли стандартными средствами,и откроет!
осел - дыра и ее надо убивать.

tosha (2003-03-08 17:19:00) [31]

Типа хай ALL! Вот такая проблема ... для реализации запрета CTRL+ALT+DEL ALT+TAB CTRL+ESC используется эмуляция запуска скринсервера ... НО ЭТО ДЛЯ 9х, как бы это все сделать под NT!

dimich1978 (2003-03-06 09:26:00) [32]

В славном городе Владивостоке, была написана прога для администрирования клубов, стоимость от 7 тыс. руб. Так вот они там вообще как бы винду заменяют своим Shell который выглядит как винда.
http://www.taskmaster.ru
Правда я у них чего то скриншотов не нахожу.

DVM (2003-03-05 21:32:00) [33]

> С одной стороны это только мысля, но мне кажется, что "эксплордер"
> использует какой-нибудь таймер (жрущий поменьше ресурсов),
> на котором у него висит проца получения списка текущих открытых
> окон. Потом он сравнивает этот список со старым и в случае
> их различия добавляет или удаляет кнопки на "таске". По
> крайней мере я сделал так, пока не узнал про хуки.

Он использует RegisterShellHook я это уже писал выше, но сообщение удалили. Окну эксплорера система шлет персональные сообщения.

DeadMeat (2003-03-05 20:47:00) [34]

> vidiv
С одной стороны это только мысля, но мне кажется, что "эксплордер" использует какой-нибудь таймер (жрущий поменьше ресурсов), на котором у него висит проца получения списка текущих открытых окон. Потом он сравнивает этот список со старым и в случае их различия добавляет или удаляет кнопки на "таске". По крайней мере я сделал так, пока не узнал про хуки.

vidiv (2003-03-05 09:32:00) [35]

Еще хочу добавить, что любой Шел пишется, я думаю, для конкретной версии ОС, а не для всех сразу...

vidiv (2003-03-05 08:15:00) [36]

Удалено модератором
Примечание: Личная переписка

DVM (2003-03-04 16:15:00) [37]

Удалено модератором
Примечание: Личная переписка

vidiv (2003-03-04 14:55:00) [38]

Здорова, народ!
Я тоже озадачен проблемой shell для игрового клуба. Мои наработки позваляют отсеивать "левые процессы", я сделал свой IconList, сделал часы:), сделал SystemTray, и Завершение работы виндовс. кто хочет может посмотреть как это выглядит(скриншот) тут: http://www.sakhgu.sakhalin.ru/Vid/1.jpg. Я не знаю как сделать кнопочки на панели задач, как в Експлорере, главное что я подметил в эксплорере, он не юзает хуки (либо скрывает их)! а это уже о чем то говорит!. Там разные запуски прог и т.п. мелочи...

На счет коллективной работы, я за! и только за! Давайте как нибудь сканектимся, потому что тема актуальная. Сделаем общий шел, а потом каждый подредактит для себя... Я умею: делать немного красиво, сеть, ... .

Люди, я буду только рад контактам, обещаю подарить вам всем свои исходники, мне не жалко!

tosha (2003-03-03 21:19:00) [39]

Удалено модератором
Примечание: Личная переписка

CjCrazy (2003-02-13 21:00:00) [40]

2 Freedom, код реально работает.
2 Cosmic, значит актуальная тема. и, кажется, она вобрала в себя уже немнога другие темы :)

Страницы: < 1 2 3 4 5 6 7 8 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »