?? ctrls6.pas
字號(hào):
unit ctrls6;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
Dialogs, ImgList, ComCtrls, te_controls, ksthemestdcontrol, ksthemeforms;
type
TfrmCtrls6 = class(TForm)
TeThemeForm1: TTeThemeForm;
TeThemeSTreeView1: TTeThemeSTreeView;
TeThemeSListView1: TTeThemeSListView;
ImageList1: TImageList;
ImageList2: TImageList;
ReportList: TTeThemeSListView;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
frmCtrls6: TfrmCtrls6;
implementation
uses main;
{$R *.dfm}
procedure TfrmCtrls6.FormCreate(Sender: TObject);
var
Item: TListItem;
i: integer;
begin
ReportList.Items.Clear;
for i := 0 to 500 do
begin
Item := ReportList.Items.Add;
Item.Caption := 'list item #' + IntToStr(i);
Item.SubItems.CommaText := 'first subitems,second subitem';
end;
end;
end.
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -