-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathcmenu.html
183 lines (178 loc) · 7.17 KB
/
cmenu.html
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
---
layout: "codelib-tplt"
group: lib
priority: 200
version: "1.2"
release-date: "2008-08-17"
platforms: ["Win32"]
frameworks: ["IDE"]
compatibility: "Delphi 4 & later"
title: "Colour Pop-up Menu Component"
precis: "Pop-up menu to component display a colour palette"
summary: "A pop-up menu component that displays the basic Windows colours in a menu or palette. Includes a component editor and demo."
meta-desc: "NO LONGER SUPPORTED: Delphi Pascal pop-up menu component that displays the basic Windows colours in a menu or palette. Requires Delphi 4 & later."
want-header-buttons: false
status: "mothballed"
---
{% assign dl-file = page.dl-file-prefix | append: page.version | append: ".zip" %}
{% assign dl-url = page.download-base-url | append: dl-file %}
<section class="panel panel-warning">
<div class="panel-heading">
<h2 class="panel-title">
Mothballed
</h2>
</div>
<div class="panel-body">
<p class="lead">
Development of <em>{{ page.title }}</em> is frozen.
</p>
<p>
This component was originally written back in 2001 when I needed a simple colour menu component for an app I was writing. That was in the pre-XP, pre-themes days. The component has never been updated to adopt the "modern" (XP & later) look and feel, so now it looks rather dated.
</p>
<p>
I have no further need for the component and it would be quite a lot of work to make it themes-aware. Given that there are much better colour menu components out there, it just doesn't seem worth the effort. So I've decided to abandon the project.
</p>
<p>
If you want to take on maintenance please go ahead. The download section below provides everything you need.
</p>
<p class="alert alert-warning lead glyph">
There is no support available for <em>{{ page.title }}</em>. Please do not report any bugs or request new features.
</p>
</div>
</section>
<section class="panel panel-default">
<div class="panel-heading">
<h2 class="panel-title">
Overview
</h2>
</div>
<div class="panel-body">
<p>
The colour menu component, <em>TPJColourPopupMenu</em>, is an open source non-visual component that descends from <em>TPopupMenu</em>. It implements a pop-up menu that gives access to the 16 basic Windows colours. The menu can be displayed over one, two, four or eight columns. It can also be displayed in one of the four following styles:
</p>
<ul>
<li>
<em>Text only</em> – the menu displays just the name of each colour.
</li>
<li>
<em>Text and colour</em> – the menu displays the colour name along with a small bitmap illustrating the colour.
</li>
<li>
<em>Colour only</em> – colour swatches are displayed without any text (like a palette).
</li>
<li>
<em>Owner draw</em> – the user provides code that draws the menu items.
</li>
</ul>
<p>
The colour names are in English. However, it is easy to provide names in other languages or use Delphi colour identifiers etc. This is done by handling one of the component's events. The accompanying demo program shows how to do this.
</p>
<p>
Here are three examples of how the menu can appear:
</p>
<div class="container-fluid">
<div class="row">
<div class="col-md-4 text-smallcaps text-center em">
<p class="condensed-bottom">
Colour only
</p>
<p class="condensed small">
(4 columns)
</p>
<p>
<img class="scale center-block" src="{{ site.data.core.software-images-base-url}}/cmenu-1.gif" alt="Screenshot of TPJColourPopupMenu text only example" title="TPJColourPopupMenu text only example" />
</p>
</div>
<div class="col-md-4 text-smallcaps text-center em">
<p class="condensed-bottom">
Text and Colour
</p>
<p class="condensed small">
(2 columns)
</p>
<p>
<img class="scale center-block" src="{{ site.data.core.software-images-base-url}}/cmenu-3.gif" alt="Screenshot of TPJColourPopupMenu colour only example" title="TPJColourPopupMenu colour only example" />
</p>
</div>
<div class="col-md-4 text-smallcaps text-center">
<p class="condensed-bottom">
Text only
</p>
<p class="condensed small">
(2 columns)
</p>
<p>
<img class="scale center-block" src="{{ site.data.core.software-images-base-url}}/cmenu-2.gif" alt="Screenshot of TPJColourPopupMenu text and colour example" title="TPJColourPopupMenu text and colour example" />
</p>
</div>
</div>
</div>
<p>
Included with the component in the download are:
</p>
<ul class="wide">
<li>
<p>
A demo project showing how to use the component.
</p>
</li>
<li>
<p>
Two property editors required by the component – one to prevent editing of the <em>Items</em> property and the other to limit the <em>SelectedColour</em> property to 16 basic colours.
</p>
</li>
<li>
<p>
A component editor (accessed from a mouse menu when the component is selected) that gives easy access to all the component's main properties. Here is a screenshot of the component editor:
</p>
<p>
<img class="scale center-block" src="{{ site.data.core.software-images-base-url}}/cmenu-4.gif" alt="Screenshot of colour menu component editor" title="Colour menu component editor" />
</p>
</li>
<li>
<p>
A legacy WinHelp help file that can only be integrated with the IDE in Delphi 7 and earlier. <a href="/articles/article-15">This article</a> explains how to do it.
</p>
<p class="alert alert-danger glyph">
WinHelp is an optional download for Windows Vista through to Windows 8.1 and can't be installed at all on Windows 10 and later.
</p>
</li>
</ul>
</div>
</section>
<section class="panel panel-default">
<div class="panel-heading">
<h2 class="panel-title">
Get The Code
</h2>
</div>
<div class="panel-body">
<p>
The <em>{{page.title}}</em> source code is archived in the <a href="https://github.com/ddab-archive/cmenu"><strong>ddab-archive/cmenu</strong></a> repository on GitHub. The read-me file of that project explains how to get source code and the final release.
</p>
</div>
</section>
<section class="panel panel-default">
<div class="panel-heading">
<h2 class="panel-title">
Installation
</h2>
</div>
<div class="panel-body">
<p>
Information about how to install the component can be found in <code><a href="https://htmlpreview.github.io/?https://github.com/ddab-archive/cmenu/blob/main/Docs/ReadMe.htm">Docs/ReadMe.htm</a></code> in the archived Git repository.
</p>
</div>
</section>
<section class="panel panel-default">
<div class="panel-heading">
<h2 class="panel-title">
License
</h2>
</div>
<div class="panel-body">
<p>
<span class="fa fa-copyright fa-pull-left fa-3x"></span> The <em>{{page.title}}</em> is open source. It is copyright © 2001-2008 by <a href="https://en.gravatar.com/delphidabbler" aria-label="Peter Johnson's Gravatar account">Peter Johnson</a>. The source code is made available under the terms of the <a href="https://www.mozilla.org/MPL/1.1/" aria-label="Mozilla Public License v1.1 on mozilla.org">Mozilla Public License v1.1</a>. All relevant trademarks are acknowledged.
</p>
</div>
</section>