object konfigdialog: Tkonfigdialog Tag = 10300 Left = 564 Top = 343 Width = 548 Height = 396 Caption = 'DMEX - Menueintr�ge Konfiguration' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} OldCreateOrder = True Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object PageControl1: TPageControl Left = 0 Top = 0 Width = 540 Height = 350 ActivePage = TabSheet1 Align = alClient HotTrack = True TabOrder = 0 TabPosition = tpBottom OnChanging = PageControl1Changing object TabSheet1: TTabSheet Tag = 10311 Caption = 'DMEX Men�eintr�ge' object CheckListBox1: TCheckListBox Left = 0 Top = 0 Width = 532 Height = 322 OnClickCheck = CheckListBox1ClickCheck Align = alClient Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ParentFont = False TabOrder = 0 end end object TabSheet2: TTabSheet Tag = 10312 Caption = 'Verzeichnis wechseln nach' object ListBox1: TListBox Left = 0 Top = 0 Width = 532 Height = 320 Align = alClient ItemHeight = 13 PopupMenu = PopupMenu1 TabOrder = 0 OnKeyDown = ListBox1KeyDown end end object TabSheet6: TTabSheet Tag = 10324 Caption = 'FTP Seiten' object ListView2: TListView Left = 0 Top = 0 Width = 532 Height = 320 Align = alClient Columns = < item Caption = 'Name' Width = 150 end item Caption = 'Adresse' Width = 300 end item Width = 5 end> HotTrackStyles = [] PopupMenu = PopupMenu4 TabOrder = 0 ViewStyle = vsReport OnKeyDown = ListView2KeyDown end end object TabSheet3: TTabSheet Tag = 10313 Caption = 'Programme' object ListView1: TListView Left = 0 Top = 0 Width = 532 Height = 320 Align = alClient Columns = < item Caption = 'Name' Width = 120 end item Caption = 'Path' Width = 250 end item Caption = 'Directory' Width = 100 end> HotTrackStyles = [] PopupMenu = PopupMenu2 TabOrder = 0 ViewStyle = vsReport OnDblClick = ListView1DblClick OnKeyDown = ListView1KeyDown end end object TabSheet4: TTabSheet Tag = 10314 Caption = 'Optionen' object Splitter1: TSplitter Left = 313 Top = 0 Width = 3 Height = 322 Cursor = crHSplit Color = clBtnHighlight ParentColor = False end object Panel1: TPanel Left = 0 Top = 0 Width = 313 Height = 322 Align = alLeft BevelOuter = bvNone TabOrder = 0 object Label1: TLabel Tag = 10320 Left = 8 Top = 144 Width = 32 Height = 13 Caption = 'Label1' end object ALed1: TALed Left = 8 Top = 162 Width = 16 Height = 16 FalseColor = clRed Blink = False LEDStyle = LEDSqSmall end object CheckBox1: TCheckBox Tag = 10318 Left = 8 Top = 8 Width = 209 Height = 17 Caption = 'Explorer Men�eintr�ge als Submen�' TabOrder = 0 OnClick = CheckBox1Click end object CheckBox2: TCheckBox Tag = 10319 Left = 8 Top = 32 Width = 209 Height = 17 Caption = 'Bitmap neben Men� anzeigen' TabOrder = 1 OnClick = CheckBox2Click end object ComboBox1: TComboBox Left = 32 Top = 160 Width = 185 Height = 21 ItemHeight = 0 TabOrder = 2 OnChange = ComboBox1Change end object CheckBox3: TCheckBox Tag = 10326 Left = 8 Top = 56 Width = 233 Height = 17 Caption = 'Hotkey' TabOrder = 3 OnClick = CheckBox3Click end object CheckBox4: TCheckBox Tag = 10327 Left = 8 Top = 80 Width = 233 Height = 17 Caption = 'context menu' TabOrder = 4 OnClick = CheckBox4Click end object CheckBox5: TCheckBox Tag = 10328 Left = 8 Top = 104 Width = 233 Height = 17 Caption = 'double pane' TabOrder = 5 OnClick = CheckBox5Click end end object Panel2: TPanel Left = 316 Top = 0 Width = 216 Height = 322 Align = alClient BevelOuter = bvNone TabOrder = 1 object Button1: TButton Tag = 10322 Left = 14 Top = 40 Width = 195 Height = 25 Caption = 'DMEX Zusatzprogramme Hinzuf�gen' TabOrder = 0 Visible = False OnClick = Button1Click end object Button2: TButton Tag = 10321 Left = 14 Top = 8 Width = 195 Height = 25 Caption = 'Standardverzeichnisse Hinzuf�gen' TabOrder = 1 OnClick = Button2Click end object Button3: TButton Tag = 97 Left = 16 Top = 72 Width = 193 Height = 25 Caption = 'Button3' TabOrder = 2 OnClick = Button3Click end end end object TabSheet5: TTabSheet Tag = 10323 Caption = '�ber DMEX' object RichEdit1: TRichEdit Left = 0 Top = 0 Width = 532 Height = 322 TabStop = False Align = alClient Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( '--------------------------------------' 'DMEXMenu' 'Explorer Menu Extention' '--------------------------------------' 'copyright (c) 1994-2000 by Andr� R�bel' '' 'author:' 'Andr� R�bel' 'andre.ruebel@urz.uni-heidelberg.de' '' '--------------------------------------' '' 'Version:'#9#9'See statusbar for version.' 'Language:'#9'English, German (supported by author)' #9#9'Other languages by users.' ' See readme.txt for details about' + ' the contributers of other languages.' #9#9'The translation of other languages may be one or more version' + 's behind.' 'Operating System:'#9'Windows NT4 / 2000' #9#9'Windows 95 / 98 (No drive subtitution)' 'Price:'#9#9'Free' 'Contact:'#9#9'via e-mail to ' #9#9'andre.ruebel@urz.uni-heidelberg.de' '' '--------------------------------------' 'read readme.txt and manual.txt for further information' '--------------------------------------') ParentFont = False PlainText = True ReadOnly = True TabOrder = 0 WordWrap = False OnMouseUp = RichEdit1MouseUp end end end object StatusBar1: TStatusBar Left = 0 Top = 350 Width = 540 Height = 19 Panels = < item Bevel = pbNone Text = 'DMEX Menu - Explorer Menu Extention - Copyright 1989 by Andr� R�' + 'bel' Width = 50 end> SimplePanel = False end object PopupMenu1: TPopupMenu Left = 76 Top = 272 object Hinzufgen1: TMenuItem Tag = 10301 Caption = 'Verzeichnis hinzuf�gen\tStrg-Einf' OnClick = Hinzufgen1Click end object Seperatorhinzufgen1: TMenuItem Tag = 10302 Caption = 'Seperator hinzuf�gen' OnClick = Seperatorhinzufgen1Click end object N1: TMenuItem Caption = '-' end object Nachobenverschieben1: TMenuItem Tag = 10303 Caption = 'Nach oben verschieben\tStrg-Pfeil Hoch' OnClick = Nachobenverschieben1Click end object Nachuntenverschieben1: TMenuItem Tag = 10304 Caption = 'Nach unten verschiebenn\tStrg-Pfeil Runter' OnClick = Nachuntenverschieben1Click end object Eintraglschen1: TMenuItem Tag = 10305 Caption = 'Eintrag l�schen\tStrg-Entf' OnClick = Eintraglschen1Click end object N3: TMenuItem Caption = '-' end object Dateilschen1: TMenuItem Tag = 10306 Caption = 'Alle Eintr�ge l�schen' OnClick = Dateilschen1Click end object N4: TMenuItem Caption = '-' end object Menschlieen1: TMenuItem Tag = 10307 Caption = 'Men� schlie�en\tEsc' end end object BrowseFolder1: TBrowseFolder Directory = 'c:\programme' Flags = [bfFileSysDirsOnly, bfStatusText] ShowPathInStatusArea = True CustomButtonEnabled = False SyncCustomButton = False Left = 156 Top = 272 end object PopupMenu2: TPopupMenu OnPopup = PopupMenu2Popup Left = 116 Top = 272 object Hinzufgen2: TMenuItem Tag = 10308 Caption = 'Programm hinzuf�gen\tStrg-Einfg' OnClick = Hinzufgen2Click end object Arbeitsverzeichnisfestlegen1: TMenuItem Tag = 10309 Caption = 'Arbeitsverzeichnis festlegen' OnClick = Arbeitsverzeichnisfestlegen1Click end object MarkierteDateibergeben1: TMenuItem Tag = 10310 Caption = 'Markierte Datei �bergeben' OnClick = MarkierteDateibergeben1Click end object Seperatorhinzufgen2: TMenuItem Tag = 10302 Caption = 'Seperator hinzuf�gen' OnClick = Seperatorhinzufgen2Click end object N2: TMenuItem Caption = '-' end object Nachobenverschieben2: TMenuItem Tag = 10303 Caption = 'Nach oben verschieben\tStrg-Pfeil Hoch' OnClick = Nachobenverschieben2Click end object Nachuntenverschieben2: TMenuItem Tag = 10304 Caption = 'Nach unten verschieben\tStrg-Pfeil Runter' OnClick = Nachuntenverschieben2Click end object Entfernen1: TMenuItem Tag = 10305 Caption = 'Eintrag l�schen\tStrg-Entf' OnClick = Entfernen1Click end object N6: TMenuItem Caption = '-' end object ProgrammeDateilschen1: TMenuItem Tag = 10306 Caption = 'Alle Eintr�ge l�schen' OnClick = ProgrammeDateilschen1Click end object N5: TMenuItem Caption = '-' end object Menschlieen2: TMenuItem Tag = 10307 Caption = 'Men� schlie�en\tEsc' end end object OpenDialog1: TOpenDialog DefaultExt = '*.exe;*.com;*.pif;*.lnk;*.bat;*.cmd' Filter = '|*.exe;*.com;*.pif;*.lnk;*.bat;*.cmd' FilterIndex = 0 Options = [ofNoValidate, ofPathMustExist] Left = 196 Top = 272 end object PopupMenu4: TPopupMenu Left = 36 Top = 270 object Seperatorhinzufgen3: TMenuItem Tag = 10302 Caption = 'Seperator hinzuf�gen' OnClick = Seperatorhinzufgen2Click end object N7: TMenuItem Caption = '-' end object NachobenverschiebentStrgPfeilHoch1: TMenuItem Tag = 10303 Caption = 'Nach oben verschieben\tStrg-Pfeil Hoch' OnClick = Nachobenverschieben2Click end object NachuntenverschiebentStrgPfeilRunter1: TMenuItem Tag = 10304 Caption = 'Nach unten verschieben\tStrg-Pfeil Runter' OnClick = Nachuntenverschieben2Click end object EintraglschentStrgEntf1: TMenuItem Tag = 10305 Caption = 'Eintrag l�schen\tStrg-Entf' OnClick = Entfernen1Click end object N8: TMenuItem Caption = '-' end object AlleEintrgelschen1: TMenuItem Tag = 10306 Caption = 'Alle Eintr�ge l�schen' OnClick = ProgrammeDateilschen1Click end object N9: TMenuItem Caption = '-' end object MenschlieentEsc1: TMenuItem Tag = 10307 Caption = 'Men� schlie�en\tEsc' end end end