Documentation component by D.Glodt (c)2002-2003 Appendix A: QAbout

QAbout Component

QAbout is a dialog box "About" showing the name,version,author of an application,email link and web link.


QAbout Properties
Field Type R/W Défault
Caption STRING R/W
Title of  dialog box
Name STRING R/W
Application name
AppVersion STRING R/W
Version and révision of application
Image QIMAGE R/W
Icone or image of application
Text STRING R/W
Text of application for copyright and other
Email STRING R/W
Link e-mail adress , example:"dominique.glodt@libertysurf.fr"
Web STRING R/W
Link web page ,example:"www.allapi.net"
AppFont QFONT R/W
TextFont QFONT R/W
EmailFont QFONT R/W
WebFont QFONT R/W

QAbout Methods
Method Type Description Params
Show SUB Show the dialog box

QAbout Events
Event Type Occurs when... Params

QAbout Examples
$TYPECHECK ON
$include "object\qabout.inc"
 

$resource ico as "icone.ico"
declare sub routine1
dim about as QAbout

create form as QFORM
  width=300
  height=200
  center
  onclick=routine1
end create

form.showmodal

sub routine1
  about.AppFont.color=&h007700
  about.AppFont.bold=1
  about.Appname="Platforme"
  about.Appversion="1.02"
  about.caption="A propos de "+about.Appname
  about.text="Auteur:Glodt dominique"+chr$(13)+"Copyright(c)software 2000-2002  "
  about.image.icohandle=ico
  about.email="dominique.glodt@libertysurf.fr"
  about.web="www.allapi.net"
  about.show
end sub