|
Last change
on this file since 924 was 830, checked in by Kevin Toppenberg, 14 years ago |
|
Upgrading to version 27
|
|
File size:
1.2 KB
|
| Rev | Line | |
|---|
| [456] | 1 | inherited frmRename: TfrmRename
|
|---|
| 2 | Left = 376
|
|---|
| 3 | Top = 317
|
|---|
| 4 | Caption = 'Rename'
|
|---|
| [830] | 5 | ClientHeight = 109
|
|---|
| 6 | ClientWidth = 316
|
|---|
| [456] | 7 | OnCreate = FormCreate
|
|---|
| [830] | 8 | ExplicitWidth = 324
|
|---|
| 9 | ExplicitHeight = 136
|
|---|
| [456] | 10 | PixelsPerInch = 96
|
|---|
| 11 | TextHeight = 13
|
|---|
| [830] | 12 | object lblRename: TLabel [0]
|
|---|
| [456] | 13 | Left = 8
|
|---|
| 14 | Top = 20
|
|---|
| 15 | Width = 63
|
|---|
| 16 | Height = 13
|
|---|
| 17 | Caption = 'Rename Item'
|
|---|
| 18 | end
|
|---|
| [830] | 19 | object txtName: TCaptionEdit [1]
|
|---|
| [456] | 20 | Left = 8
|
|---|
| 21 | Top = 34
|
|---|
| 22 | Width = 300
|
|---|
| 23 | Height = 21
|
|---|
| 24 | TabOrder = 0
|
|---|
| 25 | Caption = 'Rename Item'
|
|---|
| 26 | end
|
|---|
| [830] | 27 | object cmdOK: TButton [2]
|
|---|
| [456] | 28 | Left = 156
|
|---|
| 29 | Top = 80
|
|---|
| 30 | Width = 72
|
|---|
| 31 | Height = 21
|
|---|
| 32 | Caption = 'OK'
|
|---|
| 33 | Default = True
|
|---|
| 34 | TabOrder = 1
|
|---|
| 35 | OnClick = cmdOKClick
|
|---|
| 36 | end
|
|---|
| [830] | 37 | object cmdCancel: TButton [3]
|
|---|
| [456] | 38 | Left = 236
|
|---|
| 39 | Top = 80
|
|---|
| 40 | Width = 72
|
|---|
| 41 | Height = 21
|
|---|
| 42 | Cancel = True
|
|---|
| 43 | Caption = 'Cancel'
|
|---|
| 44 | TabOrder = 2
|
|---|
| 45 | OnClick = cmdCancelClick
|
|---|
| 46 | end
|
|---|
| [830] | 47 | inherited amgrMain: TVA508AccessibilityManager
|
|---|
| 48 | Data = (
|
|---|
| 49 | (
|
|---|
| 50 | 'Component = txtName'
|
|---|
| 51 | 'Status = stsDefault')
|
|---|
| 52 | (
|
|---|
| 53 | 'Component = cmdOK'
|
|---|
| 54 | 'Status = stsDefault')
|
|---|
| 55 | (
|
|---|
| 56 | 'Component = cmdCancel'
|
|---|
| 57 | 'Status = stsDefault')
|
|---|
| 58 | (
|
|---|
| 59 | 'Component = frmRename'
|
|---|
| 60 | 'Status = stsDefault'))
|
|---|
| 61 | end
|
|---|
| [456] | 62 | end
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
