powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Использование элемента VSFlexGrid в MS ACCESS
25 сообщений из 86, страница 1 из 4
Использование элемента VSFlexGrid в MS ACCESS
    #37204038
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Уважаемые форумчане,

Мне очень давно хотелось найти какую-нибудь альтернативу стандартному представлению данных в ACCESS в табличном виде.
Т.е. табличной или ленточной форме.
Читая материалы на форуме, я узнал о таком элементе как VSFlexGrid.
Сейчас я пытаюсь разобраться с материалами и примерами (VB) по использованию этого элемента.
Но что-то я пока не могу понять даже для начала, как для этого элемента задать какие-то базовые установки (заполнить шапку, забросить в таблицу данные из таблицы, запроса или рекордсета, задать формат ячеек).

У меня большая просьба к уважаемому сообществу. Если кто-то использовал этот элемент в ACSe и кому не будет совсем в лом помочь с конкретным практическим примером,буду очень признателен.
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37204924
Arthur_sss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ALEXIS_22,

Load form()
Dim thers As ADODB.Recordset
thers.Open "SELECT * FROM timezone", CurrentProject.Connection

'Настройка грида
FG.SelectionMode = 1 'выделить только строку
'FG.CellFontName = "Calibri" 'Наименование шрифта
'FG.CellFontSize = 10 'Размер шрифта
'FG.CellFontBold = True 'Жирный

FG.FontName = "Calibri" 'Наименование шрифта
FG.FontSize = 11 'Размер шрифта
FG.FontBold = True 'Жирный

'FG.FloodColor = RGB(100, 255, 100) 'Цввет непонятно чего
FG.FixedRows = 1 'Количество закрепленных заголовок недоступный только одну строчку
FG.FixedCols = 0 'Количество закрепленных колонок
FG.BackColorSel = vbBlue 'Строка выделения
FG.BackColorBkg = RGB(160, 160, 160) 'Цвет заднего фона за гридом
FG.BackColorAlternate = RGB(211, 215, 210) 'цвет альтернативных записей

'Настройка размеров по прямоугольнику
FG.Width = PG.Width - 100
FG.Height = PG.Height - 100
FG.Top = PG.Top + 50
FG.GridlineColor = RGB(211, 215, 210)


'FG.SelectionMode = flexSelectionListBox


'загрузка ресурсов
Set FG.DataSource = thers

'Форматирование заголовков столбцов
FG.FormatString = "#|Картка|Фамилия|Имя|Посада|Дивизион|Email|Мобільний|График"

'Центровка столбцов
FG.ColAlignment(0) = flexAlignCenterCenter
FG.ColAlignment(1) = flexAlignCenterCenter
FG.ColAlignment(2) = flexAlignLeftCenter
'FG.ColAlignment(3) = flexAlignCenterCenter

'Ширина колонок
FG.ColWidth(0) = 700
FG.ColWidth(1) = 700
FG.ColWidth(2) = 2000
FG.ColWidth(3) = 1500
FG.ColWidth(4) = 2500
FG.ColWidth(5) = 2500
FG.ColWidth(6) = 3000
FG.ColWidth(7) = 3000

'Последний растянуть до конца
FG.ExtendLastCol = True

'FG.ColSort(3) = flexSortGenericAscending
'FG.Select

'FG.Sort = flexSortUseColSort

FG.DataMode = 0
'FG.Cols = 4
FG.ColSort(3) = flexSortGenericAscending





'FG.BorderStyle = 4 'Вид бордюра
End Sub
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37204935
Arthur_sss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205020
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо !
Наконец-то что-то увидел в форме. Надо самому поэксперементировать.
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205064
Arthur_sss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ALEXIS_22,

Пиши...Чем смогу...-))
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205119
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
Dim thers As ADODB.Recordset
thers.Open "SELECT * FROM Tempor", CurrentProject.Connection

Создал таблицу Tempor, но открыть рекордсет thers не может - не видит таблицу Tempor.
Я обычно работаю с DAO. Но на созданный на основе той же таблицы DAO.Recordset - тоже ошибка свойства
Код: plaintext
Set FG.DataSource
Так что пока в этом затык.
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205148
Arthur_sss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ALEXIS_22,

В редакторе :
Tools-Referens
Подключи Microsof ActiveX Data Objects .. Library
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205170
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ссылка есть на ADO 2.1
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205191
Arthur_sss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ALEXIS_22,

У меня например 6 версия 2 не подходит поищи 6
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205211
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А так сама таблица с шапкой загрузилась, только полосатая какая-то.
Код: plaintext
FG.BackColorAlternate = RGB( 211 ,  215 ,  210 ) 
Цвет этих полос менять могу, а других нет.

Еще ошибка в строке
Код: plaintext
FG.GridlineColor = RGB( 211 ,  215 ,  210 )
- не находит такого свойства.

И теперь наверное самое главное - с чего собственно нужно было начать. Я использую элемент FlexGrid 8.0 (DAO/RDO)
а еще есть FlexGrid 8.0 (OLEDB) и FlexGrid 8.0 (Light).

Хотя по-моему дело в чем-то другом.
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205215
Arthur_sss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот как ввыглядят сввязи
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205221
Arthur_sss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Arthur_sss,

OLEDB нужен !
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205223
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2.6 подключил с тем же результатом.
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205229
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
OLEDB взял - пока тоже самое
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205236
Arthur_sss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ALEXIS_22,

1. Сввязь на Microsof ActiveX Data Objects 6.0 Library
2. Элемент VSFLEX8.OCX (OLEDDB)
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205262
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Понял.
У меня в References 6 ADO нет. Добывать надо
Тогда Time Out - спасибо за помощь и внимание.
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205322
ZezaM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ALEXIS_22,
фрагмент на гриде -- :-) VideoSoft FlexArray Control
заремленный код м.б. для дугих ФГ - уже не помню
законченный вариант не нашел
может кому сгодится...
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37205942
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А можно как-то его заполнять, непосредственно указывая адрес ячеек при обращении?
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37206073
ZezaM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ALEXIS_22А можно как-то его заполнять, непосредственно указывая адрес ячеек при обращении? если вопрос мне...
покопавшись в заремленном коде, Кнопка6_Click - чисто для примера
Код: plaintext
1.
2.
3.
Private Sub Кнопка6_Click()
' Адрес Ячейки  - 33, в кот-ю запишу значение - "!!!!!"
    Me.Flex.TextArray( 33 ) = "!!!!!"
End Sub
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37206129
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
Private Sub Кнопка6_Click()
' Адрес Ячейки  - 33, в кот-ю запишу значение - "!!!!!"
    Me.Flex.TextArray( 33 ) = "!!!!!"
End Sub

Так не получилось. Только
Код: plaintext
FG.Value = "ФФФФФ"
- тупо пишет значение в самую первую ячейку и все.
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37206174
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 ZezaM
Только сейчас я могу смотреть Ваш пример. . Хочу повнимательнее с ним разобраться. По непонятностям отпишусь.

Спасибо.
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37206195
ZezaM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ALEXIS_22,
Адрес Ячейки - не указан
FG.Value = "ФФФФФ"
очевидно поэтому
- тупо пишет значение в самую первую ячейку и все.
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37206207
ZezaM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
пока отвечал появился этот пост
ALEXIS_222 ZezaM
Только сейчас я могу смотреть Ваш пример. . Хочу повнимательнее с ним разобраться. По непонятностям отпишусь.
Спасибо.чем смогу... : ))
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37206446
ALEXIS_22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 ZezaM
Хотел бы для себя еще прояснить два сущетвенных момента:

Возможно ли этот грид сделать интерактивным, ( вводить в ячейки значения с клавиатуры)
и применять условное форматирование для (при заполнении матрицы грида)
...
Рейтинг: 0 / 0
Использование элемента VSFlexGrid в MS ACCESS
    #37206571
ZezaM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ALEXIS_222 ZezaM
Хотел бы для себя еще прояснить два сущетвенных момента:

Возможно ли этот грид сделать интерактивным, ( вводить в ячейки значения с клавиатуры)
и применять условное форматирование для (при заполнении матрицы грида) ничего такого не требовалось, просто тупо заполнял и была выборка по ...
-интерактивным...покопавшись нашел - либо в окне свойств ФГ ставить Editable птицу , либо Me.Flex.Editable = True
-условное форматирование - пока в пути, но мб этот ФГ и не способен...
...
Рейтинг: 0 / 0
25 сообщений из 86, страница 1 из 4
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Использование элемента VSFlexGrid в MS ACCESS
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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