object main: Tmain Left = 0 Top = 0 HelpContext = 100 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Savegame Editor Construction Kit (SECK) V 4.00' ClientHeight = 413 ClientWidth = 639 Font.Color = clBlack Font.Height = -24 Font.Name = 'MS Sans Serif' Font.Style = [] Menu = MainMenu1 Position = poDefaultSizeOnly OnClose = FormClose OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 29 object Label8: TLabel Left = 56 Top = 144 Width = 77 Height = 16 Caption = 'Savegame 1' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label9: TLabel Left = 168 Top = 144 Width = 77 Height = 16 Caption = 'Savegame 2' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label10: TLabel Left = 280 Top = 144 Width = 77 Height = 16 Caption = 'Savegame 3' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label11: TLabel Left = 384 Top = 144 Width = 77 Height = 16 Caption = 'Savegame 4' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label12: TLabel Left = 496 Top = 144 Width = 77 Height = 16 Caption = 'Savegame 5' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label20: TLabel Left = 3 Top = 1 Width = 638 Height = 24 Caption = ' Savegame Editor Construction Kit' + ' V 4.00' Color = clLime Font.Color = clBlue Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False end object editoren: TPageControl Left = -1 Top = 27 Width = 639 Height = 386 HelpContext = 100 ActivePage = TabSheet2 Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 OnChanging = editorenChanging object TabSheet2: TTabSheet Caption = 'Savegames vergleichen' object Label18: TLabel Left = 349 Top = 215 Width = 77 Height = 16 Caption = 'Savegame 3' end object Label1: TLabel Left = 148 Top = 5 Width = 7 Height = 24 Font.Color = clBlack Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False Visible = False end object Label4: TLabel Left = 276 Top = 10 Width = 77 Height = 16 Caption = 'Savegame 3' end object Label5: TLabel Left = 387 Top = 10 Width = 77 Height = 16 Caption = 'Savegame 4' end object Label6: TLabel Left = 165 Top = 9 Width = 77 Height = 16 Caption = 'Savegame 2' end object Label7: TLabel Left = 500 Top = 10 Width = 77 Height = 16 Caption = 'Savegame 5' end object Adresse: TLabel Left = 69 Top = 216 Width = 51 Height = 16 Caption = 'Adresse' end object Label16: TLabel Left = 165 Top = 215 Width = 77 Height = 16 Caption = 'Savegame 1' end object Label17: TLabel Left = 257 Top = 215 Width = 77 Height = 16 Caption = 'Savegame 2' end object Label19: TLabel Left = 443 Top = 215 Width = 77 Height = 16 Caption = 'Savegame 4' end object Label15: TLabel Left = 535 Top = 215 Width = 77 Height = 16 Caption = 'Savegame 5' end object Label3: TLabel Left = 46 Top = 10 Width = 77 Height = 16 Caption = 'Savegame 1' end object Label2: TLabel Left = 317 Top = 170 Width = 284 Height = 13 Caption = 'Um Positionen in die Liste zu �bernehmen, mit der Maus auf ' Font.Color = clGreen Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label22: TLabel Left = 318 Top = 183 Width = 259 Height = 13 Caption = 'die Adresse zeigen und die rechte Maustaste bet�tigen' Font.Color = clGreen Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Gauge1: TGauge Left = 40 Top = 335 Width = 100 Height = 14 ForeColor = clBlue MaxValue = 20 Progress = 0 end object Label25: TLabel Left = 167 Top = 344 Width = 56 Height = 13 Caption = 'Gefunden : ' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Visible = False end object Label26: TLabel Left = 13 Top = 338 Width = 17 Height = 13 Alignment = taCenter AutoSize = False Caption = '0' Font.Color = clRed Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label27: TLabel Left = 316 Top = 192 Width = 3 Height = 13 Font.Color = clGreen Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object GroupBox4: TGroupBox Left = 4 Top = 234 Width = 33 Height = 100 TabOrder = 41 end object Panel4: TPanel Left = 158 Top = 233 Width = 467 Height = 109 BevelInner = bvLowered TabOrder = 36 end object Panel2: TPanel Left = 6 Top = 208 Width = 59 Height = 30 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 35 end object Panel1: TPanel Left = 26 Top = 165 Width = 281 Height = 36 TabOrder = 34 end object GroupBox1: TGroupBox Left = 26 Top = 57 Width = 583 Height = 102 TabOrder = 8 end object b_hinzu: TButton Left = 34 Top = 173 Width = 86 Height = 21 Hint = 'Savegames zum Vergleich ausw�hlen' Caption = 'Hinzuf�gen' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = b_hinzuClick end object b_entf: TButton Left = 121 Top = 173 Width = 86 Height = 21 Hint = 'Savegames vom Vergleich wieder ausschlie�en' Caption = 'Entfernen' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = b_entfClick end object Edit1: TEdit Left = 35 Top = 29 Width = 105 Height = 21 Cursor = crArrow Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 3 OnEnter = Edit1Enter end object Edit2: TEdit Left = 150 Top = 30 Width = 105 Height = 21 Cursor = crArrow Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 4 OnEnter = Edit2Enter end object Edit3: TEdit Left = 262 Top = 30 Width = 105 Height = 21 Cursor = crArrow Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 5 OnEnter = Edit3Enter end object Edit4: TEdit Left = 374 Top = 30 Width = 105 Height = 21 Cursor = crArrow Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 6 OnEnter = Edit4Enter end object Edit5: TEdit Left = 487 Top = 30 Width = 105 Height = 21 Cursor = crArrow Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 7 OnEnter = Edit5Enter end object RadioButton1: TRadioButton Left = 35 Top = 71 Width = 129 Height = 17 Caption = 'Allgemeine �nderung' Checked = True Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 9 TabStop = True end object RadioButton2: TRadioButton Left = 35 Top = 88 Width = 129 Height = 17 Caption = 'Kleinere Werte suchen' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 10 end object RadioButton3: TRadioButton Left = 35 Top = 104 Width = 129 Height = 17 Caption = 'Gr��ere Werte suchen' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 11 end object RadioButton4: TRadioButton Left = 35 Top = 120 Width = 129 Height = 17 Caption = 'Schalter 0/1' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 12 end object RadioButton5: TRadioButton Left = 35 Top = 136 Width = 129 Height = 17 Caption = 'Andere Schalter' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 13 end object RadioButton6: TRadioButton Left = 211 Top = 72 Width = 129 Height = 13 Caption = 'Differenz - 1' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 14 end object RadioButton8: TRadioButton Left = 211 Top = 103 Width = 161 Height = 17 Caption = 'Automatische Werte - Suche' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 16 end object RadioButton9: TRadioButton Left = 211 Top = 120 Width = 161 Height = 17 Caption = 'Automatische Balken - Suche' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 17 end object RadioButton10: TRadioButton Left = 211 Top = 136 Width = 177 Height = 17 Caption = 'Werte bis 2.000.000.000 suchen' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 18 end object RadioButton11: TRadioButton Left = 411 Top = 72 Width = 161 Height = 17 Caption = 'Halbierte Werte suchen' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 19 end object RadioButton12: TRadioButton Left = 411 Top = 88 Width = 161 Height = 17 Caption = 'Alternierende Werte suchen' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 20 end object RadioButton13: TRadioButton Left = 411 Top = 104 Width = 161 Height = 17 Caption = 'Werte im Intervall suchen' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 21 end object RadioButton14: TRadioButton Left = 411 Top = 120 Width = 161 Height = 17 Caption = 'Gegenst�nde als Bits suchen' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 22 end object RadioButton15: TRadioButton Left = 411 Top = 136 Width = 193 Height = 17 Caption = 'Master - Search ! (12 Savegames !)' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 23 end object Button3: TButton Left = 209 Top = 173 Width = 92 Height = 21 Hint = 'Ausgew�hlte Suche beginnen' Caption = 'Suche starten' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = Button3Click end object Memo3: TMemo Left = 40 Top = 243 Width = 104 Height = 90 Cursor = crArrow Color = clBlack Ctl3D = True Font.Color = clWhite Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '') ParentCtl3D = False ParentFont = False PopupMenu = Adressenpopup ReadOnly = True TabOrder = 24 OnDblClick = Memo3DblClick OnEnter = Memo3Enter OnMouseDown = Memo3MouseDown OnMouseUp = Memo3MouseUp end object Memo4: TMemo Left = 166 Top = 242 Width = 82 Height = 92 Cursor = crArrow Color = clWhite Ctl3D = True Lines.Strings = ( '' '') ParentCtl3D = False ReadOnly = True TabOrder = 25 OnEnter = Memo4Enter end object Memo5: TMemo Left = 259 Top = 242 Width = 82 Height = 92 Cursor = crArrow Color = clWhite Ctl3D = True Lines.Strings = ( '') ParentCtl3D = False ReadOnly = True TabOrder = 26 OnEnter = Memo5Enter end object Memo6: TMemo Left = 350 Top = 242 Width = 82 Height = 92 Cursor = crArrow Color = clWhite Ctl3D = True Lines.Strings = ( '' '') ParentCtl3D = False ReadOnly = True TabOrder = 27 OnEnter = Memo6Enter end object Memo7: TMemo Left = 441 Top = 242 Width = 82 Height = 92 Cursor = crArrow Color = clWhite Ctl3D = True Lines.Strings = ( '') ParentCtl3D = False ReadOnly = True TabOrder = 28 OnEnter = Memo7Enter end object Memo8: TMemo Left = 533 Top = 242 Width = 82 Height = 92 Cursor = crArrow Color = clWhite Ctl3D = True Lines.Strings = ( '') ParentCtl3D = False ReadOnly = True TabOrder = 29 OnEnter = Memo8Enter end object Button5: TButton Left = 2 Top = -5 Width = 24 Height = 18 Caption = '<' Enabled = False TabOrder = 30 Visible = False OnClick = Button5Click end object Button6: TButton Left = 26 Top = -5 Width = 23 Height = 18 Caption = '>' Enabled = False TabOrder = 31 Visible = False OnClick = Button6Click end object Button7: TButton Left = 11 Top = 215 Width = 23 Height = 18 Hint = 'Zur ersten Position wechseln' Caption = '<<' ParentShowHint = False ShowHint = True TabOrder = 32 OnClick = Button7Click end object Button8: TButton Left = 34 Top = 215 Width = 23 Height = 18 Hint = 'Zur letzten Position wechseln' Caption = '>>' ParentShowHint = False ShowHint = True TabOrder = 33 OnClick = Button8Click end object RadioButton7: TRadioButton Left = 211 Top = 87 Width = 129 Height = 16 Caption = 'Andere Differenz' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 15 end object Button22: TButton Left = 9 Top = 247 Width = 23 Height = 21 Hint = '5 Positionen r�ckw�rts' Caption = '-5' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 37 OnClick = Button22Click end object Button23: TButton Left = 9 Top = 267 Width = 23 Height = 21 Hint = '1 Position r�ckw�rts' Caption = '-1' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 38 OnClick = Button23Click end object Button24: TButton Left = 9 Top = 287 Width = 23 Height = 21 Hint = '1 Position vorw�rts' Caption = '+1' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 39 OnClick = Button24Click end object Button25: TButton Left = 9 Top = 307 Width = 23 Height = 21 Hint = '5 Positionen vorw�rts' Caption = '+5' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 40 OnClick = Button25Click end object ScrollBar1: TScrollBar Left = 146 Top = 243 Width = 10 Height = 90 Kind = sbVertical Max = 0 TabOrder = 42 OnChange = ScrollBar1Change end end object TabSheet1: TTabSheet Caption = 'Patchen, Liste der Werte' object Label13: TLabel Left = 195 Top = 13 Width = 197 Height = 16 Caption = 'Kommentar, Wirkung der Position' end object Label14: TLabel Left = 115 Top = 13 Width = 57 Height = 16 Caption = 'Adresse' end object Label21: TLabel Left = 2 Top = 225 Width = 110 Height = 80 Caption = 'Weitere Optionen : Adresse mit Maus ausw�hlen und rechte Maustas' + 'te bet�tigen' Font.Color = clGreen Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label29: TLabel Left = 8 Top = 13 Width = 91 Height = 16 Caption = 'Aktuelle Seite : ' end object Label30: TLabel Left = 36 Top = 37 Width = 10 Height = 24 Caption = '1' Font.Color = clBlack Font.Height = -19 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Panel3: TPanel Left = 3 Top = 308 Width = 620 Height = 41 TabOrder = 11 end object Memo1: TMemo Left = 193 Top = 39 Width = 409 Height = 267 Enabled = False Lines.Strings = ( '' '' '' '' '' '' '' '' '' '' '' '' '' '') ReadOnly = True TabOrder = 0 Visible = False OnChange = Memo1Change OnDblClick = Memo1DblClick OnEnter = Memo1Enter OnMouseUp = Memo1MouseUp end object Memo2: TMemo Left = 112 Top = 41 Width = 76 Height = 266 Cursor = crArrow Enabled = False Lines.Strings = ( '' '' '' '' '' '' '' '' '' '' '' '' '' '') PopupMenu = Listenpopup ReadOnly = True TabOrder = 1 Visible = False OnEnter = Memo2Enter OnMouseDown = Memo2MouseDown end object Button10: TButton Left = 418 Top = 7 Width = 23 Height = 24 Hint = 'Seite 1 der Liste' Caption = '1' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = Button10Click end object Button11: TButton Left = 451 Top = 7 Width = 25 Height = 24 Hint = 'Seite 2 der Liste' Caption = '2' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = Button11Click end object Button12: TButton Left = 487 Top = 7 Width = 25 Height = 24 Hint = 'Seite 3 der Liste' Caption = '3' ParentShowHint = False ShowHint = True TabOrder = 4 OnClick = Button12Click end object Button13: TButton Left = 522 Top = 6 Width = 24 Height = 24 Hint = 'Seite 4 der Liste' Caption = '4' ParentShowHint = False ShowHint = True TabOrder = 5 OnClick = Button13Click end object Button14: TButton Left = 556 Top = 7 Width = 25 Height = 24 Hint = 'Seite 5 der Liste' Caption = '5' ParentShowHint = False ShowHint = True TabOrder = 6 OnClick = Button14Click end object Button4: TButton Left = 88 Top = 317 Width = 75 Height = 25 Hint = 'Liste speichern' Caption = 'Speichern' ParentShowHint = False ShowHint = True TabOrder = 7 OnClick = Button4Click end object Button15: TButton Left = 164 Top = 317 Width = 75 Height = 25 Hint = 'Liste laden' Caption = 'Laden' ParentShowHint = False ShowHint = True TabOrder = 8 OnClick = Button15Click end object Button2: TButton Left = 239 Top = 317 Width = 75 Height = 25 Hint = 'Aktuelle Liste drucken' Caption = 'Drucken' ParentShowHint = False ShowHint = True TabOrder = 9 OnClick = Button2Click end object Button1: TButton Left = 12 Top = 317 Width = 75 Height = 25 Hint = 'Eine Adresse manuell in die Liste einf�gen' Caption = 'Hinzuf�gen' ParentShowHint = False ShowHint = True TabOrder = 10 OnClick = Button1Click end object Button16: TButton Left = 391 Top = 317 Width = 75 Height = 25 Hint = 'Aktuelle Liste leeren' Caption = 'L�schen' ParentShowHint = False ShowHint = True TabOrder = 12 OnClick = Button16Click end object Button9: TButton Left = 315 Top = 317 Width = 75 Height = 25 Hint = 'Vorherige Patchaktionen r�ckg�ngig machen' Caption = '"Undo"' ParentShowHint = False ShowHint = True TabOrder = 13 OnClick = Button9Click end object ListBox2: TListBox Left = 114 Top = 42 Width = 74 Height = 247 ItemHeight = 16 Items.Strings = ( '' '' '' '' '' '' '' '' '' '' '' '' '' '' '') PopupMenu = Listenpopup TabOrder = 14 OnEnter = ListBox2Enter OnKeyDown = ListBox2KeyDown OnMouseDown = ListBox2MouseDown OnMouseMove = ListBox2MouseMove end object ListBox3: TListBox Left = 196 Top = 42 Width = 409 Height = 247 ItemHeight = 16 Items.Strings = ( ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' ' ' + ' ' '') PopupMenu = Listenpopup TabOrder = 15 OnDblClick = ListBox3DblClick OnEnter = ListBox3Enter OnKeyDown = ListBox3KeyDown OnMouseDown = ListBox3MouseDown OnMouseMove = ListBox3MouseMove OnMouseUp = ListBox3MouseUp end object Button26: TButton Left = 466 Top = 317 Width = 75 Height = 25 Caption = 'Patchen' TabOrder = 16 OnClick = Button26Click end object Button27: TButton Left = 542 Top = 317 Width = 75 Height = 25 Caption = 'Bearbeiten' TabOrder = 17 OnClick = Button27Click end end object TabSheet3: TTabSheet Caption = 'Savegame Editoren' object GroupBox3: TGroupBox Left = 36 Top = 28 Width = 253 Height = 187 Caption = 'Savegame Editor ausf�hren ' Font.Color = clBlack Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 object Button20: TButton Left = 25 Top = 106 Width = 201 Height = 25 Hint = 'Savegame Editor ausf�hren' Caption = 'Ausf�hren' ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = Button20Click end object Button18: TButton Left = 25 Top = 146 Width = 201 Height = 25 Hint = 'Screen-Editor zum Bearbeiten von Savegame Editoren starten' Caption = 'Savegame Screen-Editor' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = Button18Click end object Edit6: TEdit Left = 25 Top = 30 Width = 202 Height = 28 MaxLength = 80 TabOrder = 2 OnEnter = Edit6Enter end object Button21: TButton Left = 25 Top = 69 Width = 201 Height = 25 Hint = 'Savegame Editor zum Ausf�hren ausw�hlen' Caption = 'Auswahl' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = Button21Click end end object GroupBox2: TGroupBox Left = 315 Top = 29 Width = 267 Height = 186 Caption = '.exe Savegame Editor erstellen' Font.Color = clBlack Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 object Label24: TLabel Left = 18 Top = 29 Width = 78 Height = 20 Caption = 'Dateiname' end object Label28: TLabel Left = 22 Top = 142 Width = 237 Height = 20 Caption = 'Nur in der "Professional" Version !' Font.Color = clRed Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False Visible = False end object Button19: TButton Left = 20 Top = 107 Width = 230 Height = 25 Hint = 'Lauff�hige .exe Savegame Editoren erstellen' Caption = '.exe Savegame-Editor erstellen' Font.Color = clBlack Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 OnClick = Button19Click end object Edit7: TEdit Left = 19 Top = 65 Width = 211 Height = 28 TabOrder = 1 end end object Memo9: TMemo Left = 58 Top = 226 Width = 206 Height = 89 Cursor = crArrow BorderStyle = bsNone Color = clBtnFace Font.Color = clGreen Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Mit dieser Option k�nnen Sie sich ' 'ihre eigenen und individuellen ' 'Savegame-Editoren (Trainer) f�r ' 'Ihre Spiele erstellen und aufrufen.') ParentFont = False ReadOnly = True TabOrder = 2 OnEnter = Memo9Enter end object Memo10: TMemo Left = 322 Top = 227 Width = 218 Height = 57 Cursor = crArrow BorderStyle = bsNone Color = clBtnFace Font.Color = clGreen Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'In der Professional Version entsteht' 'durch Knopfdruck ein ausf�hrbarer' 'Windows .exe Savegame - Editor.') ParentFont = False ReadOnly = True TabOrder = 3 OnEnter = Memo9Enter end object Button28: TButton Left = 64 Top = 302 Width = 75 Height = 25 Caption = 'EDE 2' Enabled = False TabOrder = 4 Visible = False OnClick = Button28Click end end object TabSheet4: TTabSheet Caption = 'Theorie' object Label23: TLabel Left = 213 Top = 8 Width = 174 Height = 20 Caption = 'Bitte Thema ausw�hlen !' Font.Color = clBlack Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object ListBox1: TListBox Left = 31 Top = 42 Width = 560 Height = 152 ItemHeight = 16 Items.Strings = ( 'Was sind Savegames ? ' 'Wie ver�ndert man Savegames ? ' 'Welche Rolle spielt SECK dabei ?' 'Wie findet man Werte aus einem Spiel in Savegames ? ' 'Wie findet man "Energiebalken" in Savegames ? ' 'Spiel erkennt modifizierte Savegames - Was nun ? ' '' '' '') TabOrder = 0 OnDblClick = ListBox1DblClick end object Button17: TButton Left = 32 Top = 202 Width = 75 Height = 25 Hint = 'Gew�hltes Thema anzeigen' Caption = 'Anzeigen' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = Button17Click end object Memo11: TMemo Left = 34 Top = 240 Width = 505 Height = 54 Cursor = crArrow BorderStyle = bsNone Color = clBtnFace Font.Color = clGreen Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Dieser Bereich soll vor allem Einsteigern einen �berblick �ber d' + 'ie Savegame-' 'Analyse im Allgemeinen und mit Hilfe von SECK 4.00 im Speziellen' + ' bieten.') ParentFont = False ReadOnly = True TabOrder = 2 OnEnter = Memo11Enter end end end object RichEdit2: TRichEdit Left = 7 Top = 72 Width = 19 Height = 35 Lines.Strings = ( '') TabOrder = 1 Visible = False end object MainMenu1: TMainMenu Left = 38 Top = 65535 object Savegames1: TMenuItem Caption = '&Savegames' ShortCut = 16449 object Hinzufgen1: TMenuItem Caption = '&Hinzuf�gen' ShortCut = 16456 OnClick = Hinzufgen1Click end object Entfernen1: TMenuItem Caption = '&Entfernen' ShortCut = 16453 OnClick = Entfernen1Click end object SucheStarten1: TMenuItem Caption = 'Suche &Starten...' ShortCut = 16467 OnClick = SucheStarten1Click end object N2: TMenuItem Caption = '-' ShortCut = 0 end object SECK400beenden1: TMenuItem Caption = 'SECK 4.00 beenden' ShortCut = 0 OnClick = SECK400beenden1Click end end object Patchen1: TMenuItem Caption = '&Patchen' ShortCut = 0 object Hinzufgen2: TMenuItem Caption = '&Hinzuf�gen' ShortCut = 0 OnClick = Hinzufgen2Click end object Speichern1: TMenuItem Caption = 'S&peichern' ShortCut = 0 OnClick = Speichern1Click end object Laden1: TMenuItem Caption = '&Laden' ShortCut = 0 OnClick = Laden1Click end object Drucken1: TMenuItem Caption = '&Drucken' ShortCut = 0 OnClick = Drucken1Click end object Rckgngig1: TMenuItem Caption = '&R�ckg�ngig' ShortCut = 0 OnClick = Rckgngig1Click end object Lschen1: TMenuItem Caption = 'L&�schen' ShortCut = 0 OnClick = Lschen1Click end end object Tools: TMenuItem Caption = '&Tools' ShortCut = 16452 object HexEditor1: TMenuItem Caption = 'Hex-Editor' ShortCut = 16472 OnClick = HexEditor1Click end object HexDecUmwandler1: TMenuItem Caption = 'Hex-Dec-Umwandler' ShortCut = 16469 OnClick = HexDecUmwandler1Click end object ScreenEditor1: TMenuItem Caption = 'Screen-Editor' ShortCut = 16451 OnClick = ScreenEditor1Click end end object Hilfe1: TMenuItem Caption = '&Hilfe' ShortCut = 0 object Inhalt1: TMenuItem Caption = '&Inhalt' ShortCut = 0 OnClick = Inhalt1Click end object Suchen1: TMenuItem Caption = '&Suchen' ShortCut = 0 OnClick = Suchen1Click end object Hilfebenutzen1: TMenuItem Caption = '&Hilfe benutzen' ShortCut = 0 OnClick = Hilfebenutzen1Click end object N1: TMenuItem Caption = '-' ShortCut = 0 end object SECK400Tutor1: TMenuItem Caption = 'SECK 4.00 Tutor' ShortCut = 0 OnClick = SECK400Tutor1Click end object LittleQuickTutor1: TMenuItem Caption = 'Little Quick Tutor' ShortCut = 0 OnClick = LittleQuickTutor1Click end end object Info2: TMenuItem Caption = 'Info' ShortCut = 0 object berSECK4001: TMenuItem Caption = '�ber SECK 4.00' ShortCut = 0 OnClick = berSECK4001Click end object N3: TMenuItem Caption = '-' ShortCut = 0 end object Internet1: TMenuItem Caption = 'Internet' ShortCut = 0 OnClick = Internet1Click end end object Beenden: TMenuItem Caption = '&Beenden' ShortCut = 0 Visible = False OnClick = BeendenClick end object SECKbestellen1: TMenuItem Caption = 'SECK BESTELLEN' Enabled = False ShortCut = 0 Visible = False OnClick = SECKbestellen1Click end end object Listenpopup: TPopupMenu Left = 6 Top = 1 object Popitem1: TMenuItem Caption = 'Text an aktueller Adresse bearbeiten' ShortCut = 0 OnClick = Popitem1Click end object PopItem3: TMenuItem Caption = 'Savegame an Adresse patchen' ShortCut = 0 OnClick = PopItem3Click end object Popitem2: TMenuItem Caption = 'Aktuelle Adresse l�schen' ShortCut = 0 OnClick = Popitem2Click end end object SaveDialog1: TSaveDialog DefaultExt = 'lst' FileEditStyle = fsEdit Filter = 'Listendateien|.lst' Options = [ofOverwritePrompt, ofHideReadOnly] Title = 'Liste speichern' Left = 69 end object OpenDialog1: TOpenDialog DefaultExt = 'lst' FileEditStyle = fsEdit Filter = 'SECK 400 Listendateien|.lst' Options = [ofOverwritePrompt, ofHideReadOnly, ofNoChangeDir, ofNoReadOnlyReturn] Title = 'SECK 4.00 Liste laden' Left = 101 end object Adressenpopup: TPopupMenu Left = 133 Top = 65535 object AdresseindieListebernehmen1: TMenuItem Caption = 'Adresse in die Liste �bernehmen' ShortCut = 0 OnClick = AdresseindieListebernehmen1Click end object SavegameandieserAdressepatchen1: TMenuItem Caption = 'Savegame an dieser Adresse patchen' ShortCut = 0 OnClick = SavegameandieserAdressepatchen1Click end end object Openeditor: TOpenDialog DefaultExt = 'id2' FileEditStyle = fsEdit Filter = 'SECK4.00 individuelle Editoren|*.id2' Options = [ofHideReadOnly] Title = 'Individuellen Savegame Editor �ffnen' Left = 515 end end