这种样式是哪个控件实现的?
解决方案 »
- 如何使Columns[0].Width 的值是一个 相对值, 比如说是 dbgrid宽度的20%.
- 我想学DELPHI,请问有什么好书吗?最好是下载地址,谢谢!
- 能用在运行的程序中创建数据库么?
- 生成的临时控件DISPOSE怎么写啊!
- 在fastreport 中如何实现自动换行?很急!谢谢!
- 如何处理传入的sql字符串参数?
- d6中如何在用SQL语句增加记录时让时间字段的值为空?用null通不过。
- 怎样在ListView或其他控件上增加 3个checkbox
- 还WORD里的标尺控件问题!(高分求就)
- Delphi确实很好,学了好几年了,但在上海差点没有找到工作,很少有招学Delphi的
- 搞编程是否需要翻墙?
- delphi与C++相差的几个技术点,大家是怎么解决的?
发段代码你试试,是基于DBrideh的,其他的应该类似procedure MergeShow(FieldName: string);
var
sl: TStringList;
i: Integer;
begin
sl := TStringList.Create;
try
DelimiteString(sl, FieldName, ';');
for i := 0 to sl.Count - 1 do
begin
dbgrdh1.FieldColumns[sl[i]].HideDuplicates := True;
end;
finally
sl.Free;
end;
end;
//在刷新Grid后加上
MergeShow('字段1;字段2;字段3); //字段1,2,3是需要合并的单元格