关于Delphi TClientDataSet的
例:给TClientDataSet1绑定数据后,字段state值为1、2、3
需在DBGrid1中对应显示为
1:我很好
2:我非常好
3:我非常非常好
做法:
if (TClientDataSet1.FieldCount>0) and (TClientDataSet1.RecordCount>0) then
begin
with TClientDataSet1 do
begin
First;
while not Eof do
begin
Edit;
if FieldByName('state').AsString='1' then FieldByName('state').AsString:='我很好';
if FieldByName('state').AsString='2' then FieldByName('state').AsString:='我非常好';
if FieldByName('state').AsString='3' then FieldByName('state').AsString:='我非常非常好';
Next;
end;
First;
end;
end;
结果:
显示结果
state=3的显示成了“我非常非”
这是为什么?有什么解决办法
state 这个字段的长度不够,设大些
长度问题,检查字段本身长度
为什么要这样做,双击你的TClientDataSet,加入字段,选择state字段,在它的OnGetText事件里处理
相关问答:
VC++ 中, &变量名。 是什么意思。 Delphi中 和他一样的符号 是哪个、?
大家都认为,C语言之所以强大,以及其自由性,很大部分体现在其灵活的指针运用上。因此,说指针是C语言的灵魂,一点都不为过。同时, ......
请问Delphi有树形控件吗?
怎样使用?
Ttreeview
treeview.items.addchild(nil(上级节点),'案发时发'(text));
raize 控件包里面有,csdn有下载的
查帮助TTreeView和TNode两个类
TTreeView ......
VC 控制台程序:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
急用。联系QQ:8775262,谢谢。
需要进行DllImport的地方直接写DLLImport.方法名。
如:DLLImport.GlobalAddAtom(……);
文件:UShare.pas
Delphi(Pascal) code:
unit UShare;
interface
uses Windows, Me ......
请教一个问题,现在有一项目需要绘制曲线图,
要求:(可以任意选择横坐标(时间)范围画出对应的数据曲线,纵坐标自动优化设置(也可手工选择),可以在任意时间段内放大、缩小图形,某具体数据点的定位及此数据点的 ......