Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 22.12.2011
Сообщений: 27

Как можно синхронизировать контролы?

23.05.2012, 11:16. Показов 968. Ответов 2
Метки нет (Все метки)

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

Кроме этого, есть массив данных, который тоже должен изменяться согласованно с изменением контролов.

Как это можно сделать?
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
23.05.2012, 11:16
Ответы с готовыми решениями:

Если на форме 2 объекта DTPicker, можно ли их синхронизировать?
1) Если на форме 2 объекта DTPicker, можно ли их синхронизировать? т.е. при изменении даты в одном, дата в другом тоже менялась. 2) А...

Поток в макросах. Как можно синхронизировать его с основным потоком программы
Всем доброго времени суток. Использую поток в макросах. Как можно синхронизировать его с основным потоком программы (Excel)? Пробовал...

Как можно синхронизировать календари, задачи, расписания из Outlook с телефоном на Android?
Допустим я в Outlook 2010 распланировал себе весь следующий день. Теперь я хочу иметь копию этого календаря, расписания, задач на мобильном...

2
6 / 6 / 3
Регистрация: 17.10.2007
Сообщений: 1,119
23.05.2012, 18:20
Kak ideya:

Ponimaya pod "spiskom" ListBox i postavya reference na Microsoft Scripting Runtime, mozhno sdelat' sleduyuschee:

Option Explicit

Private mdctList1 As New Dictionary
Private mdctList2 As New Dictionary

Private Sub Form_Load()
Dim intListIndex As Integer

For intListIndex = 1 To 20
mdctList1.Add intListIndex, "A" & CStr(intListIndex)
mdctList2.Add intListIndex, "B" & CStr(intListIndex)
List1.AddItem "A" & CStr(intListIndex)
List2.AddItem "B" & CStr(intListIndex)
Next intListIndex

End Sub

Private Sub Form_Unload(Cancel As Integer)
Set mdctList1 = Nothing
Set mdctList2 = Nothing
End Sub

Private Sub List1_Click()
List2.Selected(List1.ListIndex) = True
End Sub

Private Sub List2_Click()
List1.Selected(List2.ListIndex) = True
End Sub

vladconn
0
0 / 0 / 0
Регистрация: 22.12.2011
Сообщений: 27
27.05.2012, 08:23  [ТС]
Я взял не слишком удачный пример.
На самом деле могут быть не только ListBoxы, но и дргуие контролы. И неизвестно сколько их будет и какие.
Мне кажется, здесь что-то с Events надо делать, но не совсем понимаю как.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
27.05.2012, 08:23
Помогаю со студенческими работами здесь

Как сделать чтобы контролы типа Button можно было перетаскивать по форме?
Пока только начинаю разбираться в Delphi перерыл кучу примеров и уроков но не смог найти подходящих.. Нужно чтобы при зажатой левой...

Как подцепить контролы к определенным путям линиям? чтобы пермещать их можно было только по ним
Имеется форма, фоном у нее идет рисунок(план), на форме находятся контролы их можно перетаскивать зажатой левой кнопкой мыши Как можно...

Можно ли синхронизировать две формы во вкладках?
Можно ли синхронизировать (по коду, счетчику) две самостоятельные формы которые находятся в двух вкладках другой формы? У меня много...

Можно ли в дизайнере не показывать контролы
Собственно вопрос. На форме накидано много контролов. До нижних уже не так просто добраться. А если учесть, что рядом с ними нужно ставить...

Можно ли синхронизировать данные в двух разных книгах
Добрый день. Нужна ваша помощь. Предположим дан файл, в нем 2 книги. Нужно, чтобы при появлении данных в 1 книге(в определенном поле), в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит: токи, напряжения и их 1 и 2 производные при t = 0;. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru