文字列を扱うDLLの書き方は？

解決

はると 2004-09-06 05:37:37 No: 10795 IP: [192.*.*.*]

DLL、ならびにPChar初心者です。
EXE側から長い文字列を渡し、編集して返すというDLLを作りたいのですが、
バグらないためのDLL側での作法が分かりません。

(1)DLLの引数、戻り値はどのようにすべきでしょうか？
(2)EXE側で、String型をDLLの引数に渡すにはどうすればよいでしょうか？
(3)DLL側での文字列編集は、元の文字長よりも長い結果を返します。
EXE側へはどのように渡せばよいでしょうか？

DLL丸ごと質問みたいで申し訳ありませんが、Webを探してもなかなかズバリの
例に当たりません。よろしくお願いします。

編集削除

Syake 2004-09-06 18:15:52 No: 10796 IP: [192.*.*.*]

あまり詳しいわけではありませんし、やった事が無いので。

Delphiの開発環境でしか使用しないのなら。
  ShareMemユニットをそれぞれのUses節に追加し、
  BorlandMM.dllファイルを配布する。
すると、String型でも受け渡しOKです。
簡単になるかな。

dll作成やその際のPChar型変換方法などなど、
「Delphi6  プログラミングバイブル」インプレス
に詳しく掲載されています。
後の参考にもなりますので、購入されては・・・

編集削除

にしの 2004-09-06 18:25:23 No: 10797 IP: [192.*.*.*]

引数でPCHAR渡しにします。
呼出では、PCHAR(strBuf)などとすればOKです。

例えば
function FuncTest(InStr: PCHAR; OutStr: PCHAR; Len: Integer): Integer; stdcall;
var
  strBuf: String;
begin
  strBuf := String(InStr); // 引数で渡されたPCHARをStringに変換
  { strBufを加工 }
  if (OutStr <> nil) and (Len > Length(strBuf) then
  begin
    CopyMemory(OutStr, PCHAR(strBuf), Length(strBuf)+1);
  end;
  Result := Length(strBuf)+1;
end;

というようにして、呼出で
l := FuncTest(PCHAR(InStr), nil, 0);
SetLength(OutStr, l - 1);
FuncTest(PCHAR(InStr), PCHAR(OutStr), l);

もしくは、
l := FuncTest(PCHAR(InStr), nil, 0);
OutBuf := SysGetMem(l);
FuncTest(PCHAR(InStr), OutBuf, l);
OutStr := String(OutBuf);
SysFreeMem(OutBuf);
とします。

戻り値の場合は、DLL内部でAllocateし、呼出側で破棄する必要があります。
その場合は、SysGetMem,SysFreeMemでなく、APIで確保する必要があります。
# DLL内部でのメモリマネージャと、呼出側のメモリマネージャが違うため

編集削除

はると 2004-09-06 22:00:37 No: 10798 IP: [192.*.*.*]

ご回答ありがとうございます。
Syake様、今回は勉強のためShareMem非使用にこだわりましたのでごめんなさい。
書籍情報については参考にさせていただきたいと思います。
にしの様、色々と参考になりました。内容は理解できます。
まずはこれを基本に組んでみようと思います。
ただ、編集作業自体が結構大きいため、長さ限定用と実行用に二度呼び出す
というのに少々抵抗があるのですが、最初から十分な量のメモリを確保しておいて、
そこに渡すなんてことはできないでしょうか？
すみません、何分安易なString型以外の分野について知識が薄いもので……。

編集削除

にしの 2004-09-06 22:07:31 No: 10799 IP: [192.*.*.*]

最大文字列長分のバッファを確保しておけば問題ないですよ。

編集削除

はると 2004-09-08 04:04:37 No: 10800 IP: [192.*.*.*]

その後自分なりにも色々と試してみましたが、うまくいきませんでした。
メモリを直接扱うにはまだまだ基礎力不足かなぁ、
などとも感じたりしております。
PChar関連の関数等の一覧がヘルプにありますが、似たのが多くて混乱します。
せっかくご協力いただけたのに申し訳ありません。
厳密には解決ではありませんが、ここは一旦閉じさせていただいて、
PCharを一から勉強し直します。ありがとうございました。

編集削除

はると 2004-09-08 04:05:13 No: 10801 IP: [192.*.*.*]

解決チェック忘れ

編集削除

jok 2004-09-08 04:35:19 No: 10802 IP: [192.*.*.*]

にしのさんのコードは例としてとてもいいものだと思います。
どのようなコードを書いてどのようにうまくいかなかったのかを書かないと
にしのさんの努力が無駄になりそうで残念です。

編集削除

はると 2004-09-08 05:36:42 No: 10803 IP: [192.*.*.*]

これ以上お聞きするのも恐縮に思いました。
にしのさんのコードは、たとえばSysGetMem()とかCopyMemory()とか、
それまで全く知らなかったことをお教えいただき感謝しております。

編集削除