>>370
usesに jpeg を書き加えて
TImage.LoadFromFile(ファイル名)でOK