Страница 1 из 1
VB (софт со стороны пк)
Добавлено: Пн июл 11, 2011 14:11:19
Modest
Предлагаю в эту тему писать с вопросами по vb
И у меня вопрос возник : Как в VB 2010 узнать дескриптор любого окна? Перерыл уже инфы..
пробовал и от 6 vb, нифига корректно не работает.
Нашёл код для 2010 студии (он самый распространённый, чаще всего везде выскакивает), используется функция FindWindow (ну например вот
http://support.microsoft.com/kb/242308/ru)
но он не работает, точнее он .... вообщем он постоянно возвращает разный дескриптор при каждом вызове FindWindow
кто нить, у кого есть какие либо исходники для 2010 vb где используется какая либо функция получения дескриптора, выложите плиз..
вот как то так разплывчато..
Re: VB (софт со стороны пк)
Добавлено: Пн июл 11, 2011 14:59:49
Мурик
Modest писал(а):используется функция FindWindow
Я ее тоже юзаю и нормально работает. Во вложении прога, определяющая хендл окна диспетчера задач винды.
PS.
А вот в чем прикол ручями объявлять API винды и вызывать их из управляемого кода если есть среды (инструменты) более подходящие для этого?
Ну не понимаю я?
Re: VB (софт со стороны пк)
Добавлено: Пн июл 11, 2011 15:35:23
Modest
а исходники не подкинете?
или ссыль..
Re: VB (софт со стороны пк)
Добавлено: Пн июл 11, 2011 15:47:17
Мурик
Modest писал(а):а исходники не подкинете?
Исходник не на VB, а на другом бейсике.
Поэтому и не выкладывал, ведь здесь VB обсуждается.
Я всего лишь показал что FindWindow работает и проблема не в ней.
Вот весь огромный и черезвычайно запутанный исходник:
Код: Выделить всё
hWnd = FindWindow_(0, "Диспетчер задач Windows")
MessageBox_(0, Str(hWnd), "Дескриптор диспетчера задач", 64)
Re: VB (софт со стороны пк)
Добавлено: Пн июл 11, 2011 17:46:46
Modest
спасибо. но то что есть такой код и то что он должен работать я знаю, мне от этого не легче
я не отрицаю что я могу что то не так делать т. к. в программировании я не силён, по этому и просил по возможности исходник
ещё варианты есть?
Re: VB (софт со стороны пк)
Добавлено: Пн июл 11, 2011 18:35:30
Modest
мля, три вечера парился с этим говнокодом, оказывается для семёрки нужно сменить тип переменной на Integer....
ааа, так и хочется написать слово пи....
Re: VB (софт со стороны пк)
Добавлено: Пн июл 11, 2011 18:36:32
Мурик
Modest писал(а):ещё варианты есть?
Я выше уже писал - инструмент выбирается по типу задачи.
Если юзать WinAPI в управляемом .NET коде, то возможны такие вот "приятные неожиданности".
Modest писал(а):оказывается для семёрки нужно сменить тип переменной на Integer....
Вообще-то, функции FindWindow нужно указатели на две строки передавать, а не переменные типа Integer.
Re: VB (софт со стороны пк)
Добавлено: Пн июл 11, 2011 18:51:59
Modest
я про вот эту часть
Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
Re: VB (софт со стороны пк)
Добавлено: Пт июл 29, 2011 09:17:48
Modest
Господа хвостатые программисты как средствами vb проверить наличие новых писем в ящике??
Кто нить в курсе? Облазил кучу страниц, не нашё вообще ничего...
Re: VB (софт со стороны пк)
Добавлено: Пт июл 29, 2011 11:11:05
Мурик
Modest писал(а):Господа хвостатые программисты как средствами vb проверить наличие новых писем в ящике??
Есть код на PB, если что....
Re: VB (софт со стороны пк)
Добавлено: Пт июл 29, 2011 15:36:14
Modest
нее, мне надо для vb
Re: VB (софт со стороны пк)
Добавлено: Вс май 08, 2016 17:04:01
Бобочек
У меня есть задача связать по USB контроллер PIC16F1455. Со стороны контроллера и схемотехники вроде все понятно. Обсуждение по теме форума как мне кажется не дает ответа даже на простые вопросы по примеру текста на VB.net. Рысканье по литературе для VB.net не дало результата (про СОМ порт что-то есть, даже есть мысль, что для получения/отправки данных нет разницы с USB). Неужели все так плохо и никто не написал нормальной для дилетанта статейки ?
Re: VB (софт со стороны пк)
Добавлено: Пн май 09, 2016 10:09:05
Мурик
Со стороны компа каким USB устройством видится PIC16F1455?
Re: VB (софт со стороны пк)
Добавлено: Пн май 09, 2016 14:07:39
Бобочек
Я пока в стадии теории (в тумане), есть PIC16F1455, то есть поддержка usb1.0 High-Low, на ПЭВМ usb2.0, но это вроде только проблема быстродействия. Программку на ассемблере для PIC16F1455 пока не писал, так что как меня увидят не знаю (может как HID устройство по Р2010 №3-р.25 Суров). Как вести диалог в VB.net тоже каша - через API вроде все можно сделать, но многие говорят, что можно более просто, но не одного примера не нашел.
Re: VB (софт со стороны пк)
Добавлено: Пн авг 22, 2016 16:06:26
Men1
Мурик писал(а):Modest писал(а):Есть код на PB, если что....
А не поделитесь кодом?
Давно видает идея на PB почтовый клиент увидеть....дык нет такого наверно
Re: VB (софт со стороны пк)
Добавлено: Пн авг 22, 2016 18:01:07
Мурик
Код определяет сколько писем в постовом ящике.
Код: Выделить всё
Server.s = "my.server.de"
Port.l = 110
User.s = "gnozal"
Pwd.s = "mypass"
;
If PurePOP3_OpenPOP3Connection(Server, Port, User, Pwd) = #PurePOP3_Ok
Debug "Connected"
; PurePOP3_Trace(#TRUE)
Messages = PurePOP3_CountMessages()
Debug "В ящике " + Str(Messages) + " писем"
PurePOP3_ClosePOP3Connection()
Else
Debug PurePOP3_GetLastServerMessage()
EndIf
Нужна библиотека PurePOP3.
Re: VB (софт со стороны пк)
Добавлено: Пн авг 22, 2016 19:34:23
Бобочек
Жаль, что тема вильнула в сторону. То есть VB.net - usb это тупик ?
Re: VB (софт со стороны пк)
Добавлено: Пн авг 22, 2016 20:06:37
Мурик
Бобочек писал(а):То есть VB.net - usb это тупик ?
USB HID?
Нет не тупик.
ftp://ftp.radio.ru/pub/2011/04/HID_Lib_Plus.zip
Код в папке "Примеры\x86 (32 бита)\VB.NET 2008".
Re: VB (софт со стороны пк)
Добавлено: Пн авг 22, 2016 22:20:26
Бобочек
Для начинающего трудно перевести из PureBasic и Atmega в PB.net и PiC, кроме того, отзывы о работоспособности этой dll весьма противоречивы. Хотелось бы средствами языка PB.net создать хотя бы простое общение по usb, но в книжках чего только нет о переменных, функциях, структурах, рисовании графики и т.д. но общение с внешним миром (контроллером, датчиком ...) остается за скобками. Понимаю, что надо что-то изучить, но что и где ?