fuser.form

来自「Gambas is a graphical development enviro」· FORM 代码 · 共 58 行

# Gambas Form File 1.0

{ FUser Form
  Move(390,277,345,241)
  Text = ("")
  Border = Window.Fixed
  { Image1 PictureBox
    Move(288,8,48,48)
    Picture = Picture["img/32/users.png"]
    Stretch = True
  }
  { lblTitle Label
    Move(8,8,264,40)
    Font = Font["16,Bold"]
    Text = ("")
  }
  { Label1 Label
    Move(16,64,120,24)
    Text = ("Server")
  }
  { txtServer TextBox
    Move(144,64,192,24)
    Text = ("")
    ReadOnly = True
  }
  { Label2 Label
    Move(16,96,120,24)
    Text = ("Name")
  }
  { txtName TextBox
    Move(144,96,192,24)
    Text = ("")
  }
  { Label3 Label
    Move(16,128,120,24)
    Text = ("Password")
  }
  { txtPassword TextBox
    Move(144,128,192,24)
    Text = ("")
    Password = True
  }
  { chkAdmin CheckBox
    Move(16,168,304,24)
    Text = ("This user is a database administrator")
  }
  { btnOK Button
    Move(152,208,88,24)
    Text = ("OK")
    Default = True
  }
  { btnCancel Button
    Move(248,208,88,24)
    Text = ("Cancel")
    Cancel = True
  }
}