<html xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:st1="urn:schemas-microsoft-com:office:smarttags" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=Windows-1252">
<meta name=ProgId content=Word.Document>
<meta name=Generator content="Microsoft Word 10">
<meta name=Originator content="Microsoft Word 10">
<link rel=File-List href="cid:filelist.xml@01C4041E.10270860">
<o:SmartTagType namespaceuri="urn:schemas-microsoft-com:office:smarttags"
name="place"/>
<!--[if gte mso 9]><xml>
<o:OfficeDocumentSettings>
<o:DoNotRelyOnCSS/>
</o:OfficeDocumentSettings>
</xml><![endif]--><!--[if gte mso 9]><xml>
<w:WordDocument>
<w:SpellingState>Clean</w:SpellingState>
<w:GrammarState>Clean</w:GrammarState>
<w:DocumentKind>DocumentEmail</w:DocumentKind>
<w:EnvelopeVis/>
<w:Compatibility>
<w:BreakWrappedTables/>
<w:SnapToGridInCell/>
<w:WrapTextWithPunct/>
<w:UseAsianBreakRules/>
<w:UseFELayout/>
</w:Compatibility>
<w:BrowserLevel>MicrosoftInternetExplorer4</w:BrowserLevel>
</w:WordDocument>
</xml><![endif]--><!--[if !mso]>
<style>
st1\:*{behavior:url(#default#ieooui) }
</style>
<![endif]-->
<style>
<!--
/* Font Definitions */
@font-face
{font-family:SimSun;
panose-1:2 1 6 0 3 1 1 1 1 1;
mso-font-alt:\5B8B\4F53;
mso-font-charset:134;
mso-generic-font-family:auto;
mso-font-pitch:variable;
mso-font-signature:3 135135232 16 0 262145 0;}
@font-face
{font-family:"\@SimSun";
panose-1:2 1 6 0 3 1 1 1 1 1;
mso-font-charset:134;
mso-generic-font-family:auto;
mso-font-pitch:variable;
mso-font-signature:3 135135232 16 0 262145 0;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{mso-style-parent:"";
margin:0cm;
margin-bottom:.0001pt;
mso-pagination:widow-orphan;
font-size:12.0pt;
font-family:"Times New Roman";
mso-fareast-font-family:SimSun;}
a:link, span.MsoHyperlink
{color:blue;
text-decoration:underline;
text-underline:single;}
a:visited, span.MsoHyperlinkFollowed
{color:purple;
text-decoration:underline;
text-underline:single;}
span.EmailStyle17
{mso-style-type:personal-compose;
mso-style-noshow:yes;
mso-ansi-font-size:10.0pt;
mso-bidi-font-size:10.0pt;
font-family:Arial;
mso-ascii-font-family:Arial;
mso-hansi-font-family:Arial;
mso-bidi-font-family:Arial;
color:windowtext;}
span.SpellE
{mso-style-name:"";
mso-spl-e:yes;}
span.GramE
{mso-style-name:"";
mso-gram-e:yes;}
@page Section1
{size:612.0pt 792.0pt;
margin:72.0pt 90.0pt 72.0pt 90.0pt;
mso-header-margin:35.4pt;
mso-footer-margin:35.4pt;
mso-paper-source:0;}
div.Section1
{page:Section1;}
-->
</style>
<!--[if gte mso 10]>
<style>
/* Style Definitions */
table.MsoNormalTable
{mso-style-name:"Table Normal";
mso-tstyle-rowband-size:0;
mso-tstyle-colband-size:0;
mso-style-noshow:yes;
mso-style-parent:"";
mso-padding-alt:0cm 5.4pt 0cm 5.4pt;
mso-para-margin:0cm;
mso-para-margin-bottom:.0001pt;
mso-pagination:widow-orphan;
font-size:10.0pt;
font-family:"Times New Roman";}
</style>
<![endif]-->
</head>
<body lang=EN-US link=blue vlink=purple style='tab-interval:36.0pt'>
<div class=Section1>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span><o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'>Hi all<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'>I am trying to use FSUIPC and have with my limited
programming skills <span class=GramE>[ <span class=SpellE>pascal</span></span>
and C 8 years ago ! ]<span class=GramE>successfully</span> complied and hacked
the <span class=SpellE>UIPCHello</span> world file but have failed with the
following code.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'>I want to load a bitmap of my cockpit instruments into the
background to a form, I have go it to 800*640 and 256 <span class=SpellE>colours</span>
and made a resource file of it.<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'>The code below was found on the Net but was for </span></font><st1:place><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'>Delphi</span></font></st1:place><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'> 1 or 2 and
I have </span></font><st1:place><font size=2 face=Arial><span style='font-size:
10.0pt;font-family:Arial'>Delphi</span></font></st1:place><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'> 7 it fails with
the <span class=GramE>following :</span>-<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'>[Error] <span class=SpellE><span class=GramE>MainFormback.pas</span></span><span
class=GramE>(</span>84): Object or class type required<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>85):
Undeclared identifier: '<span class=SpellE>LoadFromResourceName</span>'<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>88):
';' expected but '.' found<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>90):
Undeclared identifier: '<span class=SpellE>BackgroundBitmap</span>'<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>90):
Missing operator or semicolon<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>93):
Undeclared identifier: '<span class=SpellE>Formpaint</span>'<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>95):
Undeclared identifier: 'Canvas'<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>95):
Undeclared identifier: '<span class=SpellE>BackgroundBitmap</span>'<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>98):
Identifier <span class=SpellE>redeclared</span>: '<span class=SpellE>TFormMain.FormCreate</span>'<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>102):
Object or class type required<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>104):
Undeclared identifier: '<span class=SpellE>LoadFromFile</span>'<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>105):
Undeclared identifier: 'Form1'<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>105):
Incompatible types: '<span class=SpellE>TBitmap</span>' and '<span
class=SpellE>tagBITMAP</span>'<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>106):
Missing operator or semicolon<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>108):
Missing operator or semicolon<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span>[Error] <span
class=SpellE><span class=GramE>MainFormback.pas</span></span><span class=GramE>(</span>109):
Undeclared identifier: 'Free'<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal style='text-indent:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'><span
style='mso-spacerun:yes'> </span><span class=GramE>{ Private</span>
declarations }<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span><span
style='mso-tab-count:1'> </span><span
style='mso-spacerun:yes'> </span><span class=SpellE><span class=GramE>BackgroundBitmap</span></span><span
class=GramE> :</span><span style='mso-spacerun:yes'> </span><span
class=SpellE>TBitmap</span> ;<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span><span
style='mso-tab-count:1'> </span><span
style='mso-spacerun:yes'> </span><span class=GramE>public</span><o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span><span
style='mso-tab-count:1'> </span><span
style='mso-spacerun:yes'> </span><span class=GramE>{ Public</span>
declarations }<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><span style='mso-spacerun:yes'> </span><span
style='mso-tab-count:1'> </span><span
style='mso-spacerun:yes'> </span><span class=GramE>end</span>;<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal style='text-indent:36.0pt'><span class=SpellE><span
class=GramE><font size=2 face=Arial><span style='font-size:10.0pt;font-family:
Arial'>var</span></font></span></span><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'><o:p></o:p></span></font></p>
<p class=MsoNormal style='text-indent:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'><span
style='mso-spacerun:yes'> </span><span class=SpellE>FormMain</span>: <span
class=SpellE>TFormMain</span>;<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal style='text-indent:36.0pt'><span class=GramE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>implementation</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'><o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal style='text-indent:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'>{$R *.DFM}<o:p></o:p></span></font></p>
<p class=MsoNormal style='text-indent:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'>{$R 262-ins-bk.res}<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal style='text-indent:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'>Uses<o:p></o:p></span></font></p>
<p class=MsoNormal style='text-indent:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'><span
style='mso-spacerun:yes'> </span><span class=SpellE>FPCuser</span>;<o:p></o:p></span></font></p>
<p class=MsoNormal style='text-indent:36.0pt'><span class=GramE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>procedure</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'> <span
class=SpellE>TFormMain.Formcreate</span>(Sender: <span class=SpellE>TObject</span>);<o:p></o:p></span></font></p>
<p class=MsoNormal style='text-indent:36.0pt'><span class=GramE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>begin</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'><o:p></o:p></span></font></p>
<p class=MsoNormal><span class=GramE><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'>line</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'> 84<span
style='mso-spacerun:yes'> </span><span class=SpellE>BackgroundBitmap</span>
:= <span class=SpellE>TBitmap.create</span>;<span style='mso-tab-count:2'> </span><o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><span class=SpellE><span
class=GramE><font size=2 face=Arial><span style='font-size:10.0pt;font-family:
Arial'>BackgroundBitmap.LoadFromResourceName</span></font></span></span><span
class=GramE><font size=2 face=Arial><span style='font-size:10.0pt;font-family:
Arial'>(</span></font></span><font size=2 face=Arial><span style='font-size:
10.0pt;font-family:Arial'>hInstance,'262-ins-bk');<o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><span class=GramE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>end</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'>;<o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><span class=GramE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>procedure</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'>
Tform1.Formestroy(Sender: <span class=SpellE>TObject</span>);<o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><span class=GramE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>begin</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'><o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><span class=SpellE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>BackgroundBitmap.Free</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'>;<o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><span class=GramE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>end</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'>;<o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><span class=GramE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>procedure</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'> <span
class=SpellE>TFormmain.Formpaint</span>(Sender: <span class=SpellE>TObject</span>);<o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><span class=GramE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>begin</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'><o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'><span
style='mso-spacerun:yes'> </span><span class=SpellE><span
class=GramE>Canvas.Draw</span></span><span class=GramE>(</span>0,0,BackgroundBitmap);<o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><span class=GramE><font size=2
face=Arial><span style='font-size:10.0pt;font-family:Arial'>end</span></font></span><font
size=2 face=Arial><span style='font-size:10.0pt;font-family:Arial'>;<o:p></o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal style='margin-left:36.0pt'><font size=2 face=Arial><span
style='font-size:10.0pt;font-family:Arial'>Sorry for long boring post !!! <o:p></o:p></span></font></p>
<p class=MsoNormal><font size=2 face=Arial><span style='font-size:10.0pt;
font-family:Arial'><o:p> </o:p></span></font></p>
<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt;mso-no-proof:yes'>Regards Paul<o:p></o:p></span></font></p>
<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt;mso-no-proof:yes'> <o:p></o:p></span></font></p>
<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt;mso-no-proof:yes'>Despite constant warnings, I have never met anybody
who has had their leg broken by a swan.</span><o:p></o:p></font></p>
<p class=MsoNormal><font size=3 face="Times New Roman"><span style='font-size:
12.0pt'><o:p> </o:p></span></font></p>
</div>
</body>
</html>
<BR>
<P><FONT SIZE=2>---<BR>
Outgoing mail is certified Virus Free.<BR>
Checked by AVG anti-virus system (http://www.grisoft.com).<BR>
Version: 6.0.613 / Virus Database: 392 - Release Date: 04/03/2004<BR>
</FONT> </P>