ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / форма - контрол
15 сообщений из 15, страница 1 из 1
форма - контрол
    #37487696
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
как управлять объектами в контроле из главной формы? можно конешь создать в контроле событие и вызывать его,
 
Код: plaintext
1.
2.
3.
4.
Private Sub Command1_Click() 'в форме
Me.UserControl11.Expand
End Sub
Public Sub Expand() 'в контроле
end sub

но это как-то неправильно, т.к. много мороки, большая часть кода перейдёт в контрол и придётся переносить переменные и тд. код должен быть в главной форме.
Код: plaintext
Me.UserControl11.MSFlexGrid1.Rows =  1
не работает

p/s можно ли тогда вообще весь код перенести в контрол? тем самым решив проблему с сотрудничеством формы и контрола
p/p/s какого лешего он UserControl11 когда он UserControl1?
...
Рейтинг: 0 / 0
18.10.2011, 20:03
| Ответить | Цитировать | Написать  
форма - контрол
    #37487787
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
BelowZeroкак управлять объектами в контроле из главной формы? можно конешь создать в контроле событие и вызывать его,не событие, а метод (как в приведенном примере) или функцию. Именно так и управлять
BelowZeroно это как-то неправильно, т.к. много мороки, большая часть кода перейдёт в контрол и придётся переносить переменные и тд. код должен быть в главной форме.это никак не следует из предыдущего - можно оставить весь код в форме
BelowZeroне работаетКакой упорный мальчик. Ну хорошо, выкладываю еще один пример управления объектами внутри контрола из формы. Тут уже по уму сделано - через свойства.
BelowZerop/s можно ли тогда вообще весь код перенести в контрол? тем самым решив проблему с сотрудничеством формы и контролаэто дело программиста
BelowZerop/p/s какого лешего он UserControl11 когда он UserControl1?Когда ты создаешь на форме новый объект класса Label, он автоматически именуется Label1, когда создаешь новый контрол класса MSFlexGrid - он именуется MSFlexGrid1, так почему же тебя удивляет, что создавая новый контрол класса UserControl1 он именуется UserControl11????
...
Рейтинг: 0 / 0
18.10.2011, 21:38
| Ответить | Цитировать | Написать  
форма - контрол
    #37487846
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
да, спс. получается так
Код: plaintext
1.
2.
Public Property Get Rows() As String
  Rows = MSFlexGrid1.Rows
End Property
но столкнулся с новой сложностью мгновенно, когда нужно проверить содержимое ячейки... да и с моим талантом находить приключения будут ещё несколько сотен находок. в общем, пришла новая мысль... не использовать в коде во время работы контрол вообще. а проверить, как заполнена таблица, можно будет просто запутив программу. попробую так, напишу, что получилось
...
Рейтинг: 0 / 0
18.10.2011, 22:16
| Ответить | Цитировать | Написать  
форма - контрол
    #37487860
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Блинн! Где тут смайлик, бьющийся головой об стену?!!!

Ну почему String-то!???? ПОЧЕМУ???? НУ где мозг-то хоть чуть чуть?
...
Рейтинг: 0 / 0
18.10.2011, 22:35
| Ответить | Цитировать | Написать  
форма - контрол
    #37487871
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
Shocker.Pro,

Public Property Get Rows() As.... as... as......... Variant (!!!!!:P)
так лучше?)
...
Рейтинг: 0 / 0
18.10.2011, 22:44
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
форма - контрол
    #38019485
donpauls
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
donpauls
Гость
Shocker.Pro,

а как сделать, чтобы событие клика по кнопке, к примеру, было событием контрола?
...
Рейтинг: 0 / 0
31.10.2012, 01:18
| Ответить | Цитировать | Написать  
форма - контрол
    #38019529
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
В смысле?
А что, нельзя клику контрола назначить что-то?
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
Private Sub Command1_Click()
    Label1_Click
End Sub

Private Sub Label1_Click()
    MsgBox "It's Click on Label"
End Sub

Или подразумевалось, что надо именно динамически переназначить событие на кнопке?
...
Рейтинг: 0 / 0
31.10.2012, 05:57
| Ответить | Цитировать | Написать  
форма - контрол
    #38019555
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
donpaulsShocker.Pro,

а как сделать, чтобы событие клика по кнопке, к примеру, было событием контрола?
Код: vbnet
1.
2.
3.
4.
5.
Public Event MyEvent(Param1, Param2)

Private Sub Command1_Click()
    RaiseEvent MyEvent("Hello", "World")
End Sub
...
Рейтинг: 0 / 0
31.10.2012, 08:20
| Ответить | Цитировать | Написать  
форма - контрол
    #38020599
donpauls
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
donpauls
Гость
AntonariydonpaulsShocker.Pro,

а как сделать, чтобы событие клика по кнопке, к примеру, было событием контрола?
Код: vbnet
1.
2.
3.
4.
5.
Public Event MyEvent(Param1, Param2)

Private Sub Command1_Click()
    RaiseEvent MyEvent("Hello", "World")
End Sub



спасибо большое!

подскажите тогда еще, как реализовать "метод" на контроле?
...
Рейтинг: 0 / 0
31.10.2012, 17:58
| Ответить | Цитировать | Написать  
форма - контрол
    #38020603
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Точно так же как и свойство .
...
Рейтинг: 0 / 0
31.10.2012, 18:01
| Ответить | Цитировать | Написать  
форма - контрол
    #38020627
donpauls
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
donpauls
Гость
AntonariyТочно так же как и свойство .

это понятно...
а можно пожалуйста пример?
...
Рейтинг: 0 / 0
31.10.2012, 18:24
| Ответить | Цитировать | Написать  
форма - контрол
    #38020710
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Не знаете как Sub пишется?
...
Рейтинг: 0 / 0
31.10.2012, 19:58
| Ответить | Цитировать | Написать  
форма - контрол
    #38024782
donpauls
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
donpauls
Гость
AntonariydonpaulsShocker.Pro,

а как сделать, чтобы событие клика по кнопке, к примеру, было событием контрола?
Код: vbnet
1.
2.
3.
4.
5.
Public Event MyEvent(Param1 as String, Param2 as String)

Private Sub Command1_Click()
    RaiseEvent MyEvent("Hello", "World")
End Sub



Сделал по примеру, но не могу к этому событию ничего прикрепить (создаю в VB6 и использую в MS Access):
Код: vbnet
1.
2.
3.
Private Sub MyControl12_MyEvent(Param1 as String, Param2 as String) 'активна кнопка или нет
MsgBox Param1 & " " & Param2
End Sub



Не работает. Что неправильно делаю? Правда по сравнению с примером я добавил ещё "As String"
...
Рейтинг: 0 / 0
04.11.2012, 01:09
| Ответить | Цитировать | Написать  
форма - контрол
    #38024808
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreTM
Участник
donpaulsЧто неправильно делаю? Правда по сравнению с примером я добавил ещё "As String"А почитать про события, про определение параметров, про передачу параметров?
И что означает "создаю в VB6 и использую в MS Acces"?
...
Рейтинг: 0 / 0
04.11.2012, 01:59
| Ответить | Цитировать | Написать  
форма - контрол
    #38031132
donpauls
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
donpauls
Гость
AndreTMdonpaulsЧто неправильно делаю? Правда по сравнению с примером я добавил ещё "As String"А почитать про события, про определение параметров, про передачу параметров?
И что означает "создаю в VB6 и использую в MS Acces"?

Может всё таки найдутся добрые люди?
...
Рейтинг: 0 / 0
09.11.2012, 02:50
| Ответить | Цитировать | Написать  
15 сообщений из 15, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / форма - контрол
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/moderation_log.php?user_name=Rise1]:
 0ms
get settings:
 8ms
get forum list:
 16ms
get settings:
 11ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 38ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 54ms
get tp. blocked users:
 1ms
others: 482ms
total:  648ms
созд. / загр.: 648ms
x
x
Закрыть


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