|
Last change
on this file since 1665 was 460, checked in by Kevin Toppenberg, 17 years ago |
|
Uploading from OR_30_258
|
|
File size:
1.8 KB
|
| Rev | Line | |
|---|
| [460] | 1 | object frmODMedOIFA: TfrmODMedOIFA
|
|---|
| 2 | Left = 0
|
|---|
| 3 | Top = 0
|
|---|
| 4 | Width = 313
|
|---|
| [459] | 5 | Height = 205
|
|---|
| 6 | Caption = 'Formulary Alternatives'
|
|---|
| [460] | 7 | Color = clBtnFace
|
|---|
| 8 | Font.Charset = DEFAULT_CHARSET
|
|---|
| 9 | Font.Color = clWindowText
|
|---|
| 10 | Font.Height = -11
|
|---|
| 11 | Font.Name = 'MS Sans Serif'
|
|---|
| 12 | Font.Style = []
|
|---|
| 13 | FormStyle = fsStayOnTop
|
|---|
| 14 | OldCreateOrder = True
|
|---|
| 15 | Position = poMainFormCenter
|
|---|
| 16 | OnClose = FormClose
|
|---|
| [459] | 17 | OnCreate = FormCreate
|
|---|
| [460] | 18 | OnShow = FormShow
|
|---|
| [459] | 19 | PixelsPerInch = 96
|
|---|
| 20 | TextHeight = 13
|
|---|
| 21 | object Label1: TLabel
|
|---|
| [460] | 22 | Left = 0
|
|---|
| 23 | Top = 0
|
|---|
| 24 | Width = 305
|
|---|
| [459] | 25 | Height = 13
|
|---|
| [460] | 26 | Align = alTop
|
|---|
| [459] | 27 | Caption = 'The selected drug is not in the formulary. Alternatives are:'
|
|---|
| 28 | end
|
|---|
| 29 | object Label2: TStaticText
|
|---|
| [460] | 30 | Left = 0
|
|---|
| 31 | Top = 134
|
|---|
| 32 | Width = 305
|
|---|
| [459] | 33 | Height = 17
|
|---|
| [460] | 34 | Align = alBottom
|
|---|
| [459] | 35 | Caption = 'Do you wish to use the selected alternative instead?'
|
|---|
| [460] | 36 | TabOrder = 1
|
|---|
| [459] | 37 | end
|
|---|
| 38 | object lstFormAlt: TORListBox
|
|---|
| [460] | 39 | Left = 0
|
|---|
| 40 | Top = 13
|
|---|
| 41 | Width = 305
|
|---|
| 42 | Height = 121
|
|---|
| 43 | Align = alClient
|
|---|
| [459] | 44 | ItemHeight = 13
|
|---|
| 45 | ParentShowHint = False
|
|---|
| 46 | ShowHint = True
|
|---|
| 47 | TabOrder = 0
|
|---|
| 48 | OnClick = lstFormAltClick
|
|---|
| 49 | Caption = 'The selected drug is not in the formulary. Alternatives are:'
|
|---|
| 50 | ItemTipColor = clWindow
|
|---|
| 51 | LongList = False
|
|---|
| 52 | Pieces = '2'
|
|---|
| 53 | end
|
|---|
| [460] | 54 | object btnPanel: TPanel
|
|---|
| 55 | Left = 0
|
|---|
| 56 | Top = 151
|
|---|
| 57 | Width = 305
|
|---|
| 58 | Height = 27
|
|---|
| 59 | Align = alBottom
|
|---|
| 60 | BevelOuter = bvNone
|
|---|
| 61 | TabOrder = 3
|
|---|
| 62 | object cmdYes: TButton
|
|---|
| 63 | Left = 74
|
|---|
| 64 | Top = 3
|
|---|
| 65 | Width = 72
|
|---|
| 66 | Height = 21
|
|---|
| 67 | Caption = 'Yes'
|
|---|
| 68 | Default = True
|
|---|
| 69 | Enabled = False
|
|---|
| 70 | TabOrder = 0
|
|---|
| 71 | OnClick = cmdYesClick
|
|---|
| 72 | end
|
|---|
| 73 | object cmdNo: TButton
|
|---|
| 74 | Left = 162
|
|---|
| 75 | Top = 3
|
|---|
| 76 | Width = 72
|
|---|
| 77 | Height = 21
|
|---|
| 78 | Cancel = True
|
|---|
| 79 | Caption = 'No'
|
|---|
| 80 | TabOrder = 1
|
|---|
| 81 | OnClick = cmdNoClick
|
|---|
| 82 | end
|
|---|
| [459] | 83 | end
|
|---|
| 84 | end
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.