Changeset 14 for trunk


Ignore:
Timestamp:
04/07/10 17:07:23 (14 years ago)
Author:
pinwc4
Message:

Hide delete profile button unless a profile is selected

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/desktop/mainWindow.rbfrm

    r13 r14  
    138138      Top             =   32 
    139139      Underline       =   "" 
    140       Value           =   2 
     140      Value           =   1 
    141141      Visible         =   True 
    142142      Width           =   637 
     
    312312            Top             =   142 
    313313            Underline       =   "" 
    314             Visible         =   True 
    315             Width           =   88 
    316          End 
    317          Begin PushButton PushButton_Save 
    318             AutoDeactivate  =   True 
    319             Bold            =   "" 
    320             Cancel          =   "" 
    321             Caption         =   "Save" 
    322             Default         =   "" 
    323             Enabled         =   True 
    324             Height          =   20 
    325             HelpTag         =   "" 
    326             Index           =   -2147483648 
    327             InitialParent   =   "GroupBox1" 
    328             Italic          =   "" 
    329             Left            =   226 
    330             LockBottom      =   "" 
    331             LockedInPosition=   False 
    332             LockLeft        =   "" 
    333             LockRight       =   "" 
    334             LockTop         =   "" 
    335             Scope           =   0 
    336             TabIndex        =   3 
    337             TabPanelIndex   =   2 
    338             TabStop         =   True 
    339             TextFont        =   "System" 
    340             TextSize        =   0 
    341             Top             =   142 
    342             Underline       =   "" 
    343             Visible         =   True 
     314            Visible         =   False 
    344315            Width           =   88 
    345316         End 
     
    30803051                  if me.Text <> "" then 
    30813052                    PushButton_SaveProfile.Visible = true 
     3053                    PushButton_Delete.Visible = true 
    30823054                  end if 
    30833055                End Sub 
     
    31103082                Sub Action() 
    31113083                  ICSSerialPort1.deleteProfile(PopupMenu_Profile.Text) 
    3112                 End Sub 
    3113         #tag EndEvent 
    3114 #tag EndEvents 
    3115 #tag Events PushButton_Save 
    3116         #tag Event 
    3117                 Sub Action() 
    3118                   ICSSerialPort1.saveProfile(PopupMenu_Profile.Text) 
    31193084                End Sub 
    31203085        #tag EndEvent 
Note: See TracChangeset for help on using the changeset viewer.