frist.dfm

实现加减乘除的简单计算器,可以将0显示在输入的右面.

object s1: Ts1
  Left = 331
  Top = 135
  Width = 383
  Height = 365
  Caption = #35745#31639#22120
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001004040000100000000281600001600000028000000400000008000
    000001000800000000000012000000000000000000000000000000000000B8B8
    B80000001800C0C0C00000001000000020000000000000002800000818000808
    3000081038000008200000000800080838000008280000083000080028001018
    5000000810000800200010104800F8F8F8000010180010184800182058000810
    4000181858000018180008001000080030002020700028207000000838000010
    2000080828000818400018286000303880000000300008001800102048003830
    800000103000001038000018200008184800181850004040B000082040000828
    3000101040001020580020205800202068000810300008181800182060001828
    5800283070002830780030308800384088003840980008101000081048000820
    2000082028000820480018305800202060003028780030288000383880006078
    E800989898000800080008183800081850001010380010105000101858001838
    480028287800303078003830880038388800403088004048A0004050A0005058
    C000A8A8B8000010280000183800083030001020500018105000181860001828
    6800202868002038580028387800303070003030800030387800304880003828
    78003828A00038309000383898003838A0003840A00040389000403898004040
    B8004050A8004058B000484890004860B0005060D0005858D0005868D0006068
    D8006070E80078A0F800B0B0B000000808000020200008082000080840000818
    2800081830000828280008284800100838001020400010303800182068001828
    4800183840002028400020285000202860002030500020307000203868002820
    7800282868002828700028305800283080002838700028388000302070003020
    7800304080003048880038288000383098003838900038408000384890004038
    88004038A000404898004048A8004048B0004848B0004848B8004850A0004858
    A0004858C0004858D8005050B8005050C8005050D8005068D0005858D8005858
    E0005860C0005870E0006068E0006080E0006890F0007078E000A0A0A000A0A0
    B800F0F0F8000010100000182800001830000800000008081000080818000810
    1800081020000818200008303800083838001008400010282000102830001028
    4800102858001030300010304000181048001818480018205000183050001830
    6000184048002028480020306000203068002038600028285800282860002828
    8000283088002838580028386000303888003040880030505000305078003050
    880030585800305870003828A800383058003838A8003848A000385088003850
    90003858780038588800403090004040A8004050900040589000405898004840
    C0004848C8004850C800485898004878C0005048B0005050C0005058A0005058
    D0005058D8005060B8005060C0005088D0005850D0005868E0005870D0000202
    02020202020202020202020202020202020202020202020200D693E48BD2CD85
    850A000202020202020202020202020202020202020202020202020202020200
    000000000000000000000000000000000000595959F764649191918CCE8B8B5D
    85222222352149B7B70000000000000000000000000000000000000000020200
    0000000000000000000000000000007B49B7F3E79E52528C8C8C8CCE858B5D27
    85222218353521214D49B7000000000000000000000000000000000000020200
    000000000000000000000000000049F7EAEEEE9952618C8C8C8C8C1631278516
    222222222235353521218AE10000000000000000000000000000000000020200
    00000000000000000000000049FAE767E7E7E78E618C8C38385DCE1622313122
    35350909220935350821210A8ADE000000000000000000000000000000020200
    00000000000000000000B8A2739FE79A67DD5261CECE17103232101822092222
    350C353535350C08212108210A11BEE900000000000000000000000000020200
    000000000000000059B8716D6DDC96248E8C8C33CE2D33101032101816095D09
    0C35352221080808082121080821114A05490000000000000000000000020200
    00000000000000B8ECEC713B3B246161618C8C8C33332D323210162716221835
    3535350C080821080821212121210A114A4A4900000000000000000000020200
    000000000000B8FAA5A5A33BDC5144178C8C8C1716CECE321627271610183535
    0909350808082108210821210A210A0A11054A49000000000000000000020200
    0000000000B8B1B170706C6A3B51454461341719162D16103333272727180909
    3535080808082108080821210A21210A0A114A3E490000000000000000020200
    0000000059A758FF2EA5A3EB9C3B5445514534172D1916CECE1810102D271822
    35080C0808082108082121210A0A0A0A0A111105BE4900000000000000020200
    00000000A1B1B4AE70A67072E66F465353655134974416CE2D10CE1631183135
    0C350C08350821080808212121210A0A114A114A050549000000000000020200
    000000B8F5FFB2ACFFFBA6A6A16F6B9DD8D8515144172D19CECECE1618310909
    0909350C0C0808080808212121210A0A114A111B4A0505000000000000020200
    0000B8F5F678FF77B575F070EC563DDC516151D8515F2DCE2DCE271618160922
    09180C35350808082121212121212121114A11114A4A05E90000000000020200
    0000B176AC77B4B4B4FB2EECA5719D46513451D8D84417192DCE161618310931
    31350C08350808082121212121210A211B111B114A4A4A05E900000000020200
    00B8FFB4AFB4B4B4B4AC70E6E66C5546459E5246511E4417D78C161618313109
    1835350808080808210A212112110A210A1B11114A11114A4AE9000000020200
    00B678B5AFB4B4AEB4F2F0A1716F6B9C5151515145458C2D441733CDCD311631
    353535082108082121212121120A1221121B0A1B1111114A05DE000000020200
    B878B5B5B3B5B4F8AEACF0A5FA6C6B3B514545464545611717171716CD161809
    0C08350808082121210821210A0A0A121111121B1111114A0505490000020200
    B6B47AB548B5B2F8ACF02EA5726F579D51515154514561171717332716311635
    35350C08082121080821210A0A0A0A210A0A111B1111114A0505DE7B00020259
    F8B4B548B5B5F9F8F970E5ECE69C6D6F5345543B535187192D8C173327311609
    091835080808212108210A0A110A0A0A110A11111111114A050505B700020259
    78B4B6B5B548ADB6B270E369A1A16C6D6E462854534587172D8C8CCE27181809
    351822080808212121210A11110A0A0A0A0A0A1111111111050505B700020259
    78B4B57AB5B5B3FDFEF0E3E369A66D6D6E5268979D2897192D8C38275D162209
    091818350808212121210A0A0A0A110A0A120A1B11111111050505B7000202FF
    78787A7A7AB3FEAFB0F0E3E56969699CA19D459728531D618C38CE1610162209
    18180C350808082121210A0A0A11110A0A0A1111111111114A050505000202AE
    78B47A7A7A4879B0FEF1F0582E699C6FA19C459728465161618CCE2710CD2235
    091808080808082121210A0A11110A0A0A121111111111110505050500020276
    78B5B5E9B4B5B3AFF9F1F076F2706C6F6F6E454528464545458C382710272235
    0918080835080808210A0A0A0A0A0A0A0A0A11111111114A05050505000202B1
    78B6B6FC484879B0ADF1F0F0F07072576FA028526855524561178C3327270935
    093584083508080D21210A11110A0A0A0A0A1111071111114A0505058A0202FD
    78B6B67A48B579B0FEAAADACF0A6A974563B53542852458C8C1719175D181818
    18350C080808082121210A0A110A0A0A0A0A110A0A11114A4A0505050702F0FD
    B6B6597AB6797948B0F1FD48ACFBECEC6F9C9D285452458C618C8C385D181822
    091835350808082121210A0A110A0A0A0A0A0A0A0A0A11114A0505057C02A6AC
    B6B602B9B5794879FEADADB2757570ECA19DA06E6F55528C61646138CE182222
    0918353508080821210A0A0A110A0A0A1B0A0A0A0A1111114A0505054A02A6F8
    B67AB9B97AB6B5B57AB0ADB0FE77A670A16EA0A0736E54456164618CCE181822
    1818353508080821210A0A0A0A0A0A0A110A0A0A0A1111114A0505054A02FB78
    B57A02B97AB5B5B57AFEF9FE48AFB4A6A16F6E6EA05454521E618C8CCE103109
    222209350821210A0A0A0A0A120A0A110AC10A1107110A114A0505054A02B1FF
    487A02B97A7A7A7AB5FEFDB379AFFF70A19CA7A2285454285239388C16108522
    221818350821210A120A110A0A0A0A110A0A0A070A110A114A0505050702FBB4
    79B67A7AB6B57A7AB5B5B0B0B0B4FCA6ECA156A29D28549E5261618CCE5D5D85
    1818220908082121210A11110A0A11110A11BF0A0A0707074A0505053E02FB78
    AF487AB97A7A7A7A7AB5B579B67AB4FBA5A7716B3C65549E2461618C175D1085
    85224B0908082121210A0A0A0A0A0A111B0A0A0A0A07114A4A0505050002FBB4
    AFB07A7A7A7A7A7A7A7A7AB5B67A7AFFF5AB6D6B3CDC3C9E248E618C38175D5D
    8885224B35080D21210A0A0A0A0A0A1B1B110A11070A117C4A0505050002B8B4
    B0ADB5B57A7A7A7A7A027A7AB67A7AB5ECAB57A23B9E3C9E2452618C8C17938B
    852F224B09210821210A0A0A0A0A0A0A1B1B0ABF0A0A11074A05054A00020277
    B2F979B57AB97A7A7A7A7A7A7A7AB97AF57272573B659E9ED82452618C8C4343
    5D2F85224B080821210D0A0A0A11110A11110A0A0A1507074A050549000202F9
    F1F9B348B67A7AB97A14B9B9B97AB9B558FA573DDC653C9E3A458E608CD54343
    C9C8852F4B35082121210A0A1B110A0A0A110A0A15150A074A4A7CB7000202B3
    B0ADB0FE797A7AB9141414B9B9B97AB6ABA5573D3B543C9E549E24398C43DB43
    435DC885224B210D21210A0A0A110A0A11110A0A151507074A7C07B700020278
    AEFEFEAA797A02B9141414B9B9B97AB47771A2EF3B543C3C7354246161959595
    D44343888522210821210A0A0A0A0A0A11110A151515070707070AB7000202B8
    F9F9AAB0B0B50214141414B9B9147AB5AE72719F3CED3C3C543C2452959E2424
    2495D043C8223508210D0A0A0A0A0A11110A0A152B15C007C015E10000020259
    F1AFB2B548B57AB9141414141414B97AB4746B3C3C2466646424673C67E79AE8
    9A99249543853508080D210A0A0A0A0A0A11152B2B1515152B41490000020259
    ACF0B2F0B5B57AB9141414141414B9B6FBEC733C3966D4D4959EDFEAEEEE7472
    74E89E67D042224B080D210A0A0A0A0A0A0AC12B2B2B2B2B2B30490000020259
    58AC48B2B57A7AB9B91414B9B97AB57858E63B24958FDADA62DBE9EAEEF4F4F4
    F474A8E78C5D852209080D0D0A0A0A0A0AC1C1152B2B2B2B41E9000000020200
    B8F0FE7979B57AB9B9B9B97AB57AB5B4B1A1DC528F62508989D1D1E1E9FC7AB5
    FCF4743D634385220929290D210A0A0A0A0DC1C12B2B152B30E9000000020200
    59B1F17948B57AB9B9B902B47758FFFCFA715466DB62893041C6C6C6DEEE7A7A
    B4FCA9E6998CC82F224B2929C10A0A0A0A0AC1C1150AC141D149000000020200
    00B6F0B2B4487AB97A7AB658FAFAA8F774EE9EE2DAD1C43036C7DE40C6EEFC7A
    7AFC7757E8244383852209080D0D0A0A0AC10DC10A0AC181B700000000020200
    0000B1764879021402B5B1A9A13CEDEEE9E1DE89C64036DEE485E1E989DEFCFC
    7AFCF4F4A89E8EC95D2F09080D0D0D120A0A0D0A0A0D80410000000000020200
    0000B1ACB6B3B602B9B2AEB174E7DFDA8930812B40363E368ADEE9DE36C6E149
    FCB5B5FCFAEF96D0435D4B810D0D0DC10A0A0A0A0DC18A000000000000020200
    0000F7A6B3B67A7A7AB4FBFAE8DFE2D130C640C1C1363636CA8ADEDEC6C64959
    7A7A7AFCF457A261435D2281810D0D0D0A0A0D0D80C1B7000000000000020200
    000000B876B37A7A7A78FBA8E7DF43CB30402B15BFBFC0402BC6E1E9DEDE4902
    027A7AB5FC72E6998C5D854B080D0D0A0A0D0DC180DE00000000000000020200
    0000000058AFB6B67AF8AB6D9E958DCB30412B2B36362B2B2B89898689E1E900
    02027A7AB5F4713C61178509290D0D210A0A0D81DE7B00000000000000020200
    00000000B8B1B67A7858A56D9E95D589CA414040152B40C630DE89CA86DE4900
    02027A7AB5F4713B284388228121210ABF0A818A000000000000000000020200
    0000000000B878B5B578FB74EF95DBD130404040402B4130CADED13089C449B8
    B9027A7AFC7257EF678C854B09C1210A0AC70000000000000000000000020200
    000000000000B8B4B4B4F4FAEF9E8F6289303030C6C630CAD1E1D1CA8689E149
    B9027AB5FCFA71ED248C8522090D0DBF8D590000000000000000000000020200
    00000000000059B8B4B4B4F471A2E0DF62D1CBCB5C30CACAD1E18930CA89DEEE
    00B97AFCFC71563C528C5D22210DC1DEB7000000000000000000000000020200
    0000000000000000B8B1FF7771A8A2EADF8F62D1D1C489D1E1E1D1303089D1E9
    F7B8FCFCFAA23C52641716352181DEB700000000000000000000000000020200
    000000000000000000B8B1B1A5FAA8EDEEDFDFE2E1DED1E1E1E2D1C33089D1E1
    E9EEF4EFA873542833318AD28A597B0000000000000000000000000000020200
    00000000000000000000B8F7B1FF74A8EFEEEEEAE2E2E2E2E2E2D18986CBD1E1
    E2E967E79E9E6493D28A8A490000000000000000000000000000000000020200
    00000000000000000000000049B1FAF774F7EDEEEEE9EEEADFE2628DC88950DA
    6293DBDB93D6C8814DE449000000000000000000000000000000000000020200
    000000000000000000000000000049B1F7F7F7A8A8EEEDED9E9EDFDB8D8BCF8D
    9393D2D28B8A85E9E90000000000000000000000000000000000000000020200
    00000000000000000000000000000000B8B8A2A8A8F7F77355476664DB43938D
    8D8DD2D28AE94900000000000000000000000000000000000000000000020200
    000000000000000000000000000000000000595949547373A0546464E4D68DE4
    E4E4E4B7B7000000000000000000000000000000000000000000000000020200
    0000000000000000000000000000000000000000B85273736E546464E493D2E4
    E4E4E40000000000000000000000000000000000000000000000000000020000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    0000000000000000000000000000000000000000000000000000000000000000
    000000000000000000000000000000000000000000000000000000000000}
  Menu = MainMenu1
  OldCreateOrder = False
  Position = poDesktopCenter
  PixelsPerInch = 96
  TextHeight = 16
  object num: TLabel
    Left = 30
    Top = 24
    Width = 240
    Height = 24
    Alignment = taRightJustify
    AutoSize = False
    Caption = '0'
    Color = clBtnHighlight
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -19
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Layout = tlCenter
  end
  object cf: TButton
    Tag = 3
    Left = 312
    Top = 168
    Width = 49
    Height = 49
    Caption = #20056
    Constraints.MaxHeight = 50
    Constraints.MaxWidth = 50