如题。比如要显示 第2列,第三行的那一格中的字符,怎么办??
解决方案 »
- Delphi 如何定义限定长度的结构
- 在我查詢時,我用query.recordcount求記錄數時,怎麼得出的結果是-1呢。
- 挑战高手:delphi 下API 函数 串口编程 ————在线等待!!!
- 有没有办法在报表(FastReport)中动态载入jpg照片?(在线)
- 我现在想画一个椭圆,我的代码如下,为什么y:=Sqrt((1-(sqr(x) div sqr(a)))*sqr(b));语句有错了,如何修改一下就可以实现画一个椭圆?.
- 求助-——老师不让我过年了!!!!~~
- 如何把CheckBox嵌套在dbgrid的某一列中?
- 我是个初学者,想知道我先要学好哪些问题才能做好这样一个程序:
- 高手是怎样炼成的?
- 请问那位知道Tfilestream和Tmemorystream之间能转换吗?有函数吗?
- 在线等,急!!!关于 DBChart 的问题?
- ^_^高手帮个忙!一个有关媒体拖放的问题!
var
i, j: Integer;
s: string;
begin
if DBGrid1.SelectedRows.Count>0 then
with DBGrid1.DataSource.DataSet do
for i:=0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBook(pointer(DBGrid1.SelectedRows.Items[i]));
for j := 0 to FieldCount-1 do
begin if (j>0) then s:=s+', ';
s:=s+Fields[j].AsString;
end;
Listbox1.Items.Add(s);
s:= '';
end;
end;
button1.Caption := adoquery1.Fieldbyname(dbgrideh1.Columns[2].FieldName).AsString;