Как пишуться программы- оболочки?

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
*Qwerty*
Новичок
Новичок
Аватара пользователя
 
Сообщения: 41
Зарегистрирован: 10.05.2004 (Пн) 4:01
Откуда: Енакиево

Как пишуться программы- оболочки?

Сообщение *Qwerty* » 11.07.2004 (Вс) 15:54

Как пишуться программы- оболочки? Можно ли их написать на ВБ? И вообще как они работают?
заранее благодарен...
BASIC-программисты – люди меченые, путем насилия или подкупа нас можно заставить работать на другом языке, но думать-то мы все равно будем на BASIC (c) C.Г.Зиновьев

EvilCoder
Посланец джихада
Посланец джихада
Аватара пользователя
 
Сообщения: 706
Зарегистрирован: 25.01.2004 (Вс) 15:08

Сообщение EvilCoder » 11.07.2004 (Вс) 23:35

ОС что ли ?
Что такое программы-оболочки? :)
<<------- EvilCoder ------->>

GM
programador
programador
 
Сообщения: 1427
Зарегистрирован: 24.06.2003 (Вт) 15:56
Откуда: 194.67.52.100

Сообщение GM » 12.07.2004 (Пн) 1:05

Как пишуться программы- оболочки? Можно ли их написать на ВБ? И вообще как они работают?
заранее благодарен...

На ВБ все можно :D, а действительно что такое программы-оболочки?
الفيجوال بيسك الرابح

Tarik
Агент Системы
Агент Системы
Аватара пользователя
 
Сообщения: 1222
Зарегистрирован: 03.01.2003 (Пт) 16:05
Откуда: Москва

Сообщение Tarik » 12.07.2004 (Пн) 10:18

Наверное, имелись ввиду shell'ы типа Aston (www.astonshell.com) :?
Изображение

Ever tried? Ever failed? No matter. Try again! Fail again! Fail better!

*Qwerty*
Новичок
Новичок
Аватара пользователя
 
Сообщения: 41
Зарегистрирован: 10.05.2004 (Пн) 4:01
Откуда: Енакиево

Сообщение *Qwerty* » 13.07.2004 (Вт) 19:33

Tarik писал(а):Наверное, имелись ввиду shell'ы типа Aston (www.astonshell.com) :?

Да, именно это я и имел в виду: программы типа Aston, Runpad и т.п.
BASIC-программисты – люди меченые, путем насилия или подкупа нас можно заставить работать на другом языке, но думать-то мы все равно будем на BASIC (c) C.Г.Зиновьев

Faust
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 649
Зарегистрирован: 29.12.2003 (Пн) 13:38
Откуда: лаборатория

Сообщение Faust » 13.07.2004 (Вт) 19:41

Перехватываешь все, что можешь перехватить, и обрабатываешь в меру своей распущенности :wink: .
Если серьезно - то накидать на рабочий стол разных наворотов не так уж сложно - сложно сделать так, чтоб система при этом не тормозила. А также напряжное занятие - навешивание дополнительных функций безопасности. Aston - умильная программа!
Листинги не горят!

*Qwerty*
Новичок
Новичок
Аватара пользователя
 
Сообщения: 41
Зарегистрирован: 10.05.2004 (Пн) 4:01
Откуда: Енакиево

Сообщение *Qwerty* » 15.07.2004 (Чт) 19:40

Faust писал(а):Перехватываешь все, что можешь перехватить, и обрабатываешь в меру своей распущенности :wink: .
Если серьезно - то накидать на рабочий стол разных наворотов не так уж сложно - сложно сделать так, чтоб система при этом не тормозила. А также напряжное занятие - навешивание дополнительных функций безопасности. Aston - умильная программа!


Ага- всё гениальное просто(хотя и трудоёмко в большинстве случаев, к сожалению)
BASIC-программисты – люди меченые, путем насилия или подкупа нас можно заставить работать на другом языке, но думать-то мы все равно будем на BASIC (c) C.Г.Зиновьев

*Qwerty*
Новичок
Новичок
Аватара пользователя
 
Сообщения: 41
Зарегистрирован: 10.05.2004 (Пн) 4:01
Откуда: Енакиево

Сообщение *Qwerty* » 15.07.2004 (Чт) 23:07

Ха, я понял: просто закрыть процесс Explorer.exe, чтобы запретить работу с рабочим столом, а потом всё управление компутером окажется в "руках" у моей программы, ну ещё конечно надо закрыть посторонние приложения. Как думаете, подействует?
BASIC-программисты – люди меченые, путем насилия или подкупа нас можно заставить работать на другом языке, но думать-то мы все равно будем на BASIC (c) C.Г.Зиновьев

A.A.Z.
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3035
Зарегистрирован: 30.06.2003 (Пн) 13:38

Сообщение A.A.Z. » 16.07.2004 (Пт) 14:50

Именно так он и делает. Посмотри, что и куда прописывает тот же Aston, для большего успеха можно еще и FileMon запустить и посмотреть, что там происходит

Andrew Sherd
Новичок
Новичок
Аватара пользователя
 
Сообщения: 42
Зарегистрирован: 10.05.2004 (Пн) 0:18
Откуда: Санкт-Петербург

Сообщение Andrew Sherd » 02.08.2004 (Пн) 0:38

Самолично лепил простенькие шеллы, правдо делал это для Milleniuma и 98ого, но принцип такой...

Просто заменяем фаил Explorer.exe на свои с таким же названием (как вариант кидаем свой фаил в то же место, что и експлорер, а в win.ini <вроде как в нем :roll: > меняем строку SHELL=Explorer.exe на свой фаил). И рестарт компьютеру.
Только не забудьте предусмотреть программную перегрузку между оболочками - простое изменение той же самой строки/переименование того же файла. А дальше вызываем API функцию перезагрузки системы.

Это 100% действует в Win98 и WinMe, а вот с WinXP не пробовал, но должно быть примерно так же.
Маленькие хитрости: Если золотую рыбку положить на сковородку, количество желаний увеличивается да 50!!!

Шурик
Самогонщик
Самогонщик
Аватара пользователя
 
Сообщения: 1657
Зарегистрирован: 30.06.2003 (Пн) 13:27
Откуда: из запоя :))))) Матных сообщений: 972

Сообщение Шурик » 04.08.2004 (Ср) 11:39


Gemini
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 390
Зарегистрирован: 24.07.2002 (Ср) 14:15
Откуда: Ozersk

Сообщение Gemini » 13.09.2007 (Чт) 15:01

Soft_Shell - заменяет только только панель...
А Aston ещё и на рабочий стол кидает свою форму,заменяя все иконки и изменяя (внешний) вид вызова программ.
Как засадить на рабочий стол кнопку или форму.
пробывал вот так управление теряется.

'Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long 'Эта функция устанавливает родителя
'Private Declare Function GetDesktopWindow Lib "user32" () As Long 'Эта функция возвращает рабочий стол
'Private Sub Command1_Click()
'Dim DeskTop As Long 'Тут будет храниться описание рабочего стола
'DeskTop = GetDesktopWindow '
'SetParent Form1.Command1.hWnd, DeskTop 'Вешаем кнопку на рабочий стол
'End Sub

или я что-то не так понимаю. какой принцип работы астон в замене именно десктопа???

Viper
Артефакт VBStreets
Артефакт VBStreets
Аватара пользователя
 
Сообщения: 4394
Зарегистрирован: 12.04.2005 (Вт) 17:50
Откуда: Н.Новгород

Сообщение Viper » 13.09.2007 (Чт) 15:48

Это прямо какая то запредельная некрофилия... з года... :twisted:
Весь мир матрица, а мы в нем потоки байтов!

netdemon
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 179
Зарегистрирован: 04.09.2007 (Вт) 15:51

Сообщение netdemon » 13.09.2007 (Чт) 17:12

Я тоже свой Shell пишу. Могу поделиться идеями.

Gemini
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 390
Зарегистрирован: 24.07.2002 (Ср) 14:15
Откуда: Ozersk

Сообщение Gemini » 13.09.2007 (Чт) 17:53

netdemon поделись, хотябы намекни как всё это работает на рабочем столе.(активные менюшки и т.д.) буду очень признателен.
если можешь приоттач exe шник своей проги (если не жалко то исходник)


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 48

    TopList