Форум OlegON > Компьютеры и Программное обеспечение > Операционные системы и программное обеспечение > Программирование

как в Delphi 6 использовать DLL, созданный в Visual Basic : Программирование

19.04.2024 22:47


06.03.2012 15:19
Janek
 
Ты увидел все эти процедуры и классы из длл-ки?
06.03.2012 15:26
student
 
Цитата:
Janek Ты увидел все эти процедуры и классы из длл-ки?
походу мы друг друга не понимаем :( как можно увидеть что либо, если чуть выше

Цитата:
student либо я чего то в этой жизни не понимаю, либо чего то не хватает :)
м.б. не стоит огород городить - формат обмена с диджами достаточно хорошо расписан у с+ и есть длл-ка котороя точно будет работать в дельфях
=======
TWSWTCP.DLL – краткое описание
DLL экспортирует следующую функцию:
execute(AOperation: TOperation; AScaleIP: PChar; AFileName: PChar; ACommand: BYTE): TOperationResult;
=======
06.03.2012 15:41
Janek
 
можешь скачать visual studio поновее? Потому что у тебя наверно старая версия и поэтому ты не можешь открыть эту длл-ку.
06.03.2012 15:43
student
 
Цитата:
Janek можешь скачать visual studio поновее? Потому что у тебя наверно старая версия и поэтому ты не можешь открыть эту длл-ку.
а может проще будет весь проект vb с исходниками в хранилище положить?
06.03.2012 15:53
Janek
 
Вот ссылка:


Здесь и проект vb, а в папке bin/debug/ находится этот злополучный scload.dll, который никак не хочет регистрироваться в регистрах.
Этот написанный на C++ TWSWTCP.DLL годится для весов SM500?
06.03.2012 16:11
student
 
Цитата:
Janek Этот написанный на C++ TWSWTCP.DLL годится для весов SM500?
практически на всех сайтах, где он упоминается есть ссылка на см-500
06.03.2012 16:21
Janek
 
Вопрос Олегу - владельцу форума. Вы написали, что по-вашему мнению эта длл-ка не просто подключаемая библиотека, а это сервер-СОМ и что по-вашему мнению вызов процедур неправильный. В таком случае у меня вопрос такой:
"Как в Дельфи6 обратиться к этому длл-файлу, который является COM-сервером?".
06.03.2012 16:30
OlegON
 
Мое мнение, что вызывать функции из dll, которая их не экспортирует, бессмысленно. Необходимо зарегистрировать библиотечку через regsrv32 и потом использовать сервер DCOM. Когда она не регистрится, она что говорит? Может, действительно, кривая или неполная? Извини, возиться с ней не интересно. Тоже уже давно забыл Delphi. Некроссплатформенная и платная она.
06.03.2012 16:38
student
 
не заморачивайтесь с этой длл-кой - для ее работы необходимо наличие в памяти "User License" - идет и запускается вместе с проектом, но в конечном счете формируется обычный файлик, который передается в весы утилитой
============
DIGIWTCP.EXE (NEW DRIVER)

Driver to send/receive data to/from scales.
EXEcutable Type

The format of the syntax is:

TWSWTCP command file_num machine_1 [machine_2 ... machine_n]

where the items inside the square backets are optional.

If an input/output file is needed, the format of the input/output filename is:
SM + ip_address_or_name + F + file_number + .DAT

IP Address of Name : The full IP address of the scale. With this new driver no hosts file entry needed for the scale definitions.

File Number : If the file indicated as 25H (Hex value) in the driver manual, it will be used as 37 (decimal value of Hex(25))

See example below for the usage.


Example: machine dairy sending PLU records, the input file is
SMdairyF37.DAT
command line is
TWSWTCP WR 37 dairy

Example: machine 192.168.1.2 sending PLU records from PC to scale,;

The input file name is :
SM192.168.1.2F37.DAT
Upload command line is :
TWSWTCP WR 37 192.168.1.2

Input files should not have control characters embedded.

Parameters:
command
Can be any of the following
RD - read
WR - write
DEL - delete
DELFI - delete file
RD_DEL - read and then delete

file_num
file number in decimal(base 10) form

machine_1
machine IP address and/or host name to operate on

[machine_2
machine_n] additional IP addresses or host names to operate on


Returns:

A file named result or the value of gcResult that contains the return code and the machine that returned the error. Format of the file is

machine_1:return_code;machine_2:return_code;machine_n:return_code.

return_code - can be any of the following 0 = no error
-1 = Open file error
-2 = Read from file error
-3 = Write to file error
-4 = Network initialize error
-5 = Network open error
-6 = Network read error
-7 = Network write error
-8 = Machine read error
-9 = Machine write error
-10 = Machine no record error
-11 = Machine space error
-12 = Undefined error
============

используйте лучше длл-ку TWSWTCP.DLL - проще будет
06.03.2012 16:53
Janek
 
Где эту длл-ку найти? TWSWTCP.DLL

Добавлено через 2 минуты 20 секунд
User Licence присылает разработчик длл-файла для каждой машины, из которой будет отправляться информация весам. Моя задача состоит в разработке приложения, из которого весам будет отправляться информация о товарах. Поэтому одной этой TWSWTCP.exe недостаточно.

Добавлено через 1 минуту 47 секунд
Студент - Может все-таки посмотрите через vb эту длл-ку?
Часовой пояс GMT +3, время: 22:47.

Форум на базе vBulletin®
Copyright © Jelsoft Enterprises Ltd.
В случае заимствования информации гипертекстовая индексируемая ссылка на Форум обязательна.