<HTML xmlns="http://www.w3.org/TR/REC-html40" xmlns:v =
"urn:schemas-microsoft-com:vml" xmlns:o =
"urn:schemas-microsoft-com:office:office" xmlns:w =
"urn:schemas-microsoft-com:office:word" xmlns:m =
"http://schemas.microsoft.com/office/2004/12/omml"><HEAD>
<META content="text/html; charset=utf-8" http-equiv=Content-Type>
<META name=Generator content="Microsoft Word 14 (filtered medium)">
<STYLE><!--
/* Font Definitions */
@font-face
        {font-family:"MS Mincho";
        panose-1:2 2 6 9 4 2 5 8 3 4;}
@font-face
        {font-family:"MS Mincho";
        panose-1:2 2 6 9 4 2 5 8 3 4;}
@font-face
        {font-family:Calibri;
        panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
        {font-family:Tahoma;
        panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
        {font-family:"\@MS Mincho";
        panose-1:2 2 6 9 4 2 5 8 3 4;}
@font-face
        {font-family:Webdings;
        panose-1:5 3 1 2 1 5 9 6 7 3;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0cm;
        margin-bottom:.0001pt;
        font-size:12.0pt;
        font-family:"Times New Roman","serif";}
a:link, span.MsoHyperlink
        {mso-style-priority:99;
        color:blue;
        text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {mso-style-priority:99;
        color:purple;
        text-decoration:underline;}
span.EmailStyle17
        {mso-style-type:personal-reply;
        font-family:"Calibri","sans-serif";
        color:#1F497D;}
.MsoChpDefault
        {mso-style-type:export-only;
        font-family:"Calibri","sans-serif";}
@page WordSection1
        {size:612.0pt 792.0pt;
        margin:72.0pt 72.0pt 72.0pt 72.0pt;}
div.WordSection1
        {page:WordSection1;}
--></STYLE>
</HEAD>
<BODY lang=EN-US dir=ltr vLink=purple link=blue>
<DIV dir=ltr>
<DIV style="FONT-SIZE: 12pt; FONT-FAMILY: 'Calibri'; COLOR: #000000">
<DIV>Thanks, I think I had seen that one in my searches but I was wary of
both Sourceforge (used to be a great site) and that it only had 12
downloads.</DIV>
<DIV> </DIV>
<DIV>Will try it.</DIV>
<DIV
style='FONT-SIZE: small; TEXT-DECORATION: none; FONT-FAMILY: "Calibri"; FONT-WEIGHT: normal; COLOR: #000000; FONT-STYLE: normal; DISPLAY: inline'>
<DIV style="FONT: 10pt tahoma">
<DIV> </DIV>
<DIV style="BACKGROUND: #f5f5f5">
<DIV style="font-color: black"><B>From:</B> <A title=muellers@orcl-toolbox.com
href="mailto:muellers@orcl-toolbox.com">Stefan Mueller</A> </DIV>
<DIV><B>Sent:</B> Monday, December 21, 2015 6:01 PM</DIV>
<DIV><B>To:</B> <A title=delphi@listserver.123.net.nz
href="mailto:delphi@listserver.123.net.nz">'NZ Borland Developers Group - Delphi
List'</A> </DIV>
<DIV><B>Subject:</B> Re: [DUG] Resource compiler</DIV></DIV></DIV>
<DIV> </DIV></DIV>
<DIV
style='FONT-SIZE: small; TEXT-DECORATION: none; FONT-FAMILY: "Calibri"; FONT-WEIGHT: normal; COLOR: #000000; FONT-STYLE: normal; DISPLAY: inline'>
<DIV class=WordSection1>
<P class=MsoNormal><SPAN
style='FONT-SIZE: 11pt; FONT-FAMILY: "Calibri","sans-serif"; COLOR: #1f497d'>I
used this one here just recently (for embedding some transparent PNG-resources),
did the job: <o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style='FONT-SIZE: 11pt; FONT-FAMILY: "Calibri","sans-serif"; COLOR: #1f497d'><A
href="http://sourceforge.net/projects/xnreseditpe/">http://sourceforge.net/projects/xnreseditpe/</A><o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Arial","sans-serif"; COLOR: black'><o:p></o:p></SPAN> </P>
<P class=MsoNormal><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Arial","sans-serif"; COLOR: #1f497d'><o:p></o:p></SPAN> </P>
<P class=MsoNormal style="MARGIN-BOTTOM: 12pt"><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Arial","sans-serif"; COLOR: black'>Kind
regards,<BR><BR></SPAN><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Calibri","sans-serif"; COLOR: #1f497d'><o:p></o:p></SPAN></P>
<P class=MsoNormal><B><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Arial","sans-serif"; COLOR: black'>Stefan
Müller</SPAN></B><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Arial","sans-serif"; COLOR: black'>,<BR>R&D
Manager</SPAN><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Arial","sans-serif"; COLOR: #1f497d'><BR><BR></SPAN><B><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Arial","sans-serif"; BACKGROUND: red; COLOR: white'>ORCL</SPAN></B><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Calibri","sans-serif"; COLOR: #1f497d'>
</SPAN><B><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Arial","sans-serif"; COLOR: black'>Toolbox
Ltd.</SPAN></B><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Calibri","sans-serif"; COLOR: #1f497d'>
<BR></SPAN><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Arial","sans-serif"; COLOR: black'>Auckland,
New Zealand</SPAN><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Calibri","sans-serif"; COLOR: #1f497d'>
<o:p></o:p></SPAN></P>
<P class=MsoNormal
style="mso-margin-top-alt: auto; mso-margin-bottom-alt: auto"><SPAN
style="FONT-SIZE: 9pt; FONT-FAMILY: webdings; COLOR: #777777"><BR>P</SPAN><SPAN
style='FONT-SIZE: 9pt; FONT-FAMILY: "Arial","sans-serif"; COLOR: #777777'>
Please consider the environment before printing this email<BR><BR>This message
is intended for the adresse named above and may contain privileged or
confidential information.<BR>If you are not the intended recipient of this
message you must not use, copy, distribute or disclose it to
anyone.<o:p></o:p></SPAN></P>
<P class=MsoNormal><SPAN
style='FONT-SIZE: 11pt; FONT-FAMILY: "Calibri","sans-serif"; COLOR: #1f497d'><o:p></o:p></SPAN> </P>
<P class=MsoNormal><B><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Tahoma","sans-serif"'>From:</SPAN></B><SPAN
style='FONT-SIZE: 10pt; FONT-FAMILY: "Tahoma","sans-serif"'>
delphi-bounces@listserver.123.net.nz
[mailto:delphi-bounces@listserver.123.net.nz] <B>On Behalf Of </B>Jolyon
Direnko-Smith<BR><B>Sent:</B> Monday, 21 December 2015 5:32 p.m.<BR><B>To:</B>
NZ Borland Developers Group - Delphi List<BR><B>Subject:</B> Re: [DUG] Resource
compiler<o:p></o:p></SPAN></P>
<P class=MsoNormal><o:p></o:p> </P>
<DIV>
<P class=MsoNormal>Oops, download links on that page for reseditor appear not to
go anywhere anymore. :(<o:p></o:p></P></DIV>
<DIV>
<P class=MsoNormal><o:p></o:p> </P>
<DIV>
<P class=MsoNormal>On 21 December 2015 at 17:29, Jolyon Direnko-Smith <<A
href="mailto:jsmith@deltics.co.nz" target=_blank>jsmith@deltics.co.nz</A>>
wrote:<o:p></o:p></P>
<DIV>
<P class=MsoNormal>You could use <A href="http://melander.dk/reseditor/"
target=_blank>http://melander.dk/reseditor/</A><o:p></o:p></P>
<DIV>
<P class=MsoNormal><o:p></o:p> </P></DIV>
<DIV>
<P class=MsoNormal>Or you can use any tool capable of creating/editing ICO files
and simply write a resource script (*.rc) to incorporate the icons into a *.res
file as required. Delphi will compile the *.rc file for you though I don't
recall off-hand whether you declare it as {$R filename.rc} or {$R filename.res}
(with the IDE picking up the RC file by association with the common stem in the
filename) but I'm sure there is documentation somewhere that will clarify on
that point.<BR><BR>Either way tho I would use a separate, dedicated and
additional resource file rather than the one linked to the DPR filename (if you
aren't already) to avoid the IDE trampling over it.<o:p></o:p></P></DIV>
<DIV>
<P class=MsoNormal><o:p></o:p> </P></DIV>
<DIV>
<P class=MsoNormal>hth<o:p></o:p></P></DIV></DIV>
<DIV>
<P class=MsoNormal><o:p></o:p> </P>
<DIV>
<DIV>
<DIV>
<P class=MsoNormal>On 21 December 2015 at 17:21, John Bird <<A
href="mailto:johnkbird@paradise.net.nz"
target=_blank>johnkbird@paradise.net.nz</A>>
wrote:<o:p></o:p></P></DIV></DIV>
<BLOCKQUOTE
style="BORDER-TOP: medium none; BORDER-RIGHT: medium none; BORDER-BOTTOM: medium none; PADDING-BOTTOM: 0cm; PADDING-TOP: 0cm; PADDING-LEFT: 6pt; MARGIN-LEFT: 4.8pt; BORDER-LEFT: #cccccc 1pt solid; PADDING-RIGHT: 0cm; MARGIN-RIGHT: 0cm">
<DIV>
<DIV>
<DIV>
<DIV>
<DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'>D2007, and one of my
oldest programs uses a resource file with a couple of icon images for the
application and I want to add a couple more.<o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'>The Old Program used
to have 2 states I showed via different taskbar icons, now it has
4.<o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'> <o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'>Problem – I cannot
recall how I originally edited the resource, and D2007 does not seem to have
any tools to do it.<o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'>Resource was
originally created at least 2 Delphi versions and 2-3 PCs ago and whatever I
used I don’t have now.<o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'>I have also D10
Seattle in case it helps...<o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'> <o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'>The alternative is
to put the icons into an image list and use these to change the application
icon, but I am not sure if the image list holds icons OK and if this works
until I try it.<o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'> <o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'>I know later Delphi
such as Seattle has snazzy tools extensions around Application icon and
toolbar buttons etc.<o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'> <o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'>Any quick advice on
the simplest and most painless way to do this would be
appreciated.<o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'> <o:p></o:p></SPAN></P></DIV></DIV>
<DIV>
<DIV>
<P class=MsoNormal><SPAN
style='FONT-FAMILY: "Calibri","sans-serif"; COLOR: black'> <o:p></o:p></SPAN></P></DIV></DIV></DIV></DIV></DIV>
<P class=MsoNormal><o:p></o:p> </P></DIV></DIV>
<P class=MsoNormal>_______________________________________________<BR>NZ
Borland Developers Group - Delphi mailing list<BR>Post: <A
href="mailto:delphi@listserver.123.net.nz"
target=_blank>delphi@listserver.123.net.nz</A><BR>Admin: <A
href="http://delphi.org.nz/mailman/listinfo/delphi"
target=_blank>http://delphi.org.nz/mailman/listinfo/delphi</A><BR>Unsubscribe:
send an email to <A href="mailto:delphi-request@listserver.123.net.nz"
target=_blank>delphi-request@listserver.123.net.nz</A> with Subject:
unsubscribe<o:p></o:p></P></BLOCKQUOTE></DIV>
<P class=MsoNormal><o:p></o:p> </P></DIV></DIV>
<P class=MsoNormal><o:p></o:p> </P></DIV></DIV>
<P>
<HR>
_______________________________________________<BR>NZ Borland Developers Group -
Delphi mailing list<BR>Post: delphi@listserver.123.net.nz<BR>Admin:
http://delphi.org.nz/mailman/listinfo/delphi<BR>Unsubscribe: send an email to
delphi-request@listserver.123.net.nz with Subject:
unsubscribe</DIV></DIV></DIV></BODY></HTML>