>>689
実行はできるのですがコマンドボタンを押すとソースファイルが見つかりませんと聞いてきます。
>>690
>Image1.Picture.Assign(Jpeg)
この行で'.' が必要な場所に ')' がありますとエラーがでます。
>>691
やはりソースファイルが見つかりませんと聞いてきます。

無料のDelphi6ではＪＰＥＧは扱えないのでしょうか