有个数据库,里面有张表,表的字段有姓名,性别等.....现在想实现 张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
在一个框里这样显示,只显示姓名,显示10行记录,要是超过10旁边出现scrollbars,双击当中的某个记录弹出新窗口显示双击记录的其他字段。不知可以实现吗?怎样实现?谢谢!
张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
张三 李四
在一个框里这样显示,只显示姓名,显示10行记录,要是超过10旁边出现scrollbars,双击当中的某个记录弹出新窗口显示双击记录的其他字段。不知可以实现吗?怎样实现?谢谢!
解决方案 »
- 如何自动配置ODBC数据源(ACCESS)【不用到控制面板-管理工具-数据源 (ODBC)手动配置数据源】
- 针对开发人员的软件工程平台,寻找合作成员
- 打包后数据库连接的问题,11:00前在线!!
- 帮我解释一下,谢谢!在线等待!
- 我现在在北京,来了好几天了,一直忙着,今天终于有机会上网向大家问好!
- 怎么让程序最小化到托盘,并不停变换图标?
- 有关socket问题,请高手指教
- delphi浏览数据库还是无法显示汉字
- 如何修复SQL数据库,数据库文件损坏!!!Help me!!!!
- 小弟有一事怎么想也想不明白:“Delphi是用Delphi编的”?
- WebBrowser保存为当前页面为mht文件
- delphi中使用ole如何判断excel的行或行中的单元格是隐藏状态
至于:双击当中的某个记录弹出新窗口显示双击记录的其他字段.可以在DblClick事件中写代码,弹出另一个dbgrid或是其他什么控件来显示全部的字段.
procedure TForm1.Button1Click(Sender: TObject);
const
sList: array[1..10] of string = ('张三','李四','王朝 ','马汉','张三','李四','王朝 ','马汉','张三','李四');
var
Index, Row: Integer;
begin
Row := 1;
for Index := 1 to 10 do
begin
if Index mod 2 = 1 then
StringGrid1.Cells[0,Row] := sList[Index]
else
begin
StringGrid1.Cells[1,Row] := sList[Index];
Inc(Row);
end;
end;
end;