掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Byte型2次元配列のパラメータの渡し方 (ID：48917)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
すいません。私の方にミスがありました。 typedef struct _CUST_KEYNO{ long count; // ← 見落としておりました... BYTE values[20][6]; } CUST_KEYNO, *LPCUST_KEYNO; あまりスマートではありませんが以下のように修正したら動きました！ 本当に、本当に感謝です。ありがとうございました。 type LPCUST_KEYNO = ^CUST_KEYNO; CUST_KEYNO = record count: LongInt; values: array[0..19,0..5] of AnsiChar; //Byte; end; function GetCustomFile_EX(lpKeyNumber: LPCUST_KEYNO; outResp: LPRESREADCUSTOM): LongInt; stdcall; external 'ABCIF.dll'; procedure TForm1.Button1Click(Sender: TObject); //伝票明細呼び出し var Cust: CUST_KEYNO; pCust: LPCUST_KEYNO; xOutResp: RESREADCUSTOM; Num: AnsiString; rslt: Integer; xFix:Byte; begin Num := '00005'; New(pCust); pCust^.count := 1; AnsiStrings.StrPLCopy(pCust.values[0],AnsiString(Num),5); FillChar(xOutResp,SizeOf(xOutResp),0); rslt := GetCustomFile(pCust, @xOutResp); xFix := xOutResp.readData.byCS; //確認用 Dispose(pCust); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.