home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 130
- Top = 366
- Width = 577
- Height = 333
- Font.Color = clWindowText
- Font.Height = -16
- Font.Name = 'System'
- Font.Style = []
- FormStyle = fsMDIChild
- Icon.Data = {<image000.ico>}
- KeyPreview = True
- Menu = MainMenu
- Position = poDefault
- Visible = True
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 120
- TextHeight = 20
- object FREditor1: TRichEdit
- Left = 0
- Top = 0
- Width = 569
- Height = 285
- Align = alClient
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'Courier New'
- Font.Style = []
- ParentFont = False
- PlainText = True
- ScrollBars = ssBoth
- TabOrder = 0
- WantTabs = True
- WordWrap = False
- OnKeyDown = FREditor1KeyDown
- OnKeyPress = FREditor1KeyPress
- OnKeyUp = FREditor1KeyUp
- OnMouseDown = FREditor1MouseDown
- OnMouseUp = FREditor1MouseUp
- end
- object ReplaceDialog1: TReplaceDialog
- Left = 96
- Top = 16
- end
- object FindDialog1: TFindDialog
- Options = [frDown, frMatchCase, frDisableMatchCase, frDisableUpDown, frDisableWholeWord]
- OnFind = FindDialog1Find
- Left = 56
- Top = 16
- end
- object MainMenu: TMainMenu
- Left = 16
- Top = 16
- object FileMenu: TMenuItem
- Caption = '&Datei'
- ShortCut = 0
- object FileNewItem: TMenuItem
- Caption = '&Neu'
- Hint = 'Eine neue Datei erzeugen'
- ShortCut = 0
- OnClick = FileNewItemClick
- end
- object FileOpenItem: TMenuItem
- Caption = '&�ffnen...'
- Hint = 'Eine bestehende Datei �ffnen'
- ShortCut = 0
- OnClick = FileOpenItemClick
- end
- object FileSaveItem: TMenuItem
- Caption = '&Speichern'
- Hint = 'Aktuelle Datei speichern'
- ShortCut = 0
- OnClick = FileSaveItemClick
- end
- object FileSaveAsItem: TMenuItem
- Caption = 'Speichern &Unter...'
- Hint = 'Aktuelle Datei unter neuem Namen speichern'
- ShortCut = 0
- OnClick = FileSaveAsItemClick
- end
- object Schlieen1: TMenuItem
- Caption = 'Sch&lie�en'
- ShortCut = 0
- OnClick = Schlieen1Click
- end
- object N1: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object FilePrintItem: TMenuItem
- Caption = '&Drucken'
- Hint = 'Aktuelle Datei drucken'
- ShortCut = 0
- Visible = False
- OnClick = FilePrintItemClick
- end
- object FilePrintSetupItem: TMenuItem
- Caption = 'Drucker&einrichtung...'
- Hint = 'Druckereinrichtung �ndern'
- ShortCut = 0
- Visible = False
- end
- object N4: TMenuItem
- Caption = '-'
- ShortCut = 0
- Visible = False
- end
- object FileExitItem: TMenuItem
- Caption = '&Beenden'
- Hint = 'Diese Anwendung beenden'
- ShortCut = 0
- OnClick = FileExitItemClick
- end
- end
- object EditMenu: TMenuItem
- Caption = '&Bearbeiten'
- ShortCut = 0
- object EditCutItem: TMenuItem
- Caption = '&Ausschneiden'
- Hint = 'Markiertes Element l�schen'
- ShortCut = 0
- OnClick = EditCutItemClick
- end
- object EditCopyItem: TMenuItem
- Caption = '&Kopieren'
- Hint = 'Markiertes Element in Zwischenablage kopieren'
- ShortCut = 0
- OnClick = EditCopyItemClick
- end
- object EditPasteItem: TMenuItem
- Caption = '&Einf�gen'
- Hint = 'Inhalt der Zwischenablage einf�gen'
- ShortCut = 0
- OnClick = EditPasteItemClick
- end
- end
- object Suchen1: TMenuItem
- Caption = '&Suchen'
- ShortCut = 0
- object Suchen2: TMenuItem
- Caption = '&Suchen'
- ShortCut = 0
- OnClick = Suchen2Click
- end
- object Weitersuchen1: TMenuItem
- Caption = '&Weitersuchen'
- ShortCut = 114
- OnClick = Weitersuchen1Click
- end
- object Ersetzen1: TMenuItem
- Caption = '&Ersetzen'
- ShortCut = 0
- end
- object N5: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object Lesezeichensetzen1: TMenuItem
- Caption = '&Lesezeichen setzen'
- Hint = 'Lesezeichen setzen'
- ShortCut = 0
- OnClick = Lesezeichensetzen1Click
- end
- object GehezuLesezeichen1: TMenuItem
- Caption = '&Gehe zu Lesezeichen'
- ShortCut = 0
- OnClick = GehezuLesezeichen1Click
- end
- end
- object Compilieren1: TMenuItem
- Caption = '&Compilieren'
- ShortCut = 0
- object Compilieren2: TMenuItem
- Caption = '&Compilieren'
- ShortCut = 0
- OnClick = Compilieren1Click
- end
- end
- object Start1: TMenuItem
- Caption = 'Sta&rt'
- ShortCut = 0
- object Start2: TMenuItem
- Caption = '&Start'
- ShortCut = 120
- OnClick = Start2Click
- end
- object Parameter1: TMenuItem
- Caption = '&Parameter'
- ShortCut = 0
- OnClick = Parameter1Click
- end
- end
- object Options1: TMenuItem
- Caption = '&Optionen'
- ShortCut = 0
- object Verzeichnisse1: TMenuItem
- Caption = '&Verzeichnisse'
- ShortCut = 0
- OnClick = Verzeichnisse1Click
- end
- object Farben1: TMenuItem
- Caption = '&Farben'
- ShortCut = 0
- OnClick = Farben1Click
- end
- object Sprache: TMenuItem
- Caption = '&Sprache'
- Hint = 'Sprache ausw�hlen'
- ShortCut = 0
- OnClick = SpracheClick
- end
- end
- object WindowMenu: TMenuItem
- Caption = '&Fenster'
- ShortCut = 0
- object JAVACOutput1: TMenuItem
- Caption = 'JAVAC Output'
- ShortCut = 0
- OnClick = JAVACOutput1Click
- end
- object N2: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object WindowTileItem: TMenuItem
- Caption = '&Nebeneinander'
- Hint = 'Alle Fenster nebeneinander anordnen'
- ShortCut = 0
- OnClick = WindowTileItemClick
- end
- object WindowCascadeItem: TMenuItem
- Caption = '&�bereinander'
- Hint = 'Alle Fenster �bereinander anordnen'
- ShortCut = 0
- OnClick = WindowCascadeItemClick
- end
- object WindowArrangeItem: TMenuItem
- Caption = '&Symbole anordnen'
- Hint = 'Alle Symbole anordnen'
- ShortCut = 0
- OnClick = WindowArrangeItemClick
- end
- end
- object Tools1: TMenuItem
- Caption = '&Tools'
- ShortCut = 0
- object Netscape1: TMenuItem
- Caption = '&Browser'
- ShortCut = 0
- OnClick = Netscape1Click
- end
- object ASCIITabelle1: TMenuItem
- Caption = '&ASCII Tabelle'
- ShortCut = 0
- OnClick = ASCIITabelle1Click
- end
- object Lesezeichen1: TMenuItem
- Caption = '&Lesezeichen'
- ShortCut = 0
- OnClick = Lesezeichen1Click
- end
- end
- object HelpMenu: TMenuItem
- Caption = '&Hilfe'
- ShortCut = 0
- object HelpContentsItem: TMenuItem
- Caption = '&Inhalt'
- Hint = 'Inhalts�bersicht der Hilfe anzeigen'
- ShortCut = 0
- OnClick = HelpContentsItemClick
- end
- object HelpHowToUseItem: TMenuItem
- Caption = '&Hilfe benutzen'
- Hint = 'Hilfe zur Benutzung des Hilfesystems'
- ShortCut = 0
- Visible = False
- end
- object N3: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object HelpAboutItem: TMenuItem
- Caption = 'Inf&o...'
- Hint = 'Programminformationen anzeigen'
- ShortCut = 0
- OnClick = HelpAboutItemClick
- end
- end
- end
- end
-