自己的网站怎么做隐藏内容口碑营销的案例

 unidbgrid表格的，select，编辑，keydown等事件

如表格的下箭头，整形会自动减少，可以用此过程处理，但还不完美

unit Main;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics,Controls, Forms, uniGUITypes, uniGUIAbstractClasses,uniGUIClasses, uniGUIRegClasses, uniGUIForm, uniGUIBaseClasses, uniBasicGrid,uniDBGrid, Data.DB, Data.Win.ADODB, uniButton, uniMemo;typeTMainForm = class(TUniForm)UniDBGrid1: TUniDBGrid;ADOConnection1: TADOConnection;DataSource1: TDataSource;UniButton1: TUniButton;ADOQuery1: TADOQuery;UniMemo1: TUniMemo;procedure UniButton1Click(Sender: TObject);