Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Net/Link: Problem with DLL (2)

  • To: mathgroup at smc.vnet.net
  • Subject: [mg48890] Re: Net/Link: Problem with DLL (2)
  • From: "psa" <psa at laplacian.co.uk>
  • Date: Tue, 22 Jun 2004 05:31:37 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Sorry, forgot
np=Length[zpl]

nq=Length[zql]

Peter

----- Original Message ----- 
From: "psa" <psa at laplacian.co.uk>
To: mathgroup at smc.vnet.net
Subject: [mg48890] Re: Net/Link: Problem with DLL (2)


> (does MathsForum want notebooks or raw text?)
> I am trying to lik to my DLLs and have now had some success.Howvert,
>
> Question 1:can anyone see the blunder (below)?
> Question2: when do' Input only' arrays need NetObjects?
>
>
> Needs["NETLink`"];
>
> In[365]:=
> zpl = Table[i, {i, 0.0, .1, .02}];
> zql = Table[i, {i, 0.0, .1, .02}];
> ozpl = MakeNETObject[zpl];
> ozql = MakeNETObject[zql];
> ostatus = MakeNETObject[0];
> ores = MakeNETObject[Table[0.0, {nq}, {np}]];
>
>
> In[371]:=
> testDLL =
> DefineDLLFunction["NameNotReleventYet", "maths0000.dll",
> "Void", {"ByVal m As Long", "ByVal rp As Double", "ByRef zpl As Double",
> "ByVal np As Long", "ByVal rq As Double", "ByRef zql As Double",
> "ByVal nq As Long", "ByVal gpp As Long", "ByVal gpq As Long",
> "ByRef res As Double", "ByRef status As Long"}]
> Out[371]=
> Function[Null,
> If[NETLink`DLL`Private`checkArgCount[NameNotReleventYet, {##1}, 11],
> Wolfram`NETLink`DynamicDLLNamespace`DLLWrapper30`NameNotReleventYet[##1],
\
> $Failed], {HoldAll}]
>
>
> The call is being rejected before it gets to the DLL . Res is a actually a
> two dimenional array. But, at this stage the DLLs actual args are not yet
> relevent
>
>
> In[372]:=
> testDLL[1, 0.05, zpl, 6, 0.05, zql, 6, 3, 4, ores, status]
> From In[372]:=
> NET::methodargs: Improper arguments supplied for method named \
> NameNotReleventYet.
> Out[372]=
> $Failed
>
>
> In[373]:=
> testDLL[1, 0.05, ozpl, 6, 0.05, ozql, 6, 3, 4, ores, status]
> From In[373]:=
> NET::methodargs: Improper arguments supplied for method named \
> NameNotReleventYet.
> Out[373]=
> $Failed
>



  • Prev by Date: AW: tangent in turning point
  • Next by Date: Re: Re: Overlay graphs
  • Previous by thread: AW: tangent in turning point
  • Next by thread: Re: Net/Link: Problem with DLL (2)