城市路灯智能监控管理系统源码-课程设计

《城市路灯智能监控管理系统源码-课程设计》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、城市路灯智能监控管理系统源码-课程设计城市路灯智能监控管理系统源码unitUnitSuperUser;interfaceuses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,ExtCtrls,RzPanel,ComCtrls,RzListVw,Buttons;type TFormSuperUser=class(TForm)   ToolBar1:TRzToolbar;   ListView1

2、:TRzListView;   btn1:TSpeedButton;   procedurebtn1Click(Sender:TObject); private   {Privatedeclarations} public   {Publicdeclarations} end;var FormSuperUser:TFormSuperUser;implementationusesUnitData;{$R*.dfm}procedureTFormSuperUser.btn1Click(Sender:TO

3、bject);var i:Integer; n:TListItem;begin ListView1.Clear; forI:=0tosoList.Count-1do begin   n:=ListView1.Items.Add;   n.Caption:=soList.Items[i].SiteName;   n.SubItems.Add(IntToStr(soList.Items[i].SiteID));   n.SubItems.Add(IntToStr(soList.Items[i].Sit

4、eAddress));   n.SubItems.Add(IntToStr(soList.Items[i].NodeAbsoluteIndex));   n.SubItems.Add(IntToStr(soList.Items[i].Icon.Position.X));   n.SubItems.Add(IntToStr(soList.Items[i].Icon.Position.Y));objectFormSuperUser:TFormSuperUser Left=0 Top=0 Caption

5、=#36229#32423#29992#25143#19987#29992#31383#21475#65292#38386#20154#21247#36827#12290#36827#26469#20320#20063#30475#19981#25026#12290 ClientHeight=300 ClientWidth=635 Color=clBtnFace Font.Charset=DEFAULT_CHARSET Font.Color=clWindowText Font.Height=-11

6、 Font.Name='Tahoma' Font.Style=[] OldCreateOrder=False PixelsPerInch=96 TextHeight=13 objectToolBar1:TRzToolbar   Left=0   Top=0   Width=635   Height=25   AutoSize=True   BorderInner=fsNone   BorderOuter=fsGroove   BorderSides=[sdTop]   BorderWidth=0 

7、  Caption=#21047#26032   TabOrder=0   ToolbarControls=(     btn1)   objectbtn1:TSpeedButton     Left=4     Top=2     Width=33     Height=23     Caption=#21047#26032     OnClick=btn1Click   end end objectListView1:TRzListView   Left=0   Top=25   Width=

8、635   Height=275   Align=alClient   Columns=<     item       Caption=#32456#31471#21517#31216       Width=60     end     item       Caption=#32456#31471'ID'     end     item       Alignment=taRightJustify       Caption=原文请找;#32456#31471#22320#