<!--CodeS-->
SQL.BeginUpdate;
SQL.Text := 'INSERT INTO CATDTBL VALUES( ''aaa'', ''bbb'', ''ccc'', :CARD_IMAGE )';
if sTableName = 'cardtbl' then
begin
try
msCardImage := TMemoryStream.Create;
SelectImage.Picture.Graphic.SaveToStream( msCardImage );
msCardImage.Position := 0;
Parameters.ParamByName('CARD_IMAGE').LoadFromStream( msCardImage, ftBlob );
finally
msCardImage.Free;
SelectImage.Free;
end;
end;
SQL.EndUpdate;
<!--CodeE-->
에서 ParamByName에서 CARD_IMAGE를 찾을수 없다고 나옵니다...
어디가 문제인지 확인부탁드립니다.
참고로 MDB에 저장합니다.