object Form1: TForm1 Left = 385 Height = 914 Top = 208 Width = 1543 Caption = 'Form1' ClientHeight = 914 ClientWidth = 1543 DesignTimePPI = 144 OnCreate = FormCreate OnDestroy = FormDestroy OnKeyPress = FormKeyPress OnShow = FormShow LCLVersion = '2.0.10.0' object ListViewMemory: TListView Left = 618 Height = 824 Top = 48 Width = 880 Columns = < item Caption = 'Address' Width = 120 end item Width = 745 end> Font.Name = 'Liberation Mono' OwnerData = True ParentFont = False TabOrder = 0 ViewStyle = vsReport OnData = ListViewMemoryData end object ListViewRegisters: TListView Left = 374 Height = 824 Top = 49 Width = 230 Columns = < item Caption = 'Register' Width = 96 end item Width = 120 end> Font.Name = 'Liberation Mono' OwnerData = True ParentFont = False TabOrder = 1 ViewStyle = vsReport OnData = ListViewRegistersData end object Memo1: TMemo Left = 19 Height = 637 Top = 29 Width = 341 OnKeyPress = Memo1KeyPress ParentFont = False ReadOnly = True TabOrder = 2 end object ButtonStart: TButton Left = 248 Height = 37 Top = 682 Width = 113 Caption = 'Start' OnClick = ButtonStartClick ParentFont = False TabOrder = 3 end object ButtonStop: TButton Left = 106 Height = 37 Top = 682 Width = 113 Caption = 'Stop' OnClick = ButtonStopClick ParentFont = False TabOrder = 4 end object LabelTicks: TLabel Left = 19 Height = 24 Top = 734 Width = 48 Caption = 'Ticks:' ParentColor = False ParentFont = False end object Timer1: TTimer Interval = 500 OnTimer = Timer1Timer Left = 271 Top = 810 end end