|
|
|
Junior Member
 
участник
Last Login: 11.05.2001 1:30
Сообщ.: 22,
Visits: 243
|
|
Как будет на делфи выглядеть описание этих функции
и их вызов?
Ниже приведено описание из хелпа прилагаемой к DLL
----------------
Прототипы и полные описания функций DLL для Visual Basic
OpenNet
Declare Function OpenNet% Lib "Nshell2.dll" (ByVal defpath$, netnumber%, inputs%, outputs%)
defpath$ - это строка, содержащая путь к .DEF-файлу. Если путь содержит только имя файла, то этот файл должен быть в текущем каталоге.
netnumber% - это целая переменная в Вашей программе, куда OpenNet поместит номер сети, который Вы будете использовать для указания на сеть в функциях FireNet и CloseNet.
inputs% - это целая переменная в Вашей программе, куда OpenNet поместит ожидаемое сетью количество входов.
outputs% - это целая переменная в Вашей программе, куда OpenNet поместит ожидаемое количество выходов сети.
Если код возврата OpenNet отличен от нуля, это обычно происходит потому, что OpenNet не смогла найти действительного .DEF-файла в месте, указанном переменной defpath$.
FireNet
Declare Function FireNet% Lib "Nshell2.dll" (netnumber%, inarray#, outarray#)
netnumber% - это целая переменная, содержащая номер сети, полученный Вашей программой при создании сети с помощью функции OpenNet.
inarray# - это первое число в ряду последовательных чисел двойной точности с плавающей запятой. Этот ряд должен состоять из стольких чисел, сколько входов ожидается сетью. Это может быть одномерный массив (например, Array(1)) или столбец в двумерном массиве (например, Array(1, J)). В этом массиве должны содержаться входные значения. Не изменяйте масштаб значений, так как FireNet сделает это за Вас.
outarray# - это также первое число в ряду последовательных чисел двойной точности с плавающей запятой. Этот ряд должен состоять из стольких чисел, сколько выходов ожидается у сети. FireNet поместит в этот массив выходные значения. Если Вы по ошибке зарезервируете меньше чисел двойной точности, чем окажется выходов, то Ваша программа, вероятно, аварийно прекратит свою работу, когда FireNet запишет оставшиеся выходы поверх части Вашей программы.
CloseNet
Declare Function CloseNet% Lib "Nshell2.dll" (netnumber%)
netnumber% - это целая переменная, содержащая номер сети, полученный Вашей программой при создании сети с помощью функции OpenNet.
|
|
|
|
|
Supreme Being
участник
Last Login: 03.03.2006 19:03
Сообщ.: 1 908,
Visits: 21 011
|
|
| Смотри help в Delphi по Index. Ключевые слова: External declaration
|
|
|
|