{* * @(#) sdesigne.txt - System Designer program ('edit box' form description). * (c) 1997 Ivan Maidanski http://ivmai.chat.ru * Freeware program source. All rights reserved. ** * Language: Delphi Form textual description * Tested with: Borland Delphi DeskTop 2.01 for Windows 95 * Last modified: 1997-04-16 16:25:00 GMT+04:00 *} object ModifyForm: TModifyForm Left = 100 Top = 150 ActiveControl = EditDataBox BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Edit String' ClientHeight = 148 ClientWidth = 457 Font.Color = clBlack Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] OnActivate = BoxActivate PixelsPerInch = 120 TextHeight = 16 object ValueNameLabel: TLabel Left = 8 Top = 9 Width = 82 Height = 16 Caption = 'Value &name:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsItalic] ParentFont = False end object ValueDataLabel: TLabel Left = 8 Top = 64 Width = 75 Height = 16 Caption = 'Value &data:' Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsItalic] ParentFont = False end object EditNameBox: TEdit Left = 5 Top = 30 Width = 450 Height = 24 AutoSelect = False Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] HideSelection = False MaxLength = 128 ParentColor = True ParentFont = False ReadOnly = True TabOrder = 3 end object OKButton: TBitBtn Left = 280 Top = 120 Width = 80 Height = 25 TabOrder = 1 Kind = bkOK Margin = 2 Spacing = -1 end object CancelButton: TBitBtn Left = 375 Top = 120 Width = 80 Height = 25 TabOrder = 2 Kind = bkCancel Margin = 2 Spacing = -1 end object EditDataBox: TEdit Left = 5 Top = 85 Width = 450 Height = 21 AutoSelect = False Font.Color = clBlack Font.Height = -11 Font.Name = 'Times New Roman' Font.Style = [fsBold] HideSelection = False MaxLength = 255 ParentFont = False TabOrder = 0 end end