返信

> 64bit版 も作成してみました。 > コンポーネントのインストールに手間取りましたが、何とか開発環境ができました。 > > 動作確認していて、32bit版では OK でしたが、64bit版では正常に動作しない箇所がありました。 > > Editor_LineFromChar の カーソル位置を渡す変数ですが、Cardinal になっていました。 > > Cardinal は 負の数値は受け付けないはずですが、32bit版では正常な数値が取得できました。 > 64bit版では最終行が取得されるので調査していたら、負の数が指定できない事が判りました。 > > とりあえず、以下の変更を行い、正常になりました。 > > ■ 32bit版 変更前 > 「mPlugin.pas」 > function Editor_LineFromChar(hwnd: THandle; nLogical: Integer; nSerialIndex: Cardinal): Cardinal; > > 「MeryCsvList.pas」 > IntEditorRow := Editor_LineFromChar(Application.Handle, 1, UINT(-1)); // 0 ベース > > ■ 32bit版 変更後 と 64bit版 > 「mPlugin.pas」 > function Editor_LineFromChar(hwnd: THandle; nLogical: Integer; nSerialIndex: Integer): Cardinal; > > 「MeryCsvList.pas」 > IntEditorRow := Editor_LineFromChar(Application.Handle, 1, Int64(-1)); // 0 ベース > > よろしくお願いします。

マークダウンを有効にする