大家好,stringgrid 没有获得所选行的行号的方法吗?我向得到所选行的行号. 谢谢大家
解决方案 »
- 懂C程序的请进来帮个忙将个加密函数转成Delphi语言,谢谢!
- C/S结构程序,如果服务器是在互联网的某个网站或是主机上面
- 通过IE发送UDP包要怎么实现?
- 这段时间忙死了,好久没来,放分188,认识我的和不认识我的兄弟都来接分啦!!
- REALmagic控件发布了,要的去下,功能齐全,免费哟!!!
- access中数据插入语句问题
- 如何直接调用sqlServer 执行sql脚本
- 怎样把文本框的预设值为当前的:年+月+日+时+分+秒 的值???
- ?在应用程序中怎么样设置应用程序所使用的字体(字库)路径.在delphi里可以设置memo的字体.但是用的是font目录下的字体.我要让memo控件用当前目录下的某个ttf文件来输文本,分数没问题
- 又有Big Hard Question!!!还得请高手指点三四....
- 用idhttp post数据的问题
- 怪了怪了,请大家帮忙看看,怎么多语言版本添加不料了?
在预览报表时Fastreport总是报"未完义符号CELL1"错误呢?代码如下:procedure TS_Fabric_RanSeDingDan_Main.Fabric_RanseDingDanGetValue(
const ParName: String; var ParValue: Variant);
begin
if AnsiCompareText(ParName, 'Cell1') = 0 then
ParValue := Grid1.Cells[0, BuLei.RecNo]
else if AnsiCompareText(ParName, 'Cell2') = 0 then
ParValue := Grid1.Cells[1, BuLei.RecNo]
else if AnsiCompareText(ParName, 'Cell3') = 0 then
ParValue := Grid1.Cells[2, BuLei.RecNo]
else if AnsiCompareText(ParName, 'Cell4') = 0 then
ParValue := Grid1.Cells[3, BuLei.RecNo]
else if AnsiCompareText(ParName, 'Cell5') = 0 then
ParValue := Grid1.Cells[4, BuLei.RecNo]
end;是不是还有其它地方错误呢?
以前我就是这么用的,运行正常,frvariables['Cell1']:= 可以写在任何一个事件中。
现在我用fastreport3.0 半年前就这么用的。参考一下。
非常感谢tayir82(tayir)
真不好意思,我不知道怎么给分给你哟,有谁能够告我呢?