powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / вопрос по FlexGrid
6 сообщений из 6, страница 1 из 1
вопрос по FlexGrid
    #32312662
МаксимВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет.
Создал в форме объект Microsoft FlexGrid Control(6.0) - Olecontrol1
и Microsoft ADO Data Control(6.0) - Olecontrol2

.Olecontrol2.RecordSource = "select * from table1"

Не получается полижить данные в объект FlexGrid.
Ошибка: Несовпадение типов.

Код: plaintext
1.
2.
3.
4.
PROCEDURE Init
	WITH THISFORM
		.Olecontrol1.datasource = .Olecontrol2
	ENDWITH
ENDPROC

Может я не так что-то делаю? Подскажите, пожалуйста.
Для NNN: постараюсь быть внимательней.
Максим.
...
Рейтинг: 0 / 0
вопрос по FlexGrid
    #32312666
Фотография NNN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2МаксимВ

Вообще-то, работать по выходным - не очень хорошая идея :)
Если нужен тип объекта, то попробуй
.Olecontrol1.datasource = .Olecontrol2.Object
Больше ничем помочь не смогу, поскольку Microsoft ADO Data Control(6.0) у меня отсутствует.
...
Рейтинг: 0 / 0
вопрос по FlexGrid
    #32312668
МаксимВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Уже пробовал, тоже ругается на тип данных.
Код: plaintext
1.
2.
WITH THISFORM
.Olecontrol1.datasource = .Olecontrol2.object
ENDWITH

Я уже попробовал добавить таблицу в form1.DataEnvironment и от туда в Grid передать курсор. Та же ошибка.
Может можно как-то по другому данные из таблицы в FlexGrid положить?
Или другой Grid взять?
А пример на VB нашел, но каждую ячейку нужно обрабатывать.
Приложение будет тормозить.
...
Рейтинг: 0 / 0
вопрос по FlexGrid
    #32312670
МаксимВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В примере написано: создайте объект DAO Data.
А потом передают этот объект в FlexGrid.
Я не знаю, что это за объект DAO Data?
...
Рейтинг: 0 / 0
вопрос по FlexGrid
    #32312680
Фотография NNN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Глянул я, переписать напрямую из VB не получается :(
Код: plaintext
1.
2.
3.
4.
5.
' В VB такое проходит
Dim con As New ADODB.Connection 
Dim rs As New ADODB.Recordset
con.Open  ".." 
rs.Open  ".." , con
Set FlexGrid.DataSource = rs

Код: plaintext
1.
2.
3.
4.
5.
*!* В фоксе не проходит
con=CREATEOBJECT('adodb.connection')
rs=CREATEOBJECT('adodb.recordset')
con.Open('..')
rs.Open('..',con)
thisform.olecontrol1.DataSource=rs && несовпадение типов

Поиск по интеренету ничего не дал, разве что вот здесь есть работающий пример , но он через заполнение ящеек, а не через DataSource.
...
Рейтинг: 0 / 0
вопрос по FlexGrid
    #32312819
МаксимВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет.
Нашел по указанной ссылке два примера:
1. MSFlexGrid.
2. MSDataGrid.
Первый пример у себя проверил, все работает.

А вот со вторым не получилось.
Там требуется еще VFPCOM Utility(vfpcom.dll). Скачал. Начал регистрировать -
ошибка. Посмотрел vfpcom.Dll к нему еще нужна библиотека msvcr70.dll
Скачал и его. Regsvr32.exe msvcr70.dll не зарегистрировал, а загрузил(про версию
ругался). После этого vfpcom.dll зарегистрировался.
Не знаю, все это как-то "коряво" получилось, может и из-за этого со вторым примером не вышло.

Остановился на первом варианте.
Спасибо.

Я на FoxPro первый раз пробую что-нибудь написать, по этому это мой не последний вопрос. Надеюсь на терпение и понимание.
Раньше на CLIPPER 5 писал. По этому когда Visual Studio нашел, то остановился FoxPro.
Съездил в нашу "столицу"(Кемерово) за книжкой М.Базияна. Теперь вот учусь.

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


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