powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / HWND???
34 сообщений из 34, показаны все 2 страниц
HWND???
    #32535573
Docent347
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Есть Form1->combo1
Есть Form2->combo1
Есть Module1->процедура(FUN)
Нужно передавая в процедуру Module1->FUN, Combo1 .hWnd или Combo2 .hWnd
соответственно получать в Combo1.text или Combo2.text допустим слово “Hello world”?
...
Рейтинг: 0 / 0
HWND???
    #32535579
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так передавай сам combo1 в процедуру. Передастся его адрес, а не сам контроль. Так что, изменяя из процедуры Combo1.text ты изменишь текст в Form1->combo1.
...
Рейтинг: 0 / 0
HWND???
    #32535586
Docent347
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Так в том и дело что надо по адрессу.
Если мы имеем адресс объекта то наверное можно достучаться до его свойств только, как я не знаю поэтому и спрашиваю :). Как?
...
Рейтинг: 0 / 0
HWND???
    #32535592
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
Sub Fun(ByRef Combo108 As ComboBox)
    Combo108 = "Hello"
    Combo108.Enabled = False
    Combo108.AddItem "108"
End Sub
Чем тебе это не годится? Я так и не понял...
...
Рейтинг: 0 / 0
HWND???
    #32535595
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Private Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long

Public Sub MySub(h As Long)
Dim MyStr As String
'Create a buffer
MyStr = String(GetWindowTextLength(h) + 1, Chr$(0))
'Get the window's text
GetWindowText h, MyStr, Len(MyStr)
MsgBox MyStr
End Sub

Magnus
...
Рейтинг: 0 / 0
HWND???
    #32535598
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Magnus как всегда не в тему...
:-)
...
Рейтинг: 0 / 0
HWND???
    #32535610
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Уверен в том что говоришь? You better be...




Magnus
...
Рейтинг: 0 / 0
HWND???
    #32535612
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Он хотел получить текст, я ему дал текст. Установка текста Setwindowtext.

Добававление итемов SendMessage с необходимыми параметрами.

Проблемы?

Magnus
...
Рейтинг: 0 / 0
HWND???
    #32535614
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Наверное не так его понэл.
Never midn.
...
Рейтинг: 0 / 0
HWND???
    #32535615
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так что на счет "как всегда" и "не в тему"?

Magnus
...
Рейтинг: 0 / 0
HWND???
    #32535616
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ты чеки всё равно не принимаешь.
...
Рейтинг: 0 / 0
HWND???
    #32535618
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А ты порпобуй.
А может лучше думать прежде чем чепуху пороть?

Magnus
...
Рейтинг: 0 / 0
HWND???
    #32535622
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Почему ж чепуху?!
И твой и мой методы работают.
Твой более правильный, но мне незнакомый. That's all.
...
Рейтинг: 0 / 0
HWND???
    #32535626
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Курим, ага. Клоуна строим... Никогда GetWindowText невидел. Ага.

Ваще, при чем тут методы.Оба работают и зашибись, тем более что мой более правильный. :) Обьекты в процедуры не натаскаешься. Вызов из другого модуля в васике обходится в 10 раз дороже чем в любых других языках.

Я не о коде говорю, а об этом.
авторMagnus как всегда не в тему...

Magnus
...
Рейтинг: 0 / 0
HWND???
    #32535651
(c)VIG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А я думал , что весь свой боевой пыл Магнус растратил в битве с Акузей
З.Ы Сорри за оффтоп.
...
Рейтинг: 0 / 0
HWND???
    #32535688
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это к слову если кому-то захочется использовать материалы следствия. Господа, не путайте мух с котлетами.

2 arseny
Я настаиваю на ответе.

2 (c)VIG
Регенерю по-немногу. :)

Magnus
...
Рейтинг: 0 / 0
HWND???
    #32535693
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так я ж сказал, что незнаком с тем методом. Вот и подумал, что ты ошибся.
Наша тема скоро будет лидирующей... :)
...
Рейтинг: 0 / 0
HWND???
    #32535716
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторТак я ж сказал, что незнаком с тем методом.
Тем более. Если не знал метода, следовало по крайней мере проверить работоспособность предложенного мной варианта и на основе результатов высказываться.

автор
Вот и подумал, что ты ошибся.
Оказалось что это не так. А значит...
Я настаиваю.



ЗЫ. Извиняюсь за оффтоп. Если что , "Переименуем в Лестницу"(с)Саныч?


Magnus
...
Рейтинг: 0 / 0
HWND???
    #32536033
Docent347
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Magnus23 ты пошел в правильном направлении но......
Мне надо передавать hWND в процедуру..... ну короче что-то типа:

Public Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String) As Long
Public Sub MySub(h As Long)
Dim MyStr(1) As String
MyStr(0) = "dddfggg"
MyStr(1) = "dggg"
For i = 0 To 1
SetWindowText h, MyStr(i)
Next i
Текст в Combo1 или Combo2 передается, а мне надо чтоб и записывался короче в комбосе в List должны находиться MyStr(0) и MyStr(1).
...
Рейтинг: 0 / 0
HWND???
    #32536611
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так мой пример и принимает хендл в качестве параметра.

авторНужно передавая в процедуру Module1->FUN, Combo1 .hWnd или Combo2 .hWnd
соответственно получать в Combo1.text или Combo2.text допустим слово “Hello world”?
Не означает ли это читать их значения?

На счет добавления я тоже говорил : SendMessage
Парамтр Cm_чегототам. Щас пример закину.

PS. arseny - балабол.


Magnus
...
Рейтинг: 0 / 0
HWND???
    #32536620
Docent347
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо ждем пример))
...
Рейтинг: 0 / 0
HWND???
    #32536998
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот люди же бывают, ну валенок валенком. И шуток не понимает...
А ещё программистом себя называет. Влился в интернет, настоящую жизнь от виртуальной не отличает.
Алё, ку-ку, magnus! Оторвись от экрана, иди погуляй - нельзя столько за компом сидеть. Рога отрастут...
...
Рейтинг: 0 / 0
HWND???
    #32537092
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
SendMessage target.hWnd, CB_ADDSTRING,  0 &, ByVal sItemText

PS. Arseny, шутки разные бывают. А за свои слова надо отвечать. Если говоришь - подтверждай, нет - не говори.

Magnus
...
Рейтинг: 0 / 0
HWND???
    #32537105
Docent347
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо Magnus!!!
...
Рейтинг: 0 / 0
HWND???
    #32537114
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Качайте и ни в чем себе не отказывайте. Довольно приличная библиотека апишек, с примерами и описаниями как самих фунций так и параметров.

http://www.mentalis.org/agnet/apiguide.shtml


Magnus
...
Рейтинг: 0 / 0
HWND???
    #32537131
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Понимаешь, просто не надо так уж серьёзно воспринимать "жизнь" в интернете. А особенно шутки. Не мне тебя учить, но... В другом месте тебя без шуток пошлют куда подальше. Ты и там будешь разбирать и с пеной у рта требовать объяснений?
Ты мне уже напоминаешь вирусного червя, который пробирается в комп и от него никак не избавится. :-) Надо антивирус человеческий поискаять...
...
Рейтинг: 0 / 0
HWND???
    #32537215
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да ладно тебе делать из меня очкарика присохшего к креслу. С чего ты взял это все? С какого потолка?

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


Magnus
...
Рейтинг: 0 / 0
HWND???
    #32537280
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А ты муха или котелта? :)
Нет, ты зануда.
Ты даже не дал возможность мне признаться в ошибке, а стал наезжать. (Хоть я и признался давно, что ошибся) Так что, извиняться даааавно уже поздно. Был ты поспокойнее, уже давно б эту тему закрыли. А ты из мухи котелту сделал... эээа, то есть слона. :)
А человек ты знающий, насчёт очков не знаю. А API-Guide мне понравилась. :)
...
Рейтинг: 0 / 0
HWND???
    #32537369
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я не дал тебе возможность призатся в ошибке? Ново.
Освежим память.

/topic/95779&pg=1#703527
/topic/95779&pg=1#703534
/topic/95779&pg=1#703548
/topic/95779&pg=1#703617
/topic/95779&pg=1#703660

Итого: 5 возможностей. И в ответ на них 5 сьездов.
Извнинятся никогда ни поздно. И вместо того чтоб это сделать сразу, как только понял что спорол и забыть обо всем, ты начал размазывать философию.

Я может и зануда , но ты балабол. :)
Завершим на этом или разойдемся с миром?

Magnus
...
Рейтинг: 0 / 0
HWND???
    #32537397
arseny
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мы уже почти целую книгу написали... Название осталось придумать.
Нет, я не балабол. Просто не знал, что шутки так умеешь раздувать. :) Знал бы, не шутил бы с тобой.
авторЗавершим на этом или разойдемся с миром?
Я и за то и за другое. :)
Ладно, не серчай. Не бей по экрану, когда видишь мой ник. :) Если задел тебя, то извини. Но я всё равно за то, чтобы ты так не воспринимал шутки.
[/ твоя помощь мне ещё понадобится :) color]
...
Рейтинг: 0 / 0
HWND???
    #32537411
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну значит замяли. Видишь, это так просто. Ошибся, с кем не бывает. Или ты ожидал что я начну глумиться? Глупости.
Все ок.
На этом анша трансляция окончена, спасибо за внимание :).

Magnus
...
Рейтинг: 0 / 0
HWND???
    #32537418
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ЗЫ. Изнвини если был слишком резок. Это от недостатка пива в крови.

Magnus
...
Рейтинг: 0 / 0
HWND???
    #32537466
(c)VIG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Мапнус
Я я то думал , что после победы Порту у тебя переизбыток пива в крови
...
Рейтинг: 0 / 0
HWND???
    #32537540
Фотография Magnus23
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вчера, уровень пивоглобина повысился и очень сильно, но уже после того как мы тут начали развлекатся. :)


Magnus
...
Рейтинг: 0 / 0
34 сообщений из 34, показаны все 2 страниц
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / HWND???
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]