object Form1: TForm1 Left = 396 Height = 615 Top = 83 Width = 646 Caption = 'Schematic Builder for LTspice' ClientHeight = 615 ClientWidth = 646 OnActivate = FormActivate OnChangeBounds = FormShow OnClose = FormClose OnCreate = FormCreate OnPaint = FormShow OnShow = FormShow LCLVersion = '1.0.4.0' object PageControl1: TPageControl Left = 0 Height = 615 Top = 0 Width = 646 ActivePage = BldSht Align = alClient ParentFont = False TabIndex = 2 TabOrder = 0 OnChanging = PageControl1Changing object CfgSht: TTabSheet Caption = 'Set Up' ClientHeight = 589 ClientWidth = 638 ParentShowHint = False object CfgMemo: TMemo Left = 0 Height = 539 Top = 50 Width = 638 Align = alClient BorderSpacing.Top = 50 Lines.Strings = ( 'Symbol folder: "C:\Program Files\LTC\LTspiceIV\lib\sym"' 'Grid Spacing: Text=2 Symbols=12 '#9'Symbols/Row=5 (inline only) '#9'Max Rows=15 (inline only)' '' 'ID ID2'#9#9'*.asy'#9'folder'#9#9'center'#9'nets'#9'pin offsets (in grid units)' '-- ----'#9#9'------'#9'------'#9#9'------'#9'----'#9'-----------------------------' 'A and'#9#9'and'#9'digital'#9#9' 0,4'#9'8'#9'-2,2 -2,3 -2,4 -2,5 -2,6 2,5 2,3 -1,6' 'A buf'#9#9'buf'#9'digital'#9#9' 2,4'#9'8'#9'0,4 , , , , 4,5 4,3 0,6' 'A dflop'#9#9'dflop'#9'digital'#9#9' 0,4'#9'8'#9'-5,3 , -5,6 0,0 0,9 5,3 6,6 -5,9' 'A modulator'#9'modulate2 specialfunctions'#9' 4,2'#9'8'#9'0,0 0,4 , , , 9,4 9,0 0,6' 'A or'#9#9'or'#9'digital'#9#9' 0,4'#9'8'#9'-2,2 -2,3 -2,4 -2,5 -2,6 2,5 2,3 -1,6' 'A phasedet'#9'phidet'#9'digital'#9#9' 2,0'#9'8'#9'-2,-1 -2,1 , , , , 6,0 -2,3' 'A samplehold'#9'sample'#9'specialfunctions'#9' 0,1'#9'8'#9'-5,-2 -5,0 -5,2 -5,4 , , 6,1 -5,6' 'A schmitt'#9#9'diffschmitt digital'#9#9' 2,4'#9'8'#9'0,3 0,5 , , , 4,5 4,3 0,6' 'A srflop'#9#9'srflop'#9'digital'#9#9' 0,4'#9'8'#9'-3,3 -3,6 , , , 4,6 3,3 -3,8' 'A varistor '#9'varistor'#9'specialfunctions'#9'-1,4'#9'8'#9'-2,3 -2,5 , , , , -1,2 -1,6' 'A xor'#9#9'xor'#9'digital'#9#9' 0,4'#9'8'#9'-3,2 -3,3 -3,4 -3,5 -3,6 2,5 1,3 -1,6' 'B i='#9#9'bi'#9'.'#9#9' 0,2'#9'2'#9'0,0 0,5' 'B v='#9#9'bv'#9'.'#9#9' 0,3'#9'2'#9'0,1 0,6' 'C'#9'.'#9'cap'#9'.'#9#9' 1,2'#9'2'#9'1,0 1,4' 'D'#9'.'#9'diode'#9'.'#9#9' 1,2'#9'2'#9'1,0 1,4' 'E poly'#9#9'epoly'#9'misc'#9#9' 0,3'#9'2'#9'0,1 0,6' 'E table'#9#9'epoly'#9'misc'#9#9' 0,3'#9'2'#9'0,1 0,6' 'E value'#9#9'epoly'#9'misc'#9#9' 0,3'#9'2'#9'0,1 0,6' 'E'#9'.'#9'e'#9'.'#9#9' 0,3'#9'4'#9'0,1 0,6 -3,2 -3,5' 'F'#9'.'#9'f'#9'.'#9#9' 0,2'#9'2'#9'0,0 0,5' 'G poly'#9#9'gpoly'#9'misc'#9#9' 0,3'#9'2'#9'0,1 0,6' 'G table'#9#9'gpoly'#9'misc'#9#9' 0,3'#9'2'#9'0,1 0,6' 'G value'#9#9'gpoly'#9'misc'#9#9' 0,3'#9'2'#9'0,1 0,6' 'G'#9'.'#9'g'#9'.'#9#9' 0,3'#9'4'#9'0,6 0,1 -3,2 -3,5' 'H'#9'.'#9'h'#9'.'#9#9' 0,3'#9'2'#9'0,1 0,6' 'I'#9'.'#9'current'#9'.'#9#9' 0,2'#9'2'#9'0,0 0,5' 'J ^pjf'#9#9'pjf'#9'.'#9#9' 1,3'#9'3'#9'3,0 0,4 3,6' 'J ^njf'#9#9'njf'#9'.'#9#9' 1,3'#9'3'#9'3,0 0,4 3,6' 'J'#9'.'#9'njf'#9'.'#9#9' 1,3'#9'3'#9'3,0 0,4 3,6' '* K is a SPICE text directive' 'L'#9'.'#9'ind'#9'.'#9#9' 1,3'#9'2'#9'1,1 1,6' 'M ^pmos '#9'pmos'#9'.'#9#9' 1,3'#9'4'#9'3,0 0,5 3,6 ,' 'M ^pchan'#9'pmos'#9'.'#9#9' 1,3'#9'4'#9'3,0 0,5 3,6 ,' 'M ^nmos'#9#9'nmos'#9'.'#9#9' 1,3'#9'4'#9'3,0 0,5 3,6 ,' 'M'#9'.'#9'nmos'#9'.'#9#9' 1,3'#9'4'#9'3,0 0,5 3,6 ,' '* N is not used' 'O'#9'.'#9'ltline'#9'.'#9#9' 0,0'#9'4'#9'-3,-1 3,-1 -3,1 3,1' '* P is not used' 'Q ^pnp'#9#9'pnp'#9'.'#9#9' 3,3'#9'4'#9'4,0 0,3 4,6 ,' 'Q ^npn'#9#9'npn'#9'.'#9#9' 3,3'#9'4'#9'4,0 0,3 4,6 ,' 'Q 2n2907'#9'pnp'#9'.'#9#9' 3,3'#9'4'#9'4,0 0,3 4,6 ,' 'Q 2n3906'#9'pnp'#9'.'#9#9' 3,3'#9'4'#9'4,0 0,3 4,6 ,' 'Q 2n4403'#9'pnp'#9'.'#9#9' 3,3'#9'4'#9'4,0 0,3 4,6 ,' 'Q 2n5401'#9'pnp'#9'.'#9#9' 3,3'#9'4'#9'4,0 0,3 4,6 ,' 'Q'#9'.'#9'npn'#9'.'#9#9' 3,3'#9'4'#9'4,0 0,3 4,6 ,' 'R'#9'.'#9'res'#9'.'#9#9' 1,3'#9'2'#9'1,1 1,6' 'S'#9'.'#9'sw'#9'.'#9#9' 0,3'#9'4'#9'0,1 0,6 -3,2 -3,5' 'T'#9'.'#9'tline'#9'.'#9#9' 0,0'#9'4'#9'-3,-1 3,-1 -3,1 3,1' 'U'#9'.'#9'urc'#9'misc'#9#9' 0,3'#9'3'#9'1,1 1,5 -1,3' 'V'#9'.'#9'voltage'#9'.'#9#9' 0,3'#9'2'#9'0,1 0,6' 'W'#9'.'#9'csw'#9'.'#9#9' 0,2'#9'2'#9'0,0 0,5' '* X (for now, subcircuits are placed as SPICE text)' '* Y is not used' 'Z'#9'.'#9'mesfet'#9'.'#9#9' 1,3'#9'3'#9'3,0 0,5 3,6' '' '* NOTES: ^ = look in .model for keyname pointed to. Table data must be lower case. All pin data can be derived from symbol files.' '' '--------------------------------------------------------------------------------------------' '* Schematic Optimization Node Name Interpretation (Note: # = any number)' '*' '* Node Name'#9'Ntype' '| 0'#9#9'Port' '| Vb'#9#9'Top' '| Vc'#9#9'Top' '| Vd'#9#9'Top' '| V+'#9#9'Top' '| #V'#9#9'Top' '| +#V'#9#9'Top' '| +#'#9#9'Top' '| Ve'#9#9'Bot' '| Vs'#9#9'Bot' '| V-'#9#9'Bot' '| -#V'#9#9'Bot' '| -#'#9#9'Bot' '| in'#9#9'Left' '| a'#9#9'Rht' '| out'#9#9'Rht' '| load'#9#9'Rht' ) OnChange = CfgMemoChange ParentFont = False ScrollBars = ssAutoBoth TabOrder = 0 WantTabs = True WordWrap = False end object CfgLoadBtn: TButton AnchorSideLeft.Control = CfgSht AnchorSideTop.Control = CfgSht Left = 0 Height = 23 Hint = 'To reload the default values, first rename or delete the configuration file from the program exe folder.' Top = 0 Width = 49 AutoSize = True Caption = 'Load' OnClick = CfgLoadBtnClick ParentShowHint = False ShowHint = True TabOrder = 1 end object CfgSaveBtn: TButton AnchorSideLeft.Control = CfgLoadBtn AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = CfgLoadBtn Left = 49 Height = 23 Hint = 'Save the configuration file to the program exe folder (as SchBuilder.cfg).' Top = 0 Width = 50 AutoSize = True Caption = 'Save' OnClick = CfgSaveBtnClick ParentShowHint = False ShowHint = True TabOrder = 2 end object CfgSaveLbl: TLabel AnchorSideLeft.Control = CfgSaveBtn AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = CfgSaveBtn AnchorSideTop.Side = asrCenter Left = 104 Height = 14 Top = 4 Width = 132 BorderSpacing.Around = 5 Caption = '(not loaded - using default)' ParentColor = False end object CfgBrowseBtn: TButton AnchorSideLeft.Control = CfgLoadBtn AnchorSideTop.Control = CfgLoadBtn AnchorSideTop.Side = asrBottom Left = 0 Height = 23 Hint = 'Browse for the folder containing LTspice symbols.' Top = 23 Width = 61 AutoSize = True Caption = 'Browse' OnClick = CfgBrowseBtnClick ParentShowHint = False ShowHint = True TabOrder = 3 Visible = False end object CfgBrowseLbl: TLabel AnchorSideLeft.Control = CfgBrowseBtn AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = CfgBrowseBtn AnchorSideTop.Side = asrCenter Left = 66 Height = 14 Top = 27 Width = 199 BorderSpacing.Around = 5 Caption = 'ERROR: LTspice symbol folder not found!' ParentColor = False Visible = False end end object NetSht: TTabSheet Caption = 'Netlist' ClientHeight = 589 ClientWidth = 638 ParentShowHint = False object NetMemo: TMemo Left = 0 Height = 565 Top = 24 Width = 638 Align = alClient BorderSpacing.Top = 24 Lines.Strings = ( 'Netlist Input Sheet - LTspice test netlist shown below:' '' '* C:\Program Files\LTC\LTspiceIV\examples\Educational\audioamp.asc' 'V3 IN 0 SINE(0 .7 1K)' 'R1 1 IN 5K' 'Q1 4 1 3 0 2N3904' 'R2 +10V 4 200' 'R3 3 -10V 1K' 'Q2 +10V 2 3 0 2N3904' 'C1 5 4 10p' 'R4 5 4 9K' 'R5 6 5 1K' 'R6 2 0 5K' 'R7 B 2 50K' 'V4 A B AC 1' 'C2 8 6 100p' 'Q3 8 6 7 0 2N3906' 'R8 +10V 7 100' 'R9 8 9 2K' 'R10 9 10 1K' 'R11 10 -10V 5K' 'Q4 8 9 10 0 2N3904' 'C3 8 10 .001µ' 'Q5 +10V 8 11 0 2N3904' 'Q6 12 10 A 0 2N3906' 'R12 11 A 1K' 'R13 12 -10V 1K' 'Q7 +10V 11 A 0 2N2219A' 'Q8 A 12 -10V 0 2N2219A' 'V1 +10V 0 10' 'V2 -10V 0 -10' 'R14 A 0 8' '.tran 10m' '.options maxstep=10u' '* .ac oct 10 1 100Meg' '* To look at gain and phase margins:\n i) comment the .tran line\n ii) uncomment the .ac line\n iv) re-run the simulation\n iii) plot V(A)/V(B)' '* This example schematic is supplied for informational/educational purposes only.' '.fourier 1K V(a)' '* <-- To see the output of a .four statement, select View=>Spice Error Log' '.end' ) OnChange = NetMemoChange ScrollBars = ssAutoBoth TabOrder = 0 WantTabs = True WordWrap = False end object NetBtn: TButton AnchorSideLeft.Control = NetSht AnchorSideTop.Control = NetSht Left = 0 Height = 23 Hint = 'Choose and load the SPICE netlist to be used for building an LTspice ASCII schematic.' Top = 0 Width = 52 AutoSize = True Caption = 'Open' OnClick = NetBtnClick ParentShowHint = False ShowHint = True TabOrder = 1 end object NetLbl: TLabel AnchorSideLeft.Control = NetBtn AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = NetBtn AnchorSideTop.Side = asrCenter Left = 57 Height = 14 Top = 4 Width = 60 BorderSpacing.Around = 5 Caption = '(not loaded)' ParentColor = False end end object BldSht: TTabSheet Caption = ' Build' ClientHeight = 587 ClientWidth = 638 ParentShowHint = False object BldMemo: TMemo AnchorSideRight.Side = asrBottom AnchorSideBottom.Side = asrBottom Left = 0 Height = 540 Top = 47 Width = 638 Align = alClient BorderSpacing.Top = 47 Lines.Strings = ( 'Schematic Build Progress Sheet' '' 'Press "Block" or "Inline" to initiate build (and then select Schematic Tab to view/save the ASCII schematic).' '' ) ReadOnly = True ScrollBars = ssAutoBoth TabOrder = 0 WantTabs = True WordWrap = False end object BlockBtn: TButton AnchorSideLeft.Control = BldSht AnchorSideTop.Control = BldSht Left = 0 Height = 25 Hint = '(re)Builds a Block style schematic file with each press.' Top = 0 Width = 55 AutoSize = True Caption = 'Block' OnClick = BldBtnClick ParentShowHint = False ShowHint = True TabOrder = 1 end object BlockLbl: TLabel AnchorSideLeft.Control = BlockBtn AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = BlockBtn AnchorSideTop.Side = asrCenter Left = 60 Height = 16 Top = 4 Width = 451 BorderSpacing.Around = 5 Caption = 'Places all symbols in a single block (best for netlists created from a drawn schematic).' ParentColor = False end object InlineBtn: TButton AnchorSideLeft.Control = BldSht AnchorSideTop.Control = BlockBtn AnchorSideTop.Side = asrBottom Left = 0 Height = 25 Hint = '(re)Builds an Inline style schematic file with each press.' Top = 25 Width = 55 AutoSize = True Caption = 'Inline' OnClick = BldBtnClick ParentShowHint = False ShowHint = True TabOrder = 2 end object InlineLbl: TLabel AnchorSideLeft.Control = InlineBtn AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = InlineBtn AnchorSideTop.Side = asrCenter Left = 60 Height = 16 Top = 29 Width = 435 BorderSpacing.Around = 5 Caption = 'Places symbols inline with netlist text (best for handmade, commented subciruits).' ParentColor = False end end object AnlSht: TTabSheet Caption = 'Anneal' ClientHeight = 587 ClientWidth = 638 object AnlMemo: TMemo Left = 0 Height = 540 Top = 47 Width = 638 Align = alClient BorderSpacing.Top = 47 Lines.Strings = ( 'NType'#9'Net Name'#9#9'Linked'#9'Symbols' '--------'#9'--------'#9#9'--------'#9'--------' '??'#9'??'#9#9'0'#9'??' '--------'#9'--------'#9#9'--------'#9'--------' 'Total:'#9'0'#9#9'0'#9'0' '' 'NType Key '#9'Connectivity'#9'Optimization Weighting' '------------'#9'---------------'#9'---------------------------' 'Net:'#9#9'node to node '#9'horizontal and vertical length' 'Left:'#9#9'left edge '#9'horizontal length only' 'Rht:'#9#9'right edge '#9'horizontal length only' 'Top:'#9#9'top edge '#9'vertical length only' 'Bot:'#9#9'bottom edge '#9'vertical length only' 'Port:'#9#9'port flags '#9'zero length (ignored)' '' 'Schematic Symbol Field: H x V' ' +'#9'- -'#9'- -'#9'- -'#9'- -'#9'- -'#9'+' ' :'#9#9#9#9#9#9':' ' :'#9#9#9#9#9#9':' ' :'#9#9' H+1 x V+1'#9#9#9':' ' :'#9#9#9#9#9#9':' ' :'#9#9#9#9#9#9':' ' +'#9'- -'#9'- -'#9'- -'#9'- -'#9'- -'#9'+' '' 'Total net length: 0' ) ScrollBars = ssAutoBoth TabOrder = 0 WantTabs = True WordWrap = False end object AnalyzeBtn: TButton AnchorSideLeft.Control = AnlSht AnchorSideTop.Control = AnlSht Left = 0 Height = 25 Hint = 'Display netlist connectivity statistics.' Top = 0 Width = 67 AutoSize = True Caption = 'Analyze' OnClick = AnnealBtnClick ParentShowHint = False ShowHint = True TabOrder = 1 end object OptimizeBtn: TButton AnchorSideLeft.Control = AnlSht AnchorSideTop.Control = AnalyzeBtn AnchorSideTop.Side = asrBottom Left = 0 Height = 25 Hint = 'Adjust relative symbol placement for minimum overall net length.' Top = 25 Width = 74 AutoSize = True Caption = 'Optimize' Enabled = False OnClick = AnnealBtnClick ParentShowHint = False ShowHint = True TabOrder = 2 end object AnalyzeLbl: TLabel AnchorSideLeft.Control = AnalyzeBtn AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = AnalyzeBtn AnchorSideTop.Side = asrCenter Left = 72 Height = 16 Top = 4 Width = 193 BorderSpacing.Around = 5 Caption = 'Display netlist connectivity statistics.' ParentColor = False end object OptimizeLbl: TLabel AnchorSideLeft.Control = OptimizeBtn AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = OptimizeBtn AnchorSideTop.Side = asrCenter Left = 79 Height = 16 Top = 29 Width = 349 BorderSpacing.Around = 5 Caption = 'Adjust relative symbol placement for minimum overall net length.' Enabled = False ParentColor = False end end object SchSht: TTabSheet Caption = 'Schematic' ClientHeight = 589 ClientWidth = 638 ParentShowHint = False object SchMemo: TMemo Left = 0 Height = 565 Top = 24 Width = 638 Align = alClient BorderSpacing.Top = 24 Lines.Strings = ( 'LTspice ASCII Schematic Build Sheet' ) OnChange = SchMemoChange ScrollBars = ssAutoBoth TabOrder = 0 WantTabs = True WordWrap = False end object SchBtn: TButton AnchorSideLeft.Control = SchSht AnchorSideTop.Control = SchSht Left = 0 Height = 23 Hint = 'Opens a File-Save-Menu for this LTspice schematic.' Top = 0 Width = 50 AutoSize = True Caption = 'Save' OnClick = SchBtnClick ParentShowHint = False ShowHint = True TabOrder = 1 end object SchLbl: TLabel AnchorSideLeft.Control = SchBtn AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = SchBtn AnchorSideTop.Side = asrCenter Left = 55 Height = 14 Top = 4 Width = 57 BorderSpacing.Around = 5 Caption = '(not saved)' ParentColor = False end end object HlpSht: TTabSheet Caption = 'About' ClientHeight = 587 ClientWidth = 625 ParentShowHint = False object HlpMemo: TMemo AnchorSideLeft.Control = HlpSht AnchorSideTop.Control = HlpLbl AnchorSideTop.Side = asrBottom AnchorSideRight.Control = HlpSht AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = HlpSht AnchorSideBottom.Side = asrBottom Left = 1 Height = 537 Top = 49 Width = 623 Align = alClient BorderSpacing.Around = 1 BorderStyle = bsNone Lines.Strings = ( ' This program reads symbol data from its configuration file, loads a user selected standard SPICE netlist and then attempts to build an LTspice ASCII schematic file. LTspice symbol names, designators, pin locations and other data are stored within the ASCII configuration file. Symbol data may be edited to correct or add entries. This file may then be saved and reopened. It also is automatically loaded upon program start (delete or rename to revert to defaults). The netlist may be edited prior to starting a schematic build. Once a schematic has been created, it also may be edited and then saved as a standard LTspice ASCII schematic file.' '' ' As components are generated, they are placed upon the schematic in rows per their order of appearance in the netlist. Wires are not generated, but net connectivity is maintained via net labels attached to the component pins. Per user selection, SPICE text directives and text comments either will be placed in a column below the symbols or will be placed as encountered intermixed with the symbols (best for well-ordered and commented subcircuits originally created as text). Any symbols not recognized (e.g., subcircuits) are placed as a line of SPICE text as well. The completed schematic should be able to run with identical connectivity to the original netlist.' '' ' Many component types have a variety of symbols. Diodes, for example, may be shown as Zener, Schottky and varactor as well as the standard symbol. Since these all have the same basic polarity, no attempt is made account for slightly differing symbol types. However, for most types of transistors (BJTs, JFETs, MOSFETs, etc.), symbol polarity is important. Unfortunately, device polarity information is contained within device model statements that may be located on-schematic or in libraries or in data files and is not directly available on the individual netlist entry for these types of components. Presently a model statement tree search is not implemented, so the positive polarity symbol is always selected when no contrary data is available. However, negative polarity devices may be entered individually within the configuration file. (Note: to be recognized, these must precede the default positive symbol entry.)' '' ' Possible other future refinements include:' '' '• Generate a sorted list of net names by connection count and change to a flagged type port net label for the most common nets.' '' '• Perhaps implement a search and replace function for ease in renaming awkwardly named nets.' '' '• Rotate components so that GND and negative supply pins are down and positive supply pins are up.' '' '• Use "synthetic annealing" to reposition components for shortest total length of remaining "air wires."' '' '• Fill in "air wires" adding bends as necessary to avoid misconnections.' '' '' ' Designer Notes: ' '' '• Symbol pin grid is 16 pixels whereas schematic text grid is 8 pixels (not used). XY positive grid polarity is to the right and down. ' '' '• A-devices contain their own identifying sub type (ID2) within their symbols as a SpiceModel attribute, therefore this data, although necessary for initial netlist identification, must be suppressed from the Value field when generating a schematic file. A-device default ground connections are also suppressed.' '' '• Only freely published, openly available, unencrypted information was used in making this program. The source code was written in Lazarus (the open-source Delphi/Pascal clone) and is available from the author upon request.' ) ReadOnly = True ScrollBars = ssAutoVertical TabOrder = 0 WantTabs = True WordWrap = False end object HlpLbl: TLabel AnchorSideLeft.Control = HlpSht AnchorSideTop.Control = HlpSht AnchorSideRight.Control = HlpSht AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = HlpMemo AnchorSideBottom.Side = asrBottom Left = 2 Height = 31 Hint = 'by analog@ieee.org - 2012' Top = 12 Width = 621 Align = alTop Alignment = taCenter Anchors = [akTop] BorderSpacing.Top = 10 BorderSpacing.Bottom = 4 BorderSpacing.Around = 2 Caption = 'Netlist to Schematic Builder for LTspice ' Font.Height = -21 Font.Style = [fsBold, fsItalic] ParentColor = False ParentFont = False ParentShowHint = False ShowHint = True end object RevLbl: TLabel AnchorSideRight.Control = HlpLbl AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = HlpLbl AnchorSideBottom.Side = asrBottom Left = 569 Height = 16 Top = 22 Width = 44 Anchors = [akRight, akBottom] BorderSpacing.Right = 5 BorderSpacing.Around = 5 Caption = 'Rev: 1.1' Font.Style = [fsBold, fsItalic] ParentColor = False ParentFont = False end end end object SelectDirectoryDialog1: TSelectDirectoryDialog left = 408 top = 65528 end object OpenDialog1: TOpenDialog left = 432 top = 65528 end object SaveDialog1: TSaveDialog left = 456 top = 65528 end end