Rapid-Q Documentation by William Yu (c)1999 | Appendix A: QFONTDIALOG |
|
Field | Type | R/W | Default |
|
|
|
|
Color | INTEGER | RW | |
FontCount | INTEGER | R | |
FontName | ARRAY of STRING | R | |
MaxFontSize | INTEGER | RW | |
MinFontSize | INTEGER | RW | |
Name | STRING | RW | |
Size | INTEGER | RW |
Method | Type | Description | Params |
|
|
|
|
AddStyles | SUBI | Add styles [bold, italic, etc] | INTEGER, Infinite |
DelStyles | SUBI | Delete styles [bold, italic, etc] | INTEGER, Infinite |
AddOptions | SUBI | Add options [fdLimitSize, fdNoSizeSel, etc.] | INTEGER, Infinite |
DelOptions | SUBI | Delete options [fdNoStyleSel, fdScalableOnly, etc.] | INTEGER, Infinite |
Execute | FUNCTION | Returns TRUE or FALSE | 0 |
GetFont | SUB GetFont(F AS QFONT) | Get font attributes | 1 |
SetFont | SUB SetFont(F AS QFONT) | Set font attributes | 1 |
Event | Type | Occurs when... | Params |
|
|
|
|
OnApply | VOID | User clicks on apply button | 0 |
'-- Simple demo DIM FontDialog AS QFontDialog DIM Font AS QFont Font.Name = "Arial" FontDialog.GetFont(Font) IF FontDialog.Execute THEN ShowMessage "You selected "+FontDialog.Name FontDialog.SetFont(Font) END IF