object TbEdit: TTbEdit Left = 207 Top = 119 Width = 626 Height = 417 Caption = 'Daten eingeben' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop PixelsPerInch = 96 TextHeight = 13 object Panel1: TPanel Left = 0 Top = 0 Width = 618 Height = 37 Align = alTop BevelOuter = bvNone TabOrder = 0 object Bevel1: TBevel Left = 0 Top = 35 Width = 618 Height = 2 Align = alBottom end object Label2: TLabel Left = 8 Top = 12 Width = 68 Height = 13 Caption = 'Beschreibung:' end object Bes: TEdit Left = 128 Top = 8 Width = 441 Height = 21 TabOrder = 0 Text = 'Bes' end end object Panel2: TPanel Left = 0 Top = 37 Width = 618 Height = 353 Align = alClient BevelOuter = bvNone BorderWidth = 3 Caption = 'Panel2' TabOrder = 1 object Panel3: TPanel Left = 572 Top = 3 Width = 43 Height = 347 Align = alRight BevelOuter = bvNone TabOrder = 0 object BEButton1: TBEButton Left = 8 Top = 8 Hint = 'OK' Glyph.Data = { 7E010000424D7E01000000000000760000002800000016000000160000000100 0400000000000801000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777777007777777777777777777777007777777777777777777777007777 7777777777777777770077777770077777777777770077777702207777777777 77007777702222077777777777007777022222207777777777007770222A2222 077777777700777222A7A222077777777700777A2A777A222077777777007777 A77777A222077777770077777777777A222077777700777777777777A2220777 77007777777777777A222077770077777777777777A222077700777777777777 777A220777007777777777777777A227770077777777777777777A7777007777 7777777777777777770077777777777777777777770077777777777777777777 7700} GlyphLeft = -1 GlyphTop = -1 Pressed = False ShowHint = True OnClick = BEButton1Click end object BEButton2: TBEButton Left = 8 Top = 38 Hint = 'Abbrechen' Glyph.Data = { 66010000424D6601000000000000760000002800000014000000140000000100 040000000000F000000000000000000000001000000000000000000000000000 BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777777700007777711111111177777700007777199999999917777700007771 9999999999917777000077199999999999991777000071999999999999999177 000019999999999999999917000019FFF99F99FFF9F9991700001999F99F99F9 F9F99917000019FFF99F99F9F9FFF917000019F9999F99F9F9F9F917000019FF F9FFF9FFF9FFF917000019999999999999999917000019999999999999999917 0000719999999999999991770000771999999999999917770000777199999999 9991777700007777199999999917777700007777711111111177777700007777 77777777777777770000} GlyphLeft = -1 GlyphTop = -1 Pressed = False ShowHint = True OnClick = BEButton2Click end object bSize: TPanel Left = 4 Top = 156 Width = 37 Height = 181 BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 0 object Image2: TImage Left = 8 Top = 28 Width = 25 Height = 77 Picture.Data = {} end object OrgSize: TCheckBox Left = 12 Top = 12 Width = 20 Height = 17 TabOrder = 0 OnClick = OrgSizeClick end end end object Panel4: TPanel Left = 3 Top = 3 Width = 569 Height = 347 Align = alClient BevelOuter = bvNone BorderWidth = 3 TabOrder = 1 object Nb: TNotebook Left = 3 Top = 3 Width = 563 Height = 341 Align = alClient TabOrder = 0 object TPage Left = 0 Top = 0 Caption = 'Texteintrag' object Memo1: TMemo Left = 0 Top = 0 Width = 563 Height = 341 Align = alClient Lines.Strings = ( 'Memo1') TabOrder = 0 end end object TPage Left = 0 Top = 0 Caption = 'Bildeintrag' object GroupBox1: TGroupBox Left = 8 Top = 8 Width = 549 Height = 53 Caption = ' Dateiangaben' TabOrder = 0 object Label3: TLabel Left = 20 Top = 24 Width = 28 Height = 13 Caption = 'Datei:' end object FName: TEdit Left = 56 Top = 20 Width = 389 Height = 21 TabOrder = 0 OnChange = FNameChange end object Button1: TButton Left = 448 Top = 20 Width = 21 Height = 21 Caption = '...' TabOrder = 1 OnClick = Button1Click end object Button2: TButton Left = 468 Top = 20 Width = 73 Height = 21 Caption = '�bernehmen' TabOrder = 2 OnClick = Button2Click end end object GroupBox2: TGroupBox Left = 8 Top = 68 Width = 549 Height = 265 Caption = ' Vorschau ' TabOrder = 1 object Label8: TLabel Left = 140 Top = 116 Width = 266 Height = 20 Caption = 'Eine Vorschau ist leider nicht m�glich.' Font.Charset = DEFAULT_CHARSET Font.Color = clMaroon Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Vorschau: TPanel Left = 2 Top = 15 Width = 545 Height = 248 Align = alClient BevelInner = bvLowered BevelOuter = bvNone BorderWidth = 4 TabOrder = 0 Visible = False object Image1: TImage Left = 5 Top = 5 Width = 535 Height = 238 Align = alClient AutoSize = True end end end end object TPage Left = 0 Top = 0 Caption = 'Internet-Adresse' object Label4: TLabel Left = 24 Top = 28 Width = 28 Height = 13 Caption = 'URL: ' end object URL: TEdit Left = 60 Top = 24 Width = 489 Height = 21 TabOrder = 0 Text = 'URL' end end object TPage Left = 0 Top = 0 Caption = 'Programm Starten' object Label5: TLabel Left = 28 Top = 24 Width = 50 Height = 13 Caption = 'Programm:' end object Label6: TLabel Left = 28 Top = 60 Width = 88 Height = 13 Caption = 'Arbeitsverzeichnis:' end object Label7: TLabel Left = 28 Top = 132 Width = 53 Height = 13 Caption = 'Anzeigeart:' end object Label1: TLabel Left = 28 Top = 96 Width = 51 Height = 13 Caption = 'Parameter:' end object Prg: TEdit Left = 124 Top = 20 Width = 401 Height = 21 TabOrder = 0 Text = 'Prg' end object Dir: TEdit Left = 124 Top = 56 Width = 425 Height = 21 TabOrder = 1 Text = 'Dir' end object ShStyle: TComboBox Left = 124 Top = 128 Width = 193 Height = 21 Style = csDropDownList ItemHeight = 13 Items.Strings = ( 'Normal' 'Maximiert' 'Minimiert') TabOrder = 2 end object Arg: TEdit Left = 124 Top = 92 Width = 425 Height = 21 TabOrder = 3 Text = 'Arg' end object Button3: TButton Left = 528 Top = 20 Width = 21 Height = 21 Caption = '...' TabOrder = 4 OnClick = Button3Click end end end end end object OpenD: TOpenDialog DefaultExt = '*.bmp' Filter = 'Windows Bitmap (*.bmp)|*.bmp|Windows Icon (*.ico)|*.ico|Erweiter' + 'te Windows Metadateien (*.ewf)|*.ewf|Windows Metadateien|*.wmf' Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist] Title = 'Datei f�r die Clipboard-Funktion ausw�hlen' Left = 580 Top = 126 end object ExeOpen: TOpenDialog DefaultExt = '*.exe' Filter = 'Ausf�hrbare Datei (*.exe)|*.exe|Com-Datei (*.com)|*.com' InitialDir = 'C:\' Title = 'Programm w�hlen....' Left = 580 Top = 152 end end