vb6

Регулярные выражения: обёртка для PCRE2 и VBScript.Regexp Создано: Alex Dragokas и Jason Peter Brown (jpbro) при поддержке Tanner_H, oumba, DEXWERX, dilettante (vbforums.com) PCRE2 - это мощная библиотека регулярных выражений, которая работает очень быстро и поддерживает Perl-совместимый...

Автор: The Trick Небольшой пример использования средств API.AI для распознавания голосовых команд.

Это ANSI-версии прототипов. В приложении 2 программы: 1) ApiViewer by Christoph 2) ApiTools by by Desaware (с исходником).

Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" _ (ByVal lpapplicationname As String, ByVal lpkeyname As Any, ByVal lpdefault As String, _ ByVal lpreturnedstring As String, ByVal nSize As Long, ByVal lpfilename As String) As Long...

Простой пример аудио-проигрывателя на основе API-функции mciSendString Функции: Воспроизвести Приостановить Продолжить Остановить Option Explicit Public Declare Function mciSendString& Lib "winmm.dll" Alias "mciSendStringA" _ (ByVal lpstrCommand$, _ ByVal lpstrReturnString$, _...

Для тех, кого раздражает ситуация, когда нужно скопировать название функции или переменной с другой строки, но как только мы покидаем строку, в которой набираем код, редактор VB6 тут же выбрасывает мессагу - предупреждение об ошибке. Лично меня это раздражает жутко. Это же надо отвлекаться от...

_ Подскажите ,пожалуйста, какие есть алгоритмьі изменения контрастности изображений. _ Стандартньій способ повьішения резкости (прибавление к каждому пикселю разници в цвете с соседним пикселем) с виду похож на контурирование разной степени.

_ Загружаю рисунок Picture1.Picture = LoadPicture("Адрес рисунка"), потом его редактирую... _ При попытке сохранить SavePicture Picture1.Image, "Адрес рисунка" с тем же адресом (то есть в тот же файл) - всплывает сообщенио об ошибке "Файл уже открыт". Более того, это не дает переименовать...

VB6 сохраняет изображения в формате bmp. А как можно сохранять или конвертировать в ipg ?

Имея некий перечень исполняемых файлов, можно получить их иконки ,непример, так: (Form1.AutoRedraw = True и PictureEskiz(i).AutoRedraw = True) For i=1 to Fajlov PictureEskiz(i).Cls PictureEskiz(i).Visible = CBool(DrawIcon(PictureEskiz(i).hDC, 0, 0, ExtractIcon(App.hInstance, AdresFajla(i), 0))...

Привет всем. Может кто направит на путь истинный) Пробовал примеры с сети - не помогло,сам пробовал сделать - не вышло... Куда почитать,может путний пример...

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

Как в VB6 работать с USB-портом? LPT-порт ,например, позволяет управлять включением и выключением 255 "лампочек",... Посылать сигнал можно по 8 ножкам, получать по 4-м. На VB6 это ооочень просто. Но ЭВМ с LPT уже не выпускаются. Как с приборами можно работать через USB?

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

Вот такая у меня не задача...толкнулся от этого: https://msdn.microsoft.com/en-us/library/windows/desktop/aa378847(v=vs.85).aspx Все работает,но не понятно как проверить включено ли восстановление системы...

Подскажите, как в PictureBox-е получить эскиз видеофайла (flv, mp4, wmv,...), находящегося по адресу...

Как создать панель задач в окне своей программы? Например, если некая прога сворачивается в трей, то клики по ее иконке в трее можно делать со своей прогаммы

Вопрос состоит в том,что на том же bat очень удобно использовать call,goto GoTo не подходит,возможно есть еще какие то методы?

Я использовал такой вариант: 'определение битности ОС For Each objOStype In GetObject("winmgmts:").InstancesOf("Win32_ComputerSystem") 'WScript.Echo "PC type = " & objOStype.SystemType strOSbit = objOStype.SystemType Next If LCase(strOSbit) = "x86-based pc"...

Также у тебя идет запрос UAC при выполнении каждой из операций. Достаточно получить один раз привилегии на этапе запуска приложения. Для этого нужно подключить к приложению манифест с затребованием уровня прав HighestAvailable (если нужно , чтобы программа могла запустится даже под учетной...