Help Script object ...

if meet this case



procedure tform1.frreport1beforeprint(memo: tstringlist; view: tfrview);
var nMemo1 : tfrmemoview;
begin
nmemo1 := frreport1.findobject('memo1') as tfrmemoview;
if view.name = 'Picture1' then
tfrpictureview(view).picture.loadfromfile('c:\test'+nmemo1.memo.text+'.bmp');

end;


i want to view my picture that file name combine with my data field value in freport memo1, but that error show = 'cannot open file "c:\test[query1."ID"].bmp" '

what's wrong? can somebody help me/

thanks

Comments

  • edited 3:03AM
    Maybe memo object be positioned below Picture object ?

Leave a Comment