| 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
| Prev Component | Contents | Next Component |