delphi中怎样实现 点击dbgrid的一行改变这行的颜色
我想实现这样的效果，用鼠标单击dbgrid一行，选择一条，颜色变为篮色，在选择一条这条变为篮色，上面选的也还是篮色...
我想实现这样的效果，用鼠标单击dbgrid一行，选择一条，颜色变为篮色，在选择一条这条变为篮色，上面选的也还是蓝色...
这时dbgrid上应该有2条是蓝色的
定义一个数组(存行号),在stringgrid的onselectcell事件里面,读取AROW存到数组里.
然后在DrawColumnCell事件里做个循环读取数组画蓝色就行了
如果仅仅2行的话，对应组件Options属性里面设置就可以满足你地需求了，假如要所有点击的行都选中的话，就要重画了。
我需要在dbgrid里面实现
可以贴出相关代码么？
谢谢...
Delphi(Pascal) code:
//....
var
Form1: TForm1;
RowSel: Array of String;
//....
procedure TForm1.FormCreate(Sender: TObject);
begin
setlength(RowSel,0);
end;
procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
SetLength(RowSel,length(RowSel)+1);
RowSel[high(RowSel)]:= ADOQuery1.FieldByName('表里唯一的列').AsString; //即值不会重复
end;
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
var
i: integer;
b
相关问答：
我安装的是企业版。。。
我问下， CTRL+左键 能查看 windows.pas 吗？
就是 接口里的windows。
当然可以,CTRL+左键点击Interface部分的Windows就可以了
啥啥企业版？去安装目录看看lib文件夹下有没� ......
就是一个服务端和一个客户端，里边有一些共用单元 ，我在 工程的SEARCH PATH里设置的路径，
里边有个结构体，我在服务端打开，加了成员，但是我在客户端其他单元访问不到我新加的，我在客户端打开那个单元，确实加� ......
接收到的文本内容是ucs2编码格式，请问怎样转换成中文
按我的理解，UCS-2是字符集，具体的编码有UTF-8，UTF-16 (LE/BE)等。
如果你用Delphi 2009及以上版本，可以看看TEncoding类。
btw. 你说的转换成中文是啥意� ......
各位高手赶快帮帮忙。
现在有一个delphi写的dll，函数中有PInteger的返回参数，在delphi中可以正常调用，但是我在vb里写的时候就不知道该怎么来调用了。
请看代码
以下是delphi中的函数定义和调用代码，能正常运� ......
如题， 点击Delphi的File菜单的Exit退出Delphi， Delphi部分关闭--即不能再操作Delphi，但任务栏和进程里，Delphi还在运行，没有真正的退出。是不是安装了jre改变了某些环境变量导致，请问高手如何解决？ 注：没安装 ......
