fabout.form

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

# Gambas Form File 1.0

{ Fabout Form
  Move(189,179,409,218)
  Text = ("About Program")
  Border = Window.Fixed
  { svwAuthor ScrollView
    Move(36,44,368,128)
    Border = Border.Etched
    ScrollBar = Scroll.None
    { TextLabel1 TextLabel
      Move(16,512,328,232)
      Text = ("<p><font size=+2><b>Rizky Tahara Shita</b></font></p>\n<blockquote>\nMain developer<br>\n<a href='mailto:[e-mail]'>[e-mail]</u>\n</blockquote>")
    }
    { TextLabel2 TextLabel
      Move(16,224,312,240)
      Text = ("<h2 align=center>Licence</h1>\n\n<p align=center>This program is FREE SOFTWARE; you can redistribute it AND/OR modify it under the terms of the GNU General Public License as published by the Free Software Foundation ; either version 1, or (at your option) any later version.</p>\n\n<p align=center>This program is distributed in the hope that it will be useful but WITHOUT ANY WARRANTY; without even the implied warranty of  MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.</p>\n")
    }
    { TextLabel3 TextLabel
      Move(24,468,320,32)
      Text = ("<h2 align=center>Authors</h2>\n")
      Alignment = Align.Center
    }
    { lblversion TextLabel
      Move(16,116,320,24)
      Text = ("\n")
      Alignment = Align.Center
    }
    { lblprgname TextLabel
      Move(24,152,316,52)
      Font = Font["16,Bold,Underline"]
      Foreground = &H983232&
      Text = ("About")
    }
  }
  { timAuthor #Timer
    #X = 352
    #Y = 84
    Enabled = True
    Delay = 30
  }
  { Button1 Button
    Move(316,180,84,32)
    Text = ("&Close")
    Picture = Picture["pic/button_cance.png"]
    Cancel = True
  }
  { Label1 Label
    Move(0,0,408,32)
    Font = Font["16,Bold,Underline"]
    Background = &HD6D6D6&
    Text = ("  About ")
    Alignment = Align.Right
  }
}