ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Создание объекта из DLL
7 сообщений из 7, страница 1 из 1
Создание объекта из DLL
    #35629772
konst541
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
konst541
Участник
Может некорректно написал сабж, ситуация следующая:
Есть библиотека стороннего разработчика (один файл dll). Необходимо в PB (ver.9) создать объект описанный в этой dll и использовать его методы.

Есть пример создания этого объекта для VB. Как подобное сделать в PB не представляю. Подскажите, пожалуйста, откуда начать и где почитать. Примеры приветствуются, спасибо!
...
Рейтинг: 0 / 0
01.11.2008, 09:58
| Ответить | Цитировать | Написать  
Создание объекта из DLL
    #35629880
Локшин Марк
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Локшин Марк
Участник
Самое простое - сделайте так как написано для VB, а с этим уже взаимодействуйте из PB. Вообще, создание объектов которые лежат в dll - не совсем тривиально и зависит от того, на чем эта dll была написана, т.к. такого понятия как "объект" в dll в терминах Windows не существует.
...
Рейтинг: 0 / 0
01.11.2008, 10:43
| Ответить | Цитировать | Написать  
Создание объекта из DLL
    #35629967
konst541
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
konst541
Участник
Локшин Марксделайте так как написано для VB, а с этим уже взаимодействуйте из PB.

Я не представляю как такой код(подход) можно применить к PB:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Dim Ctrl As GflAx.GflAx  'вот это смущает более всего :-)

Private Sub Form_Load()
Set Ctrl = New GflAx.GflAx 'и это

With Ctrl
    .LoadBitmap App.Path & "\image.jpg" 'Load the file
'далее неважно ...

нашел в PB help:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
OLEObject PBObject, PBNVObject

long ll_status
double ld_result

PBObject = CREATE OLEObject //createobject
ll_status = PBObject.ConnectToNewObject("GflAx.GflAx") // GflAx.
IF ll_status <>  0  THEN
	// Handle the error
ELSE
	PBObject.LibraryList = "c:\work\pb\prncert - trunc\xnview\GflSDK\GflAx\Lib\std\GflAx.dll"
	PBObject.MachineCode = TRUE

	PBNVObject = CREATE OLEObject

	PBNVObject = &
		PBObject.CreateObject("GflAx.GflAx")
	IF IsNull(PBNVObject) THEN
		// Handle the error
	ELSE
		//ll_status = PBNVObject.uf_calc ( 12 ,  14 , REF result)
	END IF

	DESTROY PBNVObject
	PBObject.DisconnectObject( )
END IF

DESTROY PBObject

Подскажите я правильно "копаю" в сторону OLE?
...
Рейтинг: 0 / 0
01.11.2008, 11:17
| Ответить | Цитировать | Написать  
Создание объекта из DLL
    #35629985
Фотография spas2001
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
spas2001
Участник
Да, делал я такое, если найду пример скину
Фотографии в базу грузил
-----------------------------------------------------------------------------
Главная деталь любой машины - голова ее владельца
...
Рейтинг: 0 / 0
01.11.2008, 11:26
| Ответить | Цитировать | Написать  
Создание объекта из DLL
    #35630315
Локшин Марк
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Локшин Марк
Участник
konst541Подскажите я правильно "копаю" в сторону OLE?
Ну если там есть в той библиотеке OLE объект, то да, иначе нет.
...
Рейтинг: 0 / 0
01.11.2008, 13:10
| Ответить | Цитировать | Написать  
Создание объекта из DLL
    #35630413
18-я весна
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
18-я весна
Участник
konst541
Я не представляю как такой код(подход) можно применить к PB:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Dim Ctrl As GflAx.GflAx  'вот это смущает более всего :-)

Private Sub Form_Load()
Set Ctrl = New GflAx.GflAx 'и это

With Ctrl
    .LoadBitmap App.Path & "\image.jpg" 'Load the file
'далее неважно ...

Этому соответствует код:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
OLEObject PBObject

long ll_status
PBObject = CREATE OLEObject //createobject
ll_status = PBObject.ConnectToNewObject("GflAx.GflAx") // GflAx.
IF ll_status <>  0  THEN
    // Handle the error
ELSE
    PBObject.LoadBitmap(ls_app_path + "\image.jpg")
    ....
    PBObject.DisconnectObject( )
END IF
...
Рейтинг: 0 / 0
01.11.2008, 13:46
| Ответить | Цитировать | Написать  
Создание объекта из DLL
    #35630492
konst541
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
konst541
Участник
Этому соответствует код:
...

Спасибо Вам! и остальным!
...
Рейтинг: 0 / 0
01.11.2008, 14:11
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / PowerBuilder [игнор отключен] [закрыт для гостей] / Создание объекта из DLL
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=15&gotonew=1&tid=1336488]:
 0ms
get settings:
 8ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 46ms
get topic data:
 10ms
get first new msg:
 8ms
get forum data:
 2ms
get page messages:
 41ms
get tp. blocked users:
 1ms
others: 10ms
total:  145ms
созд. / загр.: 145ms
x
x
Закрыть


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