请问哪有TDBGRID 8.0下载?

gaojunz 2004-03-30 08:49:26
请问哪有TDBGRID 8.0下载?
...全文
120 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
acev 2004-03-30
  • 打赏
  • 举报
回复
http://www.ComponentOne.com/
7.0Pro用得不错。没用过8.0
啊维 2004-03-30
  • 打赏
  • 举报
回复
我也想知道...............
EhLib 8.0 Build 8.0.023 Pro Edition FullSource for D7-XE8 亲测可用,含全部源码及 Demo The Library contains components and classes for Borland Delphi versions 7, 9, Developer Studio 2006, Delphi 2007, Embarcadero RAD Studio 2009-XE8, Lazarus. TABLE OF CONTENTS ----------------- Overview Installation Library Installation Help Demonstration Programs Registering and Prices Other information About author Where to start. ------------------- Read about EhLib for Lazarus in the file - Lazarus\readme.txt Start overview of the library with the main Demo project .\Demos\Bin\MainDemo.Exe. (Compiled Demo files are available in the Evaluation version of the library) Then you can read a summary of the new features and changes in the file history-eng.html. More detail about new features can be found in the file - About EhLib 8 Eng.doc To install a new version of the library in the IDE, use the installation program in .\Installer\EhLibInstaller.exe Overview -------- The Library contains several components and objects. TDBGridEh component TDBGridEh provides all functionality of TDBGrid and adds several new features as follows: Allows to select records, columns and rectangle areas. Special titles that can correspond to several/all columns. Footer that is able to show sum/count/other field values. Automatic column resizing to set grid width equal client width. Ability to change row and title height. Allows automatic broken of a single line long title and data row to a multiline. Title can act as button and, optionally show a sort marker. Automatically sortmarking. Ability to truncate long text with ellipsis. Lookup list can show several fields. Incremental search in lookup fields. Frozen columns. DateTime picker support for TDateField and TDateTimeField. Allows to show bitmaps from TImageList depending on field value. Allows to hide and track horizontal or vertical scrollbars. Allows to hide columns. Allows to show 3D fr
方便quickreport控件自动换行问题 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, Grids, DBGrids; type TForm1 = class(TForm) DBGrid1: TDBGrid; BitBtn1: TBitBtn; btnPrev: TBitBtn; btnPrt: TBitBtn; btnExit: TBitBtn; Memo1: TMemo; procedure btnPrevClick(Sender: TObject); procedure btnPrtClick(Sender: TObject); procedure BitBtn1Click(Sender: TObject); procedure btnExitClick(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation uses Unit2,Unit3; {$R *.dfm} procedure TForm1.btnPrevClick(Sender: TObject); begin //调用QuickReport3模块 if Not Assigned(Form3) then Form3 := TForm3.Create(Application); //预览 Form3.QuickReport3.preview; end; procedure TForm1.btnPrtClick(Sender: TObject); begin //调用QuickReport3模块 if Not Assigned(Form3) then Form3 := TForm3.Create(Application); //打印 //Form3.QuickReport3.PreviewModal; Form3.QuickReport3.PrinterSetup; Form3.QuickReport3.Print; end; procedure TForm1.BitBtn1Click(Sender: TObject); begin with DM.ADOQyp do begin close; sql.Clear; sql.Add(' select BM,MC from zd_yp where bm like ''04443'' '); open; end; //Form3.QRMemo1.Lines.Text:= DM.ADOQyp.FieldValues['MC'].AsString; //Form3.QRMemo1.Lines.Text:= DM.ADOQyp.FieldByName('MC').AsString; //Form3.QRMemo1.Lines.Text:= Memo1.Text; Form3.QRRichText1.Lines.Text := DM.ADOQyp.FieldByName('MC').AsString; end; procedure TForm1.btnExitClick(Sender: TObject); begin close; end; end.

1,453

社区成员

发帖
与我相关
我的任务
社区描述
VB 控件
社区管理员
  • 控件
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧