object FormMain: TFormMain Left = 223 Height = 790 Top = 54 Width = 1432 Caption = 'VirtCpu4' ClientHeight = 790 ClientWidth = 1432 DesignTimePPI = 120 OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow LCLVersion = '2.0.0.4' object ButtonStart: TButton Left = 984 Height = 31 Top = 8 Width = 94 Caption = 'Start' OnClick = ButtonStartClick TabOrder = 0 end object ButtonStop: TButton Left = 984 Height = 31 Top = 48 Width = 94 Caption = 'Stop' OnClick = ButtonStopClick TabOrder = 1 end object Label1: TLabel Left = 984 Height = 20 Top = 96 Width = 35 Caption = 'Ticks:' ParentColor = False end object ListViewRegisters: TListView Left = 8 Height = 769 Top = 8 Width = 312 Anchors = [akTop, akLeft, akBottom] Columns = < item Caption = 'Register' Width = 100 end item Width = 180 end> Font.Height = -17 Font.Name = 'Liberation Mono' OwnerData = True ParentFont = False TabOrder = 2 ViewStyle = vsReport OnData = ListViewRegistersData end object ListViewMemory: TListView Left = 328 Height = 769 Top = 8 Width = 648 Anchors = [akTop, akLeft, akBottom] Columns = < item Caption = 'Address' Width = 100 end item Width = 500 end> Font.Height = -17 Font.Name = 'Liberation Mono' OwnerData = True ParentFont = False TabOrder = 3 ViewStyle = vsReport OnData = ListViewMemoryData end object Memo1: TMemo Left = 984 Height = 619 Top = 160 Width = 432 OnKeyPress = Memo1KeyPress ReadOnly = True TabOrder = 4 end object Label2: TLabel Left = 984 Height = 20 Top = 136 Width = 56 Caption = 'Console:' ParentColor = False end object Timer1: TTimer Interval = 200 OnTimer = Timer1Timer left = 96 top = 144 end end