Overview

Next

---

Shows the windows common color picker dialog and allows the user to choose a predefined color or a custom color.

Example:

'ColorDialog1 is a ColorDialog object

Sub Globals

            

End Sub

Sub App_Start

      Form1.Show

      ColorDialog1.New1

      If ColorDialog1.Show <> cCancel Then 'Make sure that the user didn't press Cancel.

            Form1.Circle(100,100,50,ColorDialog1.Color,F)

      End If

End Sub