https://www.petitmonte.com/bbs/answers?question_id=1623
なんかを見ると、
ファイル名を fn : PChar で受け取って開いてみるみたいなのですが、何故か私がやると読み込めません。これと同じソースではないのですが、
function Load_JPEGFile(FileName : PChar):integer; stdcall;
var
JPG : TJpegImage;
begin
JPG := TJpegImage.Create;
try
JPG.LoadFromFile(FileName);
・
・
・
で、呼び出し側からは、、、(ちゃんと関数は宣言してあります)
if OpenDialog1.Execute then
begin
Load_JPEGFile(PChar(OpenDialog1.FileName));
end;
としています。すると、ダイアログで ファイル:L・は読み込めません と表示されます。何がいけないのでしょうか。全く分かりません。
どうか、宜しくお願いします。
すいません。勝手に自己解決です。宣言がちょっと抜けてました。
ツイート | ![]() |