Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 23.06.2011, 11:11
sanik sanik вне форума
Прохожий
 
Регистрация: 22.06.2011
Сообщения: 4
Репутация: 10
По умолчанию Помогите новичку в COM и ActiveX достучаться до данных

Установил приложение на локальной машине, оно зарегистрировало библиотеки, которые содержат в себе COM бизнес-объекты для доступа к sql server базе.

Теперь надо как-то вынести на форму данные из "таблицы", вернее из ее бизнес-представления, содержащегося в COM объекте, хотя бы в грид или листбокс.

Изменить содержимое или добавить новую строку и обновить данные в библиотеке, чтобы она обновила содержимое в базе данных.

Хоть бы увидеть какой-нибудь реальный пример, как это все организовывается. В умных книгах все вокруг да около, как сделать COM сервер, как открыть его по GUID, но не нашел ни одного по взаимодействию с базой данных.
Ответить с цитированием
  #2  
Старый 23.06.2011, 11:51
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

для начала попробуй сделать импорт библиотеки типов, чтобы получить описания интерфейсов.
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #3  
Старый 23.06.2011, 17:25
sanik sanik вне форума
Прохожий
 
Регистрация: 22.06.2011
Сообщения: 4
Репутация: 10
По умолчанию

Сделал. Дальше не продвинулся
http://www.tellmeday.com/load/Inventory.jpg
Ответить с цитированием
  #4  
Старый 23.06.2011, 19:55
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

ну теперь используя нужные компоненты, возможно связывая их друг с другом, добиться получения данных. еще лучше найти описание всего этого, что так забило вкладку ActiveX.
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #5  
Старый 23.06.2011, 20:17
sanik sanik вне форума
Прохожий
 
Регистрация: 22.06.2011
Сообщения: 4
Репутация: 10
По умолчанию

в том то и дело, что я не знаю как продвинуться дальше, хотя бы пример как вывести записи в grid
Ответить с цитированием
  #6  
Старый 23.06.2011, 20:21
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

ну в грид то вывести это как раз не проблема - проблема в том откуда их взять ищи описание, без него, имхо, тяжко будет.
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #7  
Старый 23.06.2011, 20:40
sanik sanik вне форума
Прохожий
 
Регистрация: 22.06.2011
Сообщения: 4
Репутация: 10
По умолчанию

описание чего? COM бизнес - объектов?
вот пример что я имею


RETURN
This transaction will save a Return Receiver and all related transactions to cause inventory to be adjusted accordingly. Please note that it is hierarchical. Each Receiver header has one to many receiver lines, and each receiver line may have one to many trace entries.

Field Type Description
ENTRY_NO Integer Numbers each transaction being provided to the set.
Typically you supply one transaction at a time, however, you may also batch transactions. Be careful how many rows you attempt to save per logical transaction.
You must number the entries so that trace information can be associated with each new transaction.
TRANSACTION_DATE Date Date of transaction. Defaults to current date.
PURC_ORDER_ID Varchar(15) Purchase Order ID being returned. Required.
USER_ID Varchar(20) The User ID of the person performing the transaction. Defaults to SYSADM.
RETURN_LINE Sub-recordset.

The RETURN_LINE sub-recordset has the following layout:
Field Type Description
ENTRY_NO Integer Numbers each transaction being provided to the set.
Typically you supply one transaction at a time, however, you may also batch transactions. Be careful how many rows you attempt to save per logical transaction.
You must number the entries so that line item and trace
information can be associated with each new transaction.
LINE_NO Integer Value signifying the purchase order line number being returned. Required.
USER_QTY Decimal Number If the Part is not defined as piece tracked, this is the quantity being returned, in the purchasing unit of measure. If the Part is defined as piece tracked, this is the number of pieces being returned. Required.
LENGTH Decimal Number Length of pieces being returned. Required if Part is defined as piece tracked by length.
WIDTH Decimal Number Width of pieces being returned. Required if Part is defined as piece tracked by width.
HEIGHT Decimal Number Height of pieces being returned. Required if Part is defined as piece tracked by height.
WAREHOUSE_ID Varchar(15) The warehouse from which the parts are being returned. Defaults to the warehouse the parts were originally received into.
LOCATION_ID Varchar(15) The location from which the parts are being returned. Defaults to the location the parts were originally received into.
TRACE_INFO Sub-recordset. Required if the Part is defined as traced, and its trace profile specifies trace info required for this transaction type.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 11:31.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter