我从Ms-Sql数据库中提取数据。但在将它们打印到我的报告之前,我想检查组件frMaster的长度。“column1”和frMaster。“column2”。我怎样才能做到这一点? Column1和Column2是字符串。如果我的字符串长度超过10个字符,我的备忘录必须增加它们的高度,如果不是,它们保持不变。此代码无效,备忘录保持不变。我试图做这样的事情,但它在打印事件之前不起作用:
if (Length(<frMaster."column1">) > 10) or (Length(<frMaster."column2">) > 10)
then
begin
Memo34.Height:= 0.7;
Memo33.Height:= Memo33.Height + 0.35;
Memo20.Top := Memo20.Top + 0.35;
Memo21.Top := Memo21.Top + 0.35;
Memo35.Top := Memo35.Top + 0.35;
Memo36.Top := Memo36.Top + 0.35;
Memo22.Top := Memo22.Top + 0.35;
Memo39.Top := Memo39.Top + 0.35;
end;
答案 0 :(得分:0)
您可以使用数据树中可用的长度函数或作为要包含在代码中的函数:
您可以通过覆盖备忘录的事件处理程序来使用它,就像在Delphi中一样:
唉!原来如此。你使用它,它没有用。对!好像我之前已经发生了这种情况。我想我可能做了类似的事情,让备忘录只打印文本,然后可能是文本的长度,然后可能将事件移动到数据带,然后可能确保数据带的属性Stretched设置为True并制作确保备忘录的属性StretchMode设置为smActualHeight或smMaxHeight。