with TfrView(View) do
begin
s:=TfrView(View).Memo.Text;
SetLength(s,Length(s)-2);
frReport1.Modified:=True;
TfrView(View).Memo.Text:=InputBox(' 请输入新内容 :','输入新内容:',s);
end;
我是这样写的,点击后写入新值,可是预览还是显示旧值,
请高手指点,如何才能修改值。
begin
s:=TfrView(View).Memo.Text;
SetLength(s,Length(s)-2);
frReport1.Modified:=True;
TfrView(View).Memo.Text:=InputBox(' 请输入新内容 :','输入新内容:',s);
end;
我是这样写的,点击后写入新值,可是预览还是显示旧值,
请高手指点,如何才能修改值。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货