# Gambas Form File 1.0

{ Form Form
  MoveScaled(15,28,60,54)
  'Move(120,224,480,432)
  Text = ("Generate Gambas code")
  Border = Window.Fixed
  { Panel1 Panel
    MoveScaled(1,8,58,9)
    'Move(8,64,464,72)
    Background = &HFFFFDF&
    Border = Border.Etched
    { TextLabel1 TextLabel
      MoveScaled(6,1,50,7)
      'Move(48,8,400,56)
      Text = ("This dialog allows you to generate a <b>Gambas</b> procedure that will initialize the structure of your database.")
    }
    { PictureBox1 PictureBox
      MoveScaled(1,1,4,4)
      'Move(8,8,32,32)
      Picture = Picture["icon:/32/info"]
    }
  }
  { lblTitle Label
    MoveScaled(1,1,51,5)
    'Move(8,8,408,40)
    Font = Font["16,Bold"]
    Text = ("Generate Gambas code")
  }
  { imgIcon PictureBox
    MoveScaled(53,1,6,6)
    'Move(424,8,48,48)
    Picture = Picture["icon:/48/gambas"]
  }
  { Label1 Label
    MoveScaled(2,24,19,3)
    'Move(16,192,152,24)
    Text = ("Database")
  }
  { Label2 Label
    MoveScaled(2,21,19,3)
    'Move(16,168,152,24)
    Text = ("Server")
  }
  { lblServer Label
    MoveScaled(20,21,39,3)
    'Move(160,168,312,24)
    Text = ("")
  }
  { lblDatabase Label
    MoveScaled(20,24,39,3)
    'Move(160,192,312,24)
    Text = ("")
  }
  { Label3 Label
    MoveScaled(2,31,18,3)
    'Move(16,248,144,24)
    Text = ("Name")
  }
  { lblModule Label
    MoveScaled(2,37,17,3)
    'Move(16,296,136,24)
    Text = ("Module")
  }
  { txtModule TextBox
    MoveScaled(20,37,39,3)
    'Move(160,296,312,24)
    Text = ("")
  }
  { Label4 Label
    MoveScaled(2,41,17,3)
    'Move(16,328,136,24)
    Text = ("Procedure")
  }
  { txtProcedure TextBox
    MoveScaled(20,41,39,3)
    'Move(160,328,312,24)
    Text = ("")
  }
  { chkUpdate CheckBox
    MoveScaled(2,45,57,3)
    'Move(16,360,456,24)
    Text = ("Update at database close.")
  }
  { btnGenerate Button
    MoveScaled(30,50,14,3)
    'Move(240,400,112,24)
    Text = ("Generate")
  }
  { btnClose Button
    MoveScaled(45,50,14,3)
    'Move(360,400,112,24)
    Text = ("Close")
    Cancel = True
  }
  { lblProject TextLabel
    MoveScaled(20,31,39,5)
    'Move(160,248,312,40)
    Text = ("")
  }
  { Label5 Label
    MoveScaled(1,18,25,3)
    'Move(8,144,200,24)
    Font = Font["Bold"]
    Text = ("Database")
  }
  { Label6 Label
    MoveScaled(1,28,25,3)
    'Move(8,224,200,24)
    Font = Font["Bold"]
    Text = ("Project")
  }
}