submitunit.dfm

联通短信平台,1,3版稳定版400条/s

object MainForm: TMainForm
  Left = 317
  Top = 136
  Width = 660
  Height = 486
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object InfoMemo: TMemo
    Left = 0
    Top = 29
    Width = 652
    Height = 411
    Align = alClient
    Color = clWhite
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#24565#38738#20116#31508' 2.00'
    ParentFont = False
    ScrollBars = ssBoth
    TabOrder = 0
    OnChange = InfoMemoChange
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 652
    Height = 29
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object Button_Start: TSpeedButton
      Left = 13
      Top = 3
      Width = 64
      Height = 24
      Caption = #21551#21160
      Flat = True
      Glyph.Data = {
        9A030000424D9A030000000000009A0200002800000010000000100000000100
        08000000000000010000120B0000120B0000990000009900000000000000FFFF
        FF00FF00FF000457080004680B0004670B0004570900056A0C00066F0E000871
        100004680C0004670C0008AB170008AB180009B8190009B81A0009B71A0008A6
        160008A6170008A6180008A5160008A51700078D120009B1180009B018000AB2
        19000AA71800097A14000A7A14000B7C150009BE1C000AB31C000BB81D000CB2
        1F000DB320000DA81F000D851A00108F1F000DBA23000EB424000EA9220010BA
        270011AB270014A42800139C260030BD440010B4290013B52D0015BD3100129A
        28004EC9620014BB310014AE2F0015AF32001ABE3A007CD78D0018B93A001BBE
        3E001BBA3D001AB03A001BB23C001AAF3900A8E4B400D3F1D900F1FBF3001BAD
        3C001EC045001FBB460020B4450022BB480021B5480023B74A0022B5480025B7
        4A0037BC5A0038BB5A004CC36B0051C56F0053C57100AAE5B90020B5480023C0
        4E0021B5490023BC4E0023B54B0029BF53002EB9530042C0640051C5700025C5
        540024BE510027BF55002BBF570027BB57002AC25D002CBF5D002BC160002BBF
        5E0031C4640035C3670079D899002DC1630030C3680034C5690034C46B00F3FB
        F60030C56A0032C36B0032C36C0036C56E0036C5700037C56E0039C570003BC7
        72003FC8760042C8760043C8770044C9780046C97A0048CA7A004ECC7F004FCD
        820050CC800052CC810057CE850059CF87005BD088005DD08A005ED08A0065D2
        8F0067D391006FD5970078D79D0080DAA30086DBA7008ADEAC0091DFAF0095E0
        B3009BE3B8009DE3B900A6E5BF00AEE8C50034C873003BC7740058D08A006AD5
        960077D89F0087DDAA0092E0B300A9E6C200AEE8C600B1E9C800DDF5E7000202
        020202020202020202020202020202021D1B0907050B0B0B0B0B0B0602020231
        3B352A231314141212150D16030202415942363029200E0F0F101E0C0B020244
        6255453A3F2D2219171810120A02024872635C53014032271F170F120B020246
        9076675F010101372E2110110B020246927B7168010101013E2F261A04020246
        877F736F010101014F3833280802024689817771010101645A4339341C020246
        8B837C7801697E66605B513C240202469585807D987A74706B655E5025020252
        8D8C888684827D756D6C6A5D2C020248949697958A9391798F6E8E612B020202
        4B584E4D4C574A564954473D020202020202020202020202020202020202}
      OnClick = Button_StartClick
    end
    object Button_Shut: TSpeedButton
      Left = 79
      Top = 3
      Width = 64
      Height = 24
      Caption = #20851#38381
      Flat = True
      Glyph.Data = {
        B6020000424DB602000000000000B60100002800000010000000100000000100
        08000000000000010000120B0000120B0000600000006000000000000000FFFF
        FF00FF00FF00C1E0FF008AC1FF0088BDF8008EC4FF008FC4FF0088BAEF0093C7
        FF00C2E0FF00C1DEFE00C4E1FF00C1DEFC00C1DCF800C9E3FF00EEF6FF00328E
        FF003590FF003791FF003D95FF00469AFF0050A0FF0056A4FF005AA6FF005CA7
        FF0065ACFF0067ADFF0069AFFF0072B4FF0074B5FF007FBBFF0081BCFF000F75
        FF001176FF001277FF001377FF001378FF001579FF00187BFF00197DFF001B7E
        FF001E80FF001F81FF002484FF002686FF002988FF002B89FF000167FF000268
        FF000369FF00056BFF00066CFF000667F2000665EA00086EFF00096FFF000A70
        FF000C72FF000D73FF000064FF000062F8000060F600005FF300005EF000005D
        EE00005CEB00005BE900005AE6000059E3000058E1000057DE000056DC000055
        D9000054D7000053D4000052D1000051CF000050CC00004FCA00004EC700004D
        C500004CC200004BC0000044AF000041A5000040A300003A9500003992000035
        87000033820000317E0000307B00002F790000296A000166FF00020202020202
        0202020202020202020202025758595B5D5D5D5D5D5D5D5E0202025346494C50
        53535353535351555E020247313D4042464A4A4A4A4A48515D02024134303E41
        44484A4C4D4E4A535C020240213731010D364608014D4A535D0202402D26370A
        010D05010E4B4A535D020240152B3B220A01010D364748525C020240192E2339
        0601010B3543444F5A0202401C112709010C0C01033F404A570202401E142C10
        0F26240C015F3C455602024020162F2D2925233A3432314154020240041F1A17
        15122D253834343C530202401B0407201D18132A3B3839314E02020233282928
        263B335F3E403F47020202020202020202020202020202020202}
      OnClick = Button_ShutClick
    end
    object SpeedButton3: TSpeedButton
      Left = 145
      Top = 3
      Width = 64
      Height = 24
      Caption = #37197#32622
      Flat = True
      Glyph.Data = {
        DE020000424DDE02000000000000DE0100002800000010000000100000000100
        08000000000000010000120B0000120B00006A0000006A00000000000000FFFF
        FF00FF00FF00993300009F3900009D3700009D4E2200A6400000A94608009F45
        1000AD480200B04D0800AC4A0A00AE4C0B00B55D2200A0521F00835B3F006E4C
        3500B34D0000B3510B00B2510B007D4D2B00BA580B00B2590D00C66D2200BC66
        2000C56C2200BF6722009F6230009E62300083573400CC721E00D28844009268
        4400E6B48300A2794E00ECC08F00ECC19300DF7E0D00EC932000EC9E3C00F2B0
        5900F9D7AA00FFAC3000F9AE4400F9B75A00FF9F0E00FFA11300FFA51D00FFB3
        4000FFB54400FFC16300FFC26500FFC66F00FFCC7E00FFCF8500FFDCA700FFDF
        AD00FFE2B5007AFEFF0097FEFF009BFBFC00A8FFFF00A9FFFF00ADFFFF00AEFF
        FF00B4FFFF00C7FFFF00D3FFFF00E4FFFF00F4FFFF00FCFFFF0072F9FE008CFB
        FE0091FCFE00A0FCFE00B3FCFE006FF8FF0082F8FF0059EAFE00B6F6FF00E6EE
        EF0049D5EE00BAEEF60023D7FE004AC5DD006FE6FF0072DBEF008DE7FA00C6F5
        FF00E3FAFF00F1FBFD0036D9FE0030BCDD00357C8E0063DAF50011A7D20049C1
        E300129FCB0020A2CB00089DCF00078DBB000DA2D4000C92C0000E80AA001385
        AF00020202020202020202020303030202020202026868686811150A0C2D2003
        030202026552545C56090B2F3031333703020265494F545C570F083226131834
        03020265494F545C1D0D22361E03042829030265494F545C1C14253910050727
        2C0302654C50595A5119163A240E1F2E03020265535D606263171A3A3A38352B
        03020265554F545C562321061B2A030303020265494F545C5658615E12030202
        02020265494F545C565861646802020202020265494F545C5658616468020202
        020202654A4E4D3B3C4B5F6668020202020202654746444240403F4868020202
        02020202675B4543413E3D690202020202020202026565656565650202020202
        0202}
      OnClick = SpeedButton3Click
    end
    object SpeedButton4: TSpeedButton
      Left = 221
      Top = 3
      Width = 64
      Height = 24
      Caption = #20851#20110
      Flat = True
      Glyph.Data = {
        7E030000424D7E030000000000007E0200002800000010000000100000000100
        08000000000000010000120B0000120B0000920000009200000000000000FFFF
        FF00F4F3F700E3E2E5006F6B720095939600A09EA100B8B2BA00766F7800908B
        9100B5ADB600B4ADB500FF00FF006D676D006F6A6F00D3CBD300D3CCD300BDB7
        BD00B5AFB500D9D3D900CFC9CF0088848800CBC6CB00D8D3D800C1BDC1008482
        840082808200DCDADC00777677005C5B5C00908F9000C5BDC400E1DAE000F4EF
        F300514D4F00828181008B360D0093400D009A5F3A00935D3D00D75F0200CB5C
        0600E1751600FF820A00FF8A1800FA8A1800FF8A1B00FF8E2100FE912300E184
        2600FF962E00FF993300FFA34500FFB05F00FFC08000C1752100FFAF5B00864B
        0700ED871000D4870D00D3A13E00A5750100BC992D008A7B01008F8106009A9C
        2D009DAA5600637F010098B45500547F04005C890E006B9822003E7E01002D62
        030051981F002864050091C97000235D040046961C0067AD4000537F3B001F6E
        000065B54B0075CB68004192380048744400487D47000074000039B1390067CE
        660091E691001487160046AF47000276060074D9780049724B00A4F3A7005572
        56000D99160023AB2D0062D16A0068D36E0084E58C001BAC2D00205026003D57
        41004C4F4F00575959007B7D7D009FA1A1008E9090007E808000787979006D6E
        6E00696A6A00484A4B00464849004E5051005C5E5F00545657006A6C6D006365
        6600606263003334350038393A007D7E7F0075767700494A4C004D4E50007F80
        8200F3F4F600797A7D00828386007A7A7D00939396007070720068686A009F9F
        A000909090008C8C8C00868686007A7A7A00767676006E6E6E006B6B6B006363
        63000C0C0C0C0C0C0C0C0C0C2627500C0C0C0C0C0C7F806A0C0C312A29495D5B
        540C0C0C7377880E7C372C3B404551574D0C0C731977046169303E4E3C323A3D
        392473091F77085F68344F523638332B2825730F12777E0D223553654C44412D
        3F4B73140B7785721D42666064674A2F430C73100A777D908F555E5A5963472E
        480C7313077781906C91565C5862460C0C0C7320117784718C8D8E7B0C0C0C0C
        0C0C7321167783878B238A740C0C0C0C0C0C731B05776D6B761C1E730C0C0C0C
        0C0C73891B86706F6E797A730C0C0C0C0C0C730182031806151A1A750C0C0C0C
        0C0C7873010102170673730C0C0C0C0C0C0C0C0C73737373730C0C0C0C0C0C0C
        0C0C}
      OnClick = SpeedButton4Click
    end
    object Panel_Line: TPanel
      Left = 6
      Top = 4
      Width = 3
      Height = 21
      TabOrder = 0
    end
  end
  object MainStatusBar: TStatusBar
    Left = 0
    Top = 440
    Width = 652
    Height = 19
    Panels = <
      item
        Text = #25968#25454#24211#65306' '#26410#36830#25509
        Width = 150
      end
      item
        Text = #32593#32476#65306#26410#36830#25509
        Width = 150
      end
      item
        Text = #21457#36865#30701#20449#25968' 0 '#26465
        Width = 150
      end
      item
        Text = #20986#38169#30701#20449#25968' 0 '#26465
        Width = 50
      end>
  end
  object ADOConn: TADOConnection
    LoginPrompt = False
    Provider = 'OraOLEDB.Oracle.1'
    AfterConnect = ADOConnAfterConnect
    BeforeConnect = ADOConnBeforeConnect
    AfterDisconnect = ADOConnAfterDisconnect
    BeforeDisconnect = ADOConnBeforeDisconnect
    Left = 112
    Top = 160
  end
  object SGIPSocket: TClientSocket
    Active = False
    ClientType = ctBlocking
    Port = 8001
    OnConnecting = SGIPSocketConnecting
    OnConnect = SGIPSocketConnect
    OnDisconnect = SGIPSocketDisconnect
    OnError = SGIPSocketError
    Left = 144
    Top = 160
  end
  object LoopTimer: TTimer
    Enabled = False
    OnTimer = LoopTimerTimer
    Left = 176
    Top = 160
  end
  object ApplicationEvents_X: TApplicationEvents
    OnException = ApplicationEvents_XException
    Left = 240
    Top = 160
  end
  object StoredProc: TADOStoredProc
    Connection = ADOConn
    ProcedureName = 'SGIP12_SGIP_SUBMIT_HISTORY.SGIP12_SGIP_SUBMIT_HISTORY'
    Parameters = <
      item
        Name = 'MSGID'
        DataType = ftVariant
        Size = 30
        Value = Null
      end
      item
        Name = 'SubmitID'
        DataType = ftInteger
        Size = 15
        Value = Null
      end
      item
        Name = 'USERNUMBER'
        DataType = ftVarBytes
        Size = 20
        Value = Null
      end>
    Left = 208
    Top = 160
  end
end