为fastreport的memo，赋值的问题(50分)

zgheng · 2002-07-25

在memo得函数中:
begin
memo1.memo := 'pass'
end
可以执行

但下面代码却执行不了，memo1的值确实是ok
begin
if memo1.memo = 'ok' then
memo1.memo := 'pass'
end

pcc_mmz1 · 2002-07-25

if memo1.memo = 'ok' then

改成 if memo1.text = 'ok' then

风中的狼 · 2002-07-25

If
FrReport1.FindObject('Memo1').Memo.Text='OK'
Then
FrReport1.FindObject('Memo1').Memo.Text:='Pass';

zgheng · 2002-07-25

to:风中的狼
你的代码是在delphi的pas中的代码
我已经实现了

只是想在frreport中的memo中的函数中实现，但却不知道代码表达是否有错！为何实现不了

to：pcc_mmz1
memo1没有text属性

晓风月 · 2002-07-25

if memo1.lines = 'ok' then

改成 if memo1.lines = 'ok' then

晓风月 · 2002-07-25

搞错了，应该是把
if memo1.memo = 'ok' then
改成 if memo1.lines = 'ok' then