Unit mseshapes

Description

 

Overview

Classes, Interfaces, Objects and Records

Name Description
Record captioninfoty  
Record shapeinfoty  

Functions and Procedures

procedure updateedgerect(var arect: rectty; const awidth: integer; const hiddenedges: edgesty);
procedure draw3dframe(const canvas: tcanvas; const arect: rectty; level: integer; colorinfo: edgecolorpairinfoty; const hiddenedges: edgesty);
procedure drawimageframe(const canvas: tcanvas; const imagelist: timagelist; const imageoffs: int32; const dest: rectty; const hiddenedges: edgesty);
procedure drawfocusrect(const canvas: tcanvas; const arect: rectty);
procedure drawtoolbutton(const canvas: tcanvas; var info: shapeinfoty);
procedure drawbutton(const canvas: tcanvas; const info: shapeinfoty);
procedure drawmenubutton(const canvas: tcanvas; var info: shapeinfoty; const innerframe: pframety = nil);
procedure drawtab(const canvas: tcanvas; var info: shapeinfoty; const innerframe: pframety = nil);
function updatemouseshapestate(var info: shapeinfoty; const mouseevent: mouseeventinfoty; const widget: twidget; const aframe: tcustomframe; const infoarpo: pshapeinfoarty = nil; const canclick: boolean = true): boolean; overload;
function updatemouseshapestate(var infos: shapeinfoarty; const mouseevent: mouseeventinfoty; const widget: twidget; var focuseditem: integer; const aframe: tcustomframe = nil): boolean; overload;
function getmouseshape(const infos: shapeinfoarty): integer;
function updatewidgetshapestate(var info: shapeinfoty; const widget: twidget; const adisabled: boolean = false; const aframe: tcustomframe = nil): boolean;
function findshapeatpos(const infoar: shapeinfoarty; const apos: pointty; const rejectstates: shapestatesty = [shs_disabled,shs_invisible]): integer;
function pointinshape(const pos: pointty; const info: shapeinfoty): boolean;
procedure initshapeinfo(var ainfo: shapeinfoty);
procedure actioninfotoshapeinfo(var actioninfo: actioninfoty; var shapeinfo: shapeinfoty); overload;
procedure actioninfotoshapeinfo(const sender: twidget; var actioninfo: actioninfoty; var shapeinfo: shapeinfoty; const aoptions: buttonoptionsty);
procedure frameskinoptionstoshapestate(const aframe: tcustomframe; var dest: shapeinfoty);
function shapestatetoframestate(const aindex: integer; const ashapes: shapeinfoarty): framestateflagsty;
procedure checkbuttonhint(const awidget: twidget; info: mouseeventinfoty; var hintedbutton: integer; const cells: shapeinfoarty; const getbuttonhint: getbuttonhintty; const gethintpos: getbuttonhintposty);
procedure drawcaption(const acanvas: tcanvas; var ainfo: captioninfoty);
procedure initcaptioninfo(var ainfo: captioninfoty);
function calccaptionsize(const acanvas: tcanvas; const ainfo: captioninfoty; const captionframe: pframety = nil): sizety;

Types

buttonoptionty = (...);
buttonoptionsty = set of buttonoptionty;
buttonedgety = (...);
tagmouseprocty = procedure (const tag: integer; const info: mouseeventinfoty) of object;
pshapeinfoty = ˆshapeinfoty;
shapeinfoarty = array of shapeinfoty;
pshapeinfoarty = ˆshapeinfoarty;
getbuttonhintty = function(const aindex: integer): msestring of object;
getbuttonhintposty = function(const aindex: integer): rectty of object;

Constants

defaultbuttonoptions = [bo_executeonclick,bo_executeonkey, bo_executeonshortcut,bo_executedefaultonenterkey];
menuarrowwidth = 8;
menuarrowwidthhorz = 15;
menucheckboxwidth = 13;
menucheckboxheight = 13;
defaultshapecaptiondist = 2;
defaultshapefocusrectdist = 1;
defaultcaptiontextflags = [tf_left,tf_xcentered,tf_ycentered];

Description

Functions and Procedures

procedure updateedgerect(var arect: rectty; const awidth: integer; const hiddenedges: edgesty);
 
procedure draw3dframe(const canvas: tcanvas; const arect: rectty; level: integer; colorinfo: edgecolorpairinfoty; const hiddenedges: edgesty);
 
procedure drawimageframe(const canvas: tcanvas; const imagelist: timagelist; const imageoffs: int32; const dest: rectty; const hiddenedges: edgesty);
 
procedure drawfocusrect(const canvas: tcanvas; const arect: rectty);
 
procedure drawtoolbutton(const canvas: tcanvas; var info: shapeinfoty);
 
procedure drawbutton(const canvas: tcanvas; const info: shapeinfoty);
 
procedure drawmenubutton(const canvas: tcanvas; var info: shapeinfoty; const innerframe: pframety = nil);
 
procedure drawtab(const canvas: tcanvas; var info: shapeinfoty; const innerframe: pframety = nil);
 
function updatemouseshapestate(var info: shapeinfoty; const mouseevent: mouseeventinfoty; const widget: twidget; const aframe: tcustomframe; const infoarpo: pshapeinfoarty = nil; const canclick: boolean = true): boolean; overload;
 
function updatemouseshapestate(var infos: shapeinfoarty; const mouseevent: mouseeventinfoty; const widget: twidget; var focuseditem: integer; const aframe: tcustomframe = nil): boolean; overload;
 
function getmouseshape(const infos: shapeinfoarty): integer;
 
function updatewidgetshapestate(var info: shapeinfoty; const widget: twidget; const adisabled: boolean = false; const aframe: tcustomframe = nil): boolean;
 
function findshapeatpos(const infoar: shapeinfoarty; const apos: pointty; const rejectstates: shapestatesty = [shs_disabled,shs_invisible]): integer;
 
function pointinshape(const pos: pointty; const info: shapeinfoty): boolean;
 
procedure initshapeinfo(var ainfo: shapeinfoty);
 
procedure actioninfotoshapeinfo(var actioninfo: actioninfoty; var shapeinfo: shapeinfoty); overload;
 
procedure actioninfotoshapeinfo(const sender: twidget; var actioninfo: actioninfoty; var shapeinfo: shapeinfoty; const aoptions: buttonoptionsty);
 
procedure frameskinoptionstoshapestate(const aframe: tcustomframe; var dest: shapeinfoty);
 
function shapestatetoframestate(const aindex: integer; const ashapes: shapeinfoarty): framestateflagsty;
 
procedure checkbuttonhint(const awidget: twidget; info: mouseeventinfoty; var hintedbutton: integer; const cells: shapeinfoarty; const getbuttonhint: getbuttonhintty; const gethintpos: getbuttonhintposty);
 
procedure drawcaption(const acanvas: tcanvas; var ainfo: captioninfoty);
 
procedure initcaptioninfo(var ainfo: captioninfoty);
 
function calccaptionsize(const acanvas: tcanvas; const ainfo: captioninfoty; const captionframe: pframety = nil): sizety;
 

Types

buttonoptionty = (...);
 
Values
  • bo_executeonclick
  • bo_executeonkey
  • bo_executeonshortcut
  • bo_executedefaultonenterkey
  • bo_asyncexecute
  • bo_focusonshortcut
  • bo_focusonactionshortcut
  • bo_updateonidle
  • bo_shortcutcaption
  • bo_altshortcut
  • bo_nodefaultframeactive
  • bo_coloractive
  • bo_ellipsemouse
  • bo_nocandefocus
  • bo_candefocuswindow
  • bo_radioitem
  • bo_radioitemcol
  • bo_cantoggle
  • bo_resetcheckedonrowexit
  • bo_reversed
  • bo_noassistivedisabled
buttonoptionsty = set of buttonoptionty;
 
buttonedgety = (...);
 
Values
  • bedg_none
  • bedg_right
  • bedg_top
  • bedg_left
  • bedg_bottom
tagmouseprocty = procedure (const tag: integer; const info: mouseeventinfoty) of object;
 
pshapeinfoty = ˆshapeinfoty;
 
shapeinfoarty = array of shapeinfoty;
 
pshapeinfoarty = ˆshapeinfoarty;
 
getbuttonhintty = function(const aindex: integer): msestring of object;
 
getbuttonhintposty = function(const aindex: integer): rectty of object;
 

Constants

defaultbuttonoptions = [bo_executeonclick,bo_executeonkey, bo_executeonshortcut,bo_executedefaultonenterkey];
 
menuarrowwidth = 8;
 
menuarrowwidthhorz = 15;
 
menucheckboxwidth = 13;
 
menucheckboxheight = 13;
 
defaultshapecaptiondist = 2;
 
defaultshapefocusrectdist = 1;
 
defaultcaptiontextflags = [tf_left,tf_xcentered,tf_ycentered];
 

Generated by PasDoc 0.16.0.