| Вопрос: Для профи и новичка. CLASS - внем есть почти все | Добавлено: 04.06.04 13:35 |
Автор вопроса:  Alban | ICQ: 319660391 |
|
Я создал класс с исходниками: (есть некоторые проблемы нужна помощь)
Пишите на ящик Alban_@list.ru Я скажу что мне нужно для апгрейда этого класса и мы сможем поменяться после его апгрэйда. Позже будет версия 1.0.1 - лучшая в своем роде. Version 1.0.0 - Смотрите: a.CD.Block - Заблокировать сидюк от компактов a.CD.Close_ - Открыть сидюк a.CD.Open_ - открыть a.CD.UnBlock - разблокировать a.Desktop.Ico.Hide - спрятать иконки a.Desktop.Ico.Show - показать a.Desktop.Pusk.Disabled - заблокировать пуск a.Desktop.Pusk.Enabled -разблокировать пуск a.Desktop.Pusk.Hide - спрятать пуск a.Desktop.Pusk.Show - поазать пуск a.Desktop.PuskShowDelay - изменить время задержки пуска a.Directory.Copy - копировать дирикторию a.Directory.Create - создать a.Directory.Delete - удалить a.Directory.IsExists - проверить на существование a.Directory.LongName - преобразовать из короткого имени в длинное a.Directory.Move - переместить a.Directory.ShortName - преобразовать из длинного в короткое a.Directory.Size - узнать размер дириктории в байтах a.Directory.System - узнать дирикторию: системную a.Directory.Temp - узнать дирикторию: временную a.Directory.Windows - узнать дирикторию: винды a.Files.ChangeExtension - поменять расширение файлов в дириктории a.Files.Copy - копировать из в a.Files.Create - создание файла пустого a.Files.CreateLink - создать ярлык a.Files.Delete - удалить a.Files.GetTemp - узнать имя временного файла a.Files.IsExists - существует ли файл a.Files.LongName - преобразовать из короткого имени в длинное a.Files.Move - переместить a.Files.SearchFile - поиск файла(помещяються в массив и из массива можно делать повторный поиск хоть тысячи файлов скорость поиска увеличиваеться в сотни раз, но при условии что файлы не изменили свой путь физически на венике) a.Files.SendToRecycleBin - переместить файл в корзину a.Files.ShortName - преобразовать из длинного в короткое a.Files.ShowProps - показать свойства файла a.Files.Size - размер файла в байтах a.Form_.Animation - анимация формы a.Form_.BringToTop - сделать активной форму a.Form_.ChangeTitleWindow - изменить заголовок формы a.Form_.DisableX - заблокировать кнопку Х на форме a.Form_.KillWindow - выгрузить форму(любую на экране, поиск осуществляеться по названию формы) a.Form_.MinimizeAllWindows - минимизировать все окна a.Form_.OnTop - поверх всех a.Form_.ToCenter - окно в центр a.Form_.XP.On_ - преобразовать вид формы КАК В XP (РЕДКИЙ КОД) a.Form_.XP.Off_ - убрать вид формы XP (РЕДКИЙ КОД) a.Graph.ExtractIconFromFile - извлесь иконку из файла (к примеру из shell32.dll) a.Graph.IcoToPic - преобразовать иконку в картинку (РЕДКИЙ КОД) a.Graph.PicToIco - преборазовать картинку в иконку (РЕДКИЙ КОД) a.HDD.FreeSpace - узнать свободное место на венике a.HDD.IsReady - готов ли диск a.HDD.Serial - серийный номер диска a.HDD.TotalSpace - обдщий размер диск, но не веника. К примеру -> C:\ a.HDD.VolumeName - имя метки установить / сменить a.Inet.CheckConnection - есть ли соединение с инетом a.Inet.ComputerName - имя компа a.Inet.ConnectionName - имя соединения a.Inet.CreateInternetShortCut - создать инетовский ярлык FILENAME.URL a.Inet.ExecuteLink - Перейти на определенный сайт a.Inet.HangUp - разорвать соединение a.Inet.IpAddress - текущий АйПи адресс a.Inet.UserName - имя юзера a.Ini.Clear - очистить ини файл a.Ini.Create - создать файл (создаеться в той же дир где запущена прога) a.Ini.Delete - удалить a.Ini.ReadValue - прочитать значение в группе a.Ini.WriteValue - записать значение в группу a.Keyb.Caps - Нажат ли CapsLock a.Keyb.Num - --//-- a.Keyb.Scroll - --//-- a.Keyb.CapsLock - Нажать CapsLock a.Keyb.NumLock - --//-- a.Keyb.ScrollLock - --//-- a.Keyb.KeybLayout - Узнать какая кодировка текущая ENG/RUS/400(неизвестная) a.Memory.All - всего памяти a.Memory.Free - свободно a.Mouse.ColButton - Всего функций / клавиш у мыши a.Mouse.GetCurPos - узнать позицию a.Mouse.IsPresent - существует ли мышь a.Mouse.MoveForm - при нажатии и держании клавиши на любом место на форме мышкой(кроме кнопок и.т.д), форма пердвигаеться a.Mouse.SetCurPos - установить позицию a.Mouse.SwapButton - поменять клавиши мыши / поменять назад a.RunHelpFile - запустить файл помощи a.Sleep_ - пауза a.SysTime.GetTime - узнать ткущее время a.SysTime.SetTime - установить текущее время a.Video.GetVideoMode - узнать текущее разрешение экрана a.Video.Monitor.Off_ - монитор выключить a.Video.Monitor.On_ - монитор включить a.Video.Monitor.Sleep - усыпить монитор a.Video.TypeVideoCard - узнать тип видеокарты a.Windows.CanWork - может ли работать данный класс в текущей винду a.Windows.EmptyRecycleBin - очистить корзину a.Windows.Exit1.LogOffForce - сменить ползователя без спроса a.Windows.Exit1.Reboot - перегрузить комп с вопросом на перезагрузку a.Windows.Exit1.RebootForce - перегрузить комп без спроса a.Windows.Exit1.ShutDown - выключить комп с вопросом на выключение a.Windows.Exit1.ShutDownForce - выключить комп без спроса a.Windows.FullVersion - узнать версию винды a.Windows.HowLongWorkWindows - как долго работает винда a.Windows.HowRunWindows - как запущена винда a.Windows.ShotVersionWindows - показать короткую версию винды типо Windows 2000(98,ME,XP,NT,NT3,NT4) a.Windows.ShowShutDownDialog - показать диалог выхода из винды |
| Ответы | Всего ответов: 9 |
|
Номер ответа: 1 Автор ответа:  Alban ICQ: 319660391 Вопросов: 26 Ответов: 13 |
Профиль | | #1 | Добавлено: 04.06.04 15:34 |
|
Нужно следующее(Описано в файле DOC):
http://alban.hotmail.ru/Need.zip |
||
|
Номер ответа: 2 Автор ответа: sne Разработчик Offline Client ICQ: 233286456 Вопросов: 34 Ответов: 5445 |
Web-сайт: Профиль | | #2 | Добавлено: 04.06.04 16:19 |
|
Дык можно было бы прям сюда и код выложить...
Тем более что все что тут сделано делается эллементарно... Правда я так и непонял что же все-таки делает XP.On_ и XP.Off_ > Почему у некоторых при тестах данного класса при вычислении разщмера дириктории ошибаеться на 50 мег? Потому что для этого использовать FSO - себя не уважать  Да и вообще для любой работы с файлами...
> Нужен исходник делающий форму и все ее содержимое прозрачным на указанное число. Это уже все обмусолено далоьше некуда... Public Sub TranspMe(ByVal lngHandle As Long, ByVal Persent As Integer) ' Прозрачность программы Call SetWindowLong(lngHandle, &HFFEC, GetWindowLong(lngHandle, (&HFFEC)) Or &H80000) Call SetLayeredWindowAttributes(lngHandle, &H0, (&HFF * (&H64 - Persent)) / &H64, &H2&
End Sub > Нужен исходник который меняет серийный номер веника(или это невозможно?) А что такое веник  ?
Если HDD, то это так же элементарно сделать через DeviceIoControl > Улучшенное средство проверки связи с инетом а так же различие между инетом и сетью. Нужен исходник который говорит есть связь с инетом через модем, а так же есть связь с инетом через сеть. И есть ли сеть. Посмотри по форуму, я выкладывал три исходника и на трех языках, для этого дела! > Нужен код который заменяет нажатые клавиши в реальном времени т.е хук. Я так думаю сделать код который блокирует Клаву если в ХР блокировка не возможна Ню, ню... возмодно все, только не на VB... точнее и на VB, но с использованием: 1. Др. языка программирования 2. Внешней dll библиотеки > 11. Нужен код который Загоняет мышь... Кажется на каком-то из сайтов в разделе Хитрости было как заблокировать клавиатуту и как заблокировать клавиатуру... А вообще, самое реальное - это опять-таки использовать внешнюю dll, написанную на др. языке программирования (не ActiveX dll). SetWindowsHookEx > Сменить разрешение экрана - это в легкую, а вот с частотой... тебе придется повозиться с видюшками, а точнее с детонатором, т.к. это проявляется только на nVidia картах, если я не ошибаюсь... Кстати, все осложняется еще и тем, что в некоторых версиях детонатора этого вообще нет, а в тех где есть, в зависимости от версии, это действие может выполняться разными способами... > Нужен код который подробно показывает версию виды. А тут-то в чем проблемма ? У тебя же есть... подробней некуда... Лично мне нравится использовать вот такой код: Public Function OS_Version() As OSVERSIONINFO ' dwPlatformId 0-Unknown; 1-9x; 2-NT OS_Version.dwOSVersionInfoSize = Len(OS_Version) Call GetVersionEx(OS_Version) End Function А уже далее, в зависимости от данных в структуре, можно сделать if/select case, для возвращения какой-то определенной строчки с названием вин. А вообще, зря ты все в один класс суешь... Этим занимаются лишь только новички (сам такой ерундой занимался , не в обиду сказано, т.к. все равно целиком, этот класс, из-за пары функций, вставлять в свой проект не станешь...
|
||
|
Номер ответа: 3 Автор ответа: AlbanICQ: 319660391 Вопросов: 26 Ответов: 13 |
Профиль | | #3 | Добавлено: 04.06.04 16:46 |
|
Через 2 дня появиться новая версия.
Смотрите ее на сайте: Если нету то появиться. http://alban.hotmail.ru/CLASS.zip |
||
|
Номер ответа: 4 Автор ответа: Fallout Вопросов: 10 Ответов: 387 |
Web-сайт: Профиль | | #4 | Добавлено: 04.06.04 16:49 |
|
a.CD.Close_ - Открыть сидюк
a.CD.Open_ - открыть То бишь если использую Close то открываю сидюк а вот если Open то что то другое открываю ? или опять сюдюк? |
||
|
Номер ответа: 5 Автор ответа: FalloutВопросов: 10 Ответов: 387 |
Web-сайт: Профиль | | #5 | Добавлено: 04.06.04 23:09 |
|
Да я понял что ты опечатался .. это была как бы шутка....
а совет бы дал такой разделить большой класс на малые .. типа работа с СДром работа с памятью и тд итп либо так мультимедия систем инфо и тд итп |
||
|
Номер ответа: 6 Автор ответа: PeterSВопросов: 24 Ответов: 109 |
Профиль | | #6 | Добавлено: 05.06.04 18:16 |
|
a.CD.Block - Заблокировать сидюк от компактов
А что это значит? Блокировка автозапуска или блокировка кнопки на CD-ROM??? |
||
|
Номер ответа: 7 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #7 | Добавлено: 05.06.04 23:47 |
| Класс нужно обязательно разбить! Т.к. если я пишу определённую прогу мне пригодятся для ней определённые функции, а не всё подряд. | ||
|
Номер ответа: 8 Автор ответа: Justas  ICQ: 259418212 Вопросов: 24 Ответов: 325 |
Web-сайт: Профиль | | #8 | Добавлено: 08.06.04 04:46 |
|
a.CD.Block - блокирует только в w2k/XP? )
или в 95-98 тоже? |
||
|
Номер ответа: 9 Автор ответа: SharpЛидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | | #9 | Добавлено: 08.06.04 16:31 |
| Не видать твоего архива на сайте... Проверь имя, или закачай его, если еще не закачал. | ||
Страница: 1 |