Search found 10 matches
- Thu Oct 31, 2013 10:57 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Embedding a 3rd party .dll
- Replies: 34
- Views: 8580
Re: Embedding a 3rd party .dll
Thank you very much Antonio, this solution works fine. Do you also know how to return an array of integer? I have another function (with 2 structs), that returns information of a xml-file. If there are discrepancies in the xml-file the array of int "Hinweis[30]" should return error-codes. ...
- Mon Oct 28, 2013 12:39 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Embedding a 3rd party .dll
- Replies: 34
- Views: 8580
Re: Embedding a 3rd party .dll
Antonio, I tried your solution: the program shows the message "not an array there". After that it crashes. ... PHB_ITEM pArray = hb_param( 17, HB_IT_ARRAY ); ... if( ! pArray ) { MessageBox( 0, "not an array there", "ok", 0 ); } for ( k = 0; k < 30; k++ ) { ...
- Thu Oct 24, 2013 1:30 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Embedding a 3rd party .dll
- Replies: 34
- Views: 8580
Re: Embedding a 3rd party .dll
Antonio, unfortunately this solution does not work, the program crashes. I tried this way also a week ago and the program works only like this, but does not fill the array of integer PHB_ITEM pArray = hb_param( 1, HB_IT_ARRAY ); for ( k = 0; k < 30; k++ ) { aStruct.CSVFeld[k] = hb_arrayGetNI...
- Thu Oct 24, 2013 12:32 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Embedding a 3rd party .dll
- Replies: 34
- Views: 8580
Re: Embedding a 3rd party .dll
Antonio,
yes, like Gilbert I'm using xHarbour.
yes, like Gilbert I'm using xHarbour.
- Thu Oct 24, 2013 11:32 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Embedding a 3rd party .dll
- Replies: 34
- Views: 8580
Re: Embedding a 3rd party .dll
Antonio, it's easier to explain it on another function, which also contains a struct with an array of integer-element ( int CSVFeld[30]; ) #include "Fivewin.ch" function main() local aConvertCSV2XML msgInfo(SEPATOOLS_INIT( "", "", "c:\temp", "...
- Thu Oct 24, 2013 10:32 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Embedding a 3rd party .dll
- Replies: 34
- Views: 8580
Re: Embedding a 3rd party .dll
Hello Eduardo, it's the same sourcecode like in my earlier post (Wed Oct 23, 2013 8:24 am). I changed only line 101, so it looks now like that: typedef struct { // ... int Hinweis[30]; } XMLReadStruct24; HB_FUNC( SEPATOOLS_GETDTAPROTOKOLL ) { int iSize =...
- Thu Oct 24, 2013 8:24 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Embedding a 3rd party .dll
- Replies: 34
- Views: 8580
Re: Embedding a 3rd party .dll
Antonio, for only one value your solution works fine. Thank you. But I have to fill the array with all 30 values. Now I tried to use a for loop to retrieve 30 values int k, l; for ( k = 0; k < 30; k++ ) { l = k+1; aStruct.Hinweis[k] = hb_parni( 1, 23, l ); } Compiling and linking are succe...
- Thu Oct 24, 2013 7:13 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Embedding a 3rd party .dll
- Replies: 34
- Views: 8580
Re: Embedding a 3rd party .dll
Antonio,
the sourcecode in line 101 and 132 should retrieve and store the array of integer "Hinweis".
line 101: aStruct.Hinweis = hb_parni( 1, 23 );
line 132: hb_storni( aStruct.Hinweis, -1, 23 );
the sourcecode in line 101 and 132 should retrieve and store the array of integer "Hinweis".
line 101: aStruct.Hinweis = hb_parni( 1, 23 );
line 132: hb_storni( aStruct.Hinweis, -1, 23 );
- Wed Oct 23, 2013 8:43 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Embedding a 3rd party .dll
- Replies: 34
- Views: 8580
Re: Embedding a 3rd party .dll
yes, the same error occurs while compiling function HB_FUN_SEPATOOLS_CONVERTCSVTOXML. But now the right errors Error E2277 SepaGetDTAProtocol.prg 101: Lvalue required in function HB_FUN_SEPATOOLS_GETDTAPROTOKOLL Error E2342 SepaGetDTAProtocol.prg 132: Type mismatch in parameter 'iValue' (wanted 'int...
- Wed Oct 23, 2013 8:24 am
- Forum: FiveWin for Harbour/xHarbour
- Topic: Embedding a 3rd party .dll
- Replies: 34
- Views: 8580
Re: Embedding a 3rd party .dll
Hello, i have still more problems with embedding functions of the .dll. The function int pascal SepaTools_GetDTAProtokoll( XMLReadStruct24 *XMLReadStruct, int Fehler, int *First ); retrieves and stores a struct. The struct typedef struct { char PmInfoId[35+1]; char AusfDatum[8+1]...