Помогите подключить dll - VB

Узнай цену своей работы

Формулировка задачи:

Доброго дня всем!
Помогите подключить dll к проэкту написаному на VB6.
Суть в чем - есть программа написаная для работы с базой даных.
Возникла идея с нее печатать сразу на кассовый апарат. Апарат уже куплен Datecs FP3530t, с ним эсть длл для работы с ним. Она не ком.
Так как я не очень силен в ВБ (больше админ чем програмер, програмирование так хобби, а делать нужно), то столкнулся с одной проблемой, может это и елементарно, но я к сожелению ответа не нашел. Может кто посоветует сслылку какую то или книгу. А проблема вот в чем.
Формат функций из этой длл почти одинаковый
int CALLBACK dllFunction (HWND hwnd,void (CALLBACK *Fn),LPARAM UI,...)
HWND hwnd - всегда используется NULL
LPARAM UI - всегда 0L
void (CALLBACK *Fn) - функция которую вызывает библиотека после того как фискальный регистратор завершает выполнение команды.
Формат таков
Borland C++ BUilder
void CALLBACK _export PrinterResults(struct RetData far &rtd)
{
......
}
внутри библиотеки функция определена как
typedef void (PASCAL FAR *RetCallback) (struct RetData &);
struct RetData {
int Count;
int CmdCode;
LPARAM UserData;
LPARAM Status;
LPSTR CmdName;
LPSTR SendStr;
LPSTR Whole;
LPSTR RetItem[20];
unsigned char OrigStat[6]
}
Как правильно описать эти функции в ВБ.
Буду рад любой помощи, совету.
Зарание спасибо

Решение задачи: «Помогите подключить dll»

textual
Листинг программы
<font color="blue">Private</font> <font color="blue">Declare</font> <font color="blue">Sub</font> ExecuteCallback Lib <font color="green">"vcvbdll"</font> ( _
         <font color="blue">ByVal</font> pFunc <font color="blue">as</font> <font color="blue">Long</font>)

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 3.6 из 5