|
ｿｽ@ｿｽｿｽDLLｿｽｿｽｿｽﾅ画像ｿｽｿｽJｿｽｿｽｿｽﾉは？
|
ｿｽgｿｽbｿｽvｿｽyｿｽ[ｿｽWｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽEpapy's softwarelibrary
ｿｽyｿｽFｿｽ[ｿｽW 2005/03/16(ｿｽｿｽ) 21:12:31
http://hpcgi1.nifty.com/MADIA/DelphiBBS/wwwlng.cgi?print+200404/04040079.txt
ｿｽﾈんかゑｿｽｿｽｿｽｿｽﾆ、
ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽｿｽｿｽｿｽ fn : PChar ｿｽﾅ受け趣ｿｽｿｽｿｽﾄ開ｿｽｿｽｿｽﾄみゑｿｽﾝゑｿｽｿｽｿｽｿｽﾈのでゑｿｽｿｽｿｽｿｽAｿｽｿｽｿｽﾌゑｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ読み搾ｿｽｿｽﾟまゑｿｽｿｽｿｽBｿｽｿｽｿｽｿｽﾆ難ｿｽｿｽｿｽｿｽ¥ｿｽ[ｿｽXｿｽﾅはなゑｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
function Load_JPEGFile(FileName : PChar):integer; stdcall;
var
JPG : TJpegImage;
begin
JPG := TJpegImage.Create;
try
JPG.LoadFromFile(FileName);
ｿｽE
ｿｽE
ｿｽE
ｿｽﾅ、ｿｽﾄび出ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾍ、ｿｽAｿｽAｿｽiｿｽｿｽｿｽｿｽｿｽﾆ関撰ｿｽｿｽﾍ宣言ｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾜゑｿｽｿｽj
if OpenDialog1.Execute then
begin
Load_JPEGFile(PChar(OpenDialog1.FileName));
end;
ｿｽﾆゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽBｿｽｿｽｿｽｿｽﾆ、ｿｽ_ｿｽCｿｽAｿｽｿｽｿｽOｿｽﾅ ｿｽtｿｽ@ｿｽCｿｽｿｽｿｽFLｿｽEｿｽﾍ読み搾ｿｽｿｽﾟまゑｿｽｿｽｿｽ@ｿｽﾆ表ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽBｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾈゑｿｽｿｽﾌでゑｿｽｿｽ蛯､ｿｽｿｽｿｽBｿｽSｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽﾇゑｿｽｿｽｿｽｿｽAｿｽXｿｽｿｽｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽyｿｽFｿｽ[ｿｽW 2005/03/17(ｿｽｿｽ) 00:04:52
ｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽBｿｽｿｽｿｽｿｽﾉ趣ｿｽｿｽﾈ会ｿｽｿｽｿｽﾅゑｿｽｿｽBｿｽ骭ｾｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾆ費ｿｽｿｽｿｽｿｽﾄまゑｿｽｿｽｿｽｿｽB
