fpastetable.form

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

# Gambas Form File 1.0

{ FPasteTable Form
  Move(254,140,400,410)
  Text = ("Duplicate table")
  Border = Window.Fixed
  { Label1 Label
    Move(8,56,384,24)
    Font = Font["Bold"]
    Text = ("Source")
  }
  { Label3 Label
    Move(16,232,112,24)
    Text = ("Name")
  }
  { txtName TextBox
    Move(136,232,256,24)
    Text = ("")
  }
  { optCopyData RadioButton
    Move(16,296,376,24)
    Text = ("Copy structure &and data")
  }
  { optCopyDef RadioButton
    Move(16,272,376,24)
    Text = ("Copy &structure only")
    Value = True
  }
  { lblTitle Label
    Move(8,8,328,40)
    Font = Font["16,Bold"]
    Text = ("Duplicate table")
  }
  { imgIcon PictureBox
    Move(344,8,48,48)
    Picture = Picture["img/32/table-copy.png"]
    Stretch = True
  }
  { btnOK Button
    Move(160,376,112,24)
    Text = ("Duplicate")
    Default = True
  }
  { btnCancel Button
    Move(280,376,112,24)
    Text = ("Close")
    Cancel = True
  }
  { Label2 Label
    Move(8,160,384,24)
    Font = Font["Bold"]
    Text = ("Destination")
  }
  { pgbPaste ProgressBar
    Move(8,336,384,24)
  }
  { Label4 Label
    Move(16,80,112,24)
    Text = ("Connection")
  }
  { Label5 Label
    Move(16,104,112,24)
    Text = ("Database")
  }
  { lblSrcServer Label
    Move(136,80,256,24)
    Text = ("")
  }
  { lblSrcDatabase Label
    Move(136,104,256,24)
    Text = ("")
  }
  { Label6 Label
    Move(16,184,112,24)
    Text = ("Connection")
  }
  { lblDstServer Label
    Move(136,184,256,24)
    Text = ("")
  }
  { Label7 Label
    Move(16,128,112,24)
    Text = ("Table")
  }
  { lblSrcTable Label
    Move(136,128,256,24)
    Text = ("")
  }
  { Label8 Label
    Move(16,208,112,24)
    Text = ("Database")
  }
  { lblDstDatabase Label
    Move(136,208,256,24)
    Text = ("")
  }
}