fpastedatabase.form

Gambas is a graphical development environment based on a Basic interpreter, like Visual Basic. It us

# Gambas Form File 1.0

{ FPasteDatabase Form
  Move(345,231,439,369)
  Text = ("Duplicate database")
  Border = Window.Fixed
  { Label1 Label
    Move(8,56,384,24)
    Font = Font["Bold"]
    Text = ("Source")
  }
  { Label3 Label
    Move(16,192,112,24)
    Text = ("Name")
  }
  { txtName TextBox
    Move(136,192,296,24)
    Text = ("")
  }
  { optCopyData RadioButton
    Move(16,256,376,24)
    Text = ("Copy structure &and data")
  }
  { optCopyDef RadioButton
    Move(16,232,376,24)
    Text = ("Copy &structure only")
    Value = True
  }
  { lblTitle Label
    Move(8,8,368,40)
    Font = Font["16,Bold"]
    Text = ("Duplicate database")
  }
  { imgIcon PictureBox
    Move(384,8,48,48)
    Picture = Picture["img/32/database-copy.png"]
    Stretch = True
  }
  { btnOK Button
    Move(200,336,112,24)
    Text = ("Duplicate")
    Default = True
  }
  { btnCancel Button
    Move(320,336,112,24)
    Text = ("Close")
    Cancel = True
  }
  { Label2 Label
    Move(8,144,384,24)
    Font = Font["Bold"]
    Text = ("Destination")
  }
  { pgbPaste ProgressBar
    Move(8,296,424,24)
  }
  { Label4 Label
    Move(16,80,112,24)
    Text = ("Connection")
  }
  { Label5 Label
    Move(16,104,112,24)
    Text = ("Database")
  }
  { lblSrcServer Label
    Move(136,80,288,24)
    Text = ("")
  }
  { lblSrcDatabase Label
    Move(136,104,288,24)
    Text = ("")
  }
  { Label6 Label
    Move(16,168,112,24)
    Text = ("Connection")
  }
  { lblDstServer Label
    Move(136,168,296,24)
    Text = ("")
  }
}