随笔分类 - DELPHI
摘要：在DELPHI中经常用到网格控件（DBGrid）显示数据，网格控件只提供了每一行的颜色属性，但在实际应用中我们经常希望它按某一行某一项的取值不同显示不同的颜色，甚至在网格中的单位表格项中显示出图像等等，下面我们以一个简单的例子来告诉大家怎么做。 比如我们要求如果春季有退书用红色表示，如果秋季有退书用黄色表示 利用DBGrid自绘功能可以很容易地实现这样的要求。用户可以处理DBGrid...
阅读全文
摘要：http://delphi.about.com/od/usedbvcl/l/aa081903a.htm
阅读全文
摘要：If you are developing database applications with tables containing MEMO fields, you'll notice that, by default, the TDBGrid component does not show the contents of a MEMO field inside a DBGrid cell. T...
阅读全文
摘要：Adjusting DBGrid column widths automatically Here's a handy method to automatically fix the size of TDBGrid columns (at run-time) to fit the DBGrid width (remove the unfilled space at the right edge o...
阅读全文
摘要：The TListBox Delphi component displays a collection of items in a scrollable list. Delphi makes it easy to program dragging and dropping into your applications. Here's how to allow a user to rearrange...
阅读全文
摘要：Enhancing the TDBNavigator component with modified graphics (glyphs), custom button captions, and more. Exposing the OnMouseUp/Down event for every button. "Ok, the DBNavigator does its job of navigat...
阅读全文
摘要：你想把DbNagvator图片去掉换成文字 可以这样1. form1摆一个DBNavigator12\定义typeTMyNavgator = class(TDBNavigator);3.FormCreat时候//去掉图片TMyNavgator(DBNavigator1).Buttons[nbFirst].Glyph.Assign(nil);//汉字TMyNavgator(DBNavigator1)...
阅读全文
摘要：在DBNavigator中BeforAction事件中写如下代码 procedure TForm1.DBNavigator1BeforeAction(Sender: TObject; Button: TNavigateBtn); begin if Button=nbDelete then begin if MessageBox(Handle,'确实要删除么？','系统提示',MB_YE...
阅读全文
摘要：type TMyNavgator = class(TDBNavigator); TMyNavgator(DBNavigator1).Buttons[nbFirst].Visible := false; 具体是那个按钮, 你修改对应的 nbFirst 就可!!
阅读全文
摘要：DBGRID.columns[0].title.captioin:='NEW TITLE';
阅读全文
摘要：打开电脑，进入Windows操作系统，在资源管理器的左边栏中清楚地显示了系统管理的任何磁盘的信息连同各个磁盘所容纳的文档和文档夹(如图一)。这种常见的显示方式是由一个根节点和若干个子节点构成的，这被称为“树形结构”。这种树形结构的用途很广泛，在很多常用软件中都出现过他的身影。Windows中将这种结构封装为“树形控件”，即TreeView控件，他和ListView、Button等相同都属于系统自...
阅读全文
摘要：先说明一点，本事例单击是在listview的每一次第一列出一个下拉列表框，要在其他列出现，可能要用GetCursorPos(pos);来确置了，你自己完善吧，哈哈！ unit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, ...
阅读全文
摘要：//增加项或列(字段) ListView1.Clear;ListView1.Columns.Clear;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Items[0].Caption:='id';ListView1.Columns.Items[1].Caption:='typ...
阅读全文
摘要：DbGrid的OnDrawColumnCell事件 如你现在有一个ADOTable1,一个DbGrid1,假如你数据库里面的列名分别是(序号,名字,年龄),你要将年龄为23的格填充背景色为黑色,字体颜色改为白色,代码如下: procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: I...
阅读全文
摘要：//关联tabset+nodebook procedure TForm1.FormCreate(Sender: TObject); begin ts1.Tabs := nb1.Pages; end; //tabset对nodebook进行切换 procedure TForm1.ts1Click(Sender: TObject); begin nb1.PageIndex := ts1.Tab...
阅读全文
摘要：procedure TForm1.FormCreate(Sender: TObject); begin LinkLabel1.Caption := '万一的 Delphi 博客'; end; procedure TForm1.LinkLabel1LinkClick(Sender: TObject; Link: string; LinkType: TSysLinkType); begin ...
阅读全文
摘要：FlashWindow(self.Handle,self.CheckBox1.Checked);
阅读全文
摘要：procedure TForm1.TrackBar1Change(Sender: TObject); begin self.AlphaBlendValue:=self.TrackBar1.Max-self.TrackBar1.Position; end; procedure TForm1.FormCreate(Sender: TObject); begin self.AlphaBlend:...
阅读全文
摘要：PowerDesigner简介 PowerDesigner是Sybase公司的CASE工具集，使用它可以方便地对管理信息系统进行分析设计，它几乎包括了数据库模型设计的全过程。利用PowerDesigner可以制作数据流程图、概念数据模型、物理数据模型，可以生成多种客户端开发工具的应用程序，还可为数据仓库制作结构模型，也能对团队设计模型进行控制。它可与许多流行的数据库设计软件，例如：Power...
阅读全文
摘要：这是以前写的代码，自绘XP风格的菜单，硬盘坏了后以为没了，最后写的一个软件要自定义风格，“翻箱倒柜”的终于在我可爱的古董机^_^上找到了一个应用的例子。还是把它放到Blog上来，即可共享又可作为备用 :) 把主菜单的OnMeasureItem指向MeasureMainItem、OnAdvancedDrawItem指向DrawMainItem，子菜单的OnMeasureItem指向Meas...
阅读全文
浙公网安备 33010602011771号