Project SPLASH1
Project Structure
SPLASH1.DPR
program Splash1;
uses
Forms,
MainSpF in 'MainSpF.pas' {Form1},
AboutF in 'AboutF.pas' {AboutBox};
{$R *.RES}
var
SplashAbout: TAboutBox;
begin
Application.Initialize;
// create and show the splash form
SplashAbout := TAboutBox.Create (Application);
try
SplashAbout.MakeSplash;
// standard code...
Application.CreateForm(TForm1, Form1);
// get rid of the splash form
SplashAbout.Close;
finally
SplashAbout.Free;
end;
Application.Run;
end.
MAINSPF.PAS
unit MainSpF;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Menus, StdCtrls;
type
TForm1 = class(TForm)
ListBox1: TListBox;
MainMenu1: TMainMenu;
Help1: TMenuItem;
About1: TMenuItem;
File1: TMenuItem;
Exit1: TMenuItem;
procedure About1Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure Exit1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses AboutF;
{$R *.DFM}
procedure TForm1.About1Click(Sender: TObject);
begin
if not Assigned (AboutBox) then
AboutBox := TAboutBox.Create (Application);
AboutBox.ShowModal;
end;
{function local to the unit}
function IsPrime (N: LongInt): Boolean;
var
Test: LongInt;
begin
IsPrime := True;
for Test := 2 to N - 1 do
begin
if (N mod Test) = 0 then
begin
IsPrime := False;
break; {jump out of the for loop}
end;
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
var
I: Integer;
begin
for I := 1 to 20000 do
if IsPrime (I) then
ListBox1.Items.Add (IntToStr (I));
end;
procedure TForm1.Exit1Click(Sender: TObject);
begin
Close;
end;
end.
ABOUTF.PAS
unit AboutF;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Buttons, ExtCtrls;
type
TAboutBox = class(TForm)
Panel1: TPanel;
BitBtn1: TBitBtn;
Image1: TImage;
Label1: TLabel;
private
{ Private declarations }
public
procedure MakeSplash;
end;
var
AboutBox: TAboutBox;
implementation
{$R *.DFM}
procedure TAboutBox.MakeSplash;
begin
BorderStyle := bsNone;
BitBtn1.Visible := False;
Panel1.BorderWidth := 3;
Show;
Update;
end;
end.
MAINSPF.DFM
object Form1: TForm1
Left = 57
Top = 135
Width = 600
Height = 371
Caption = 'Prime Numbers'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
OldCreateOrder = True
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object ListBox1: TListBox
Left = 0
Top = 0
Width = 592
Height = 325
Align = alClient
Columns = 5
ItemHeight = 13
TabOrder = 0
end
object MainMenu1: TMainMenu
Left = 56
Top = 24
object File1: TMenuItem
Caption = '&File'
object Exit1: TMenuItem
Caption = 'E&xit'
OnClick = Exit1Click
end
end
object Help1: TMenuItem
Caption = '&Help'
object About1: TMenuItem
Caption = '&About...'
OnClick = About1Click
end
end
end
end
ABOUTF.DFM
object AboutBox: TAboutBox
Left = 305
Top = 112
BorderStyle = bsDialog
Caption = 'AboutBox'
ClientHeight = 232
ClientWidth = 302
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 302
Height = 232
Align = alClient
BevelInner = bvLowered
Caption = 'Panel1'
TabOrder = 0
object Image1: TImage
Left = 2
Top = 2
Width = 298
Height = 204
Align = alClient
Picture.Data = {
07544269746D6170D6540000424DD6540000000000007600000028000000F000
0000B40000000100040000000000605400000000000000000000100000000000
0000000000000000800000800000008080008000000080008000808000007F7F
7F00BFBFBF000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
FF00101170101037070010000700000000000000000000000000070000007000
7007070000707000000701010101777115311171178311151111151111111111
1111171011010111101711111115111511111111511797777777777777777777
7777779777779779711717117351717111111371713538111110010101501010
1010600000700000070000000000000010000000007070707070707007070710
4100001007161510077111731117757771718731717157715117117580501010
1101010115317113115117153539797977777777777777777979777798797971
1717917111771311710175311711117301110110113071010000100007000000
0070000000000000070000000000700070070070007000007600100010775301
1111511517511171111783151151785317101151121100781101011171151151
5311177197579777798877777778797778377979798989779797171711311531
7717371731701251110110101710770001000000007000000070000000000000
0000000007070707070707007000700501000001057101511151215358717117
1711197177131117111511311010111351101101771177111771577351977977
7777777777F88898797777979797739797711111711111777117517718118737
3771301010101001000000000070000000070000000000000000000000070700
0700700700707000027000000301510141215111835111771171711787115351
15131501150101017771011011117111511317991797777D7777778777777777
7779797979797797717977117115717757737783787387171111101701000000
0000000000700000000700000000000070000000007070070070707000070000
0000001000170117115117171535111535931711791711171115287171010101
1171101110511153115195353579777737777777777977D39978979879779779
7971771175771777781587753583111111100103001010000010000000707000
0007000000000000000000000007070707007007007070700100100050101010
1117111517110111171535351531517117731571311701101711110101117131
1135315953979879777777877777773D77979797979797983513797117777789
5175351173111171301110101000000000000000000700000000770000000007
0000000000700700007007070000070000004007030511157111535171107175
3179159317113111111511100005100117114151112171515711531715797777
77D77777D877D397979797979797797953977797797977877577577557178777
1117100100100000000000000007000000007000000000000000000007007007
0700707070077000000170010010141017751110771114779717171511515175
3513530777770700010111010511111171117911197979777777777777773779
799797979797977179797D7875877D7875777775155788111071010770000010
0000000000070000000007000000000700000000007707007077070707000070
0000000010101137577171111101513153597573531711171111007707070770
70000011121010101117171537579777D77777777797D8399798979797535397
77797797D7775588755557556771711711730077017000000000000000007000
0000077000000007000000000070707007007007000070700010016520141057
1075177115353153158713797151715771007770777070077707707000115311
10171111539797D387777778777799797D3D3575779539797977987757777777
7565C5C555857711111100001000000000000000000770000000070000000000
0000000000707007007007700707070000400070001017111177107717715715
397717771111113530077007707070700070707707000015111011077197D377
787887777D77789773979173773977979797777D77877777757C75C7C5457150
7117000000100000000000000000070000000077000000700000000000770700
0700770070000707000100000101017051151117178711779717799715315170
7777707700707000700007070707070010770700000077777777777777398777
9795359977797977757D7D775577D778F7C75C75C5C545731531005000600000
0000000000007700000000707000007000000000007070700700707070007007
0000070100014111351353515777971753119751115170070770007000077070
0070000070707000070777077707070700777D7D3D7777997797177797977897
975757577575757775775C5C565C777551510000000010000000000000007070
0000000770000700000000000077700700070770707007070000000070001014
1171751171771593975715351171007777000707000070700000700000000070
77077070000770007007777777779899997979979797879875777D7575777575
C7C577C7C575C557537310000000001000000000000007700000000700000000
0000000000770070070007070000070070000000005300110715315375979717
7979715171007770700070070700700007000007007070707070700007000770
7007000779797987779757797779779797D77577755777C775777C7777885757
5789000100000000000000000000070700000007770007000000000007707700
0700707707000707000700105030050511535735718871797775171300777707
0007077000000000000707070707770700070707070770070070070079D39797
7979779779777977877D777557777757C7CCC787C787C7577515000000000000
0000000000000770000000007070700000000000077700070707007007070070
7000010030000701210117753517179797937790777700700000070000000770
7070707077700000077077770700007070007000097979797975777977978977
D77755777C8567777C7777775755575577510000000000000000000000000070
0000000077070000000000007070707007007070770000700700700000000011
5015753795115357717970077700000070070000070770700000707770000707
77070000000707000070007070899797979739779799797797D77758887C7567
7777C75CC5677C77555300000000000000000000000007770000000007070700
0000000007770700707000707007007070000000000010001107715171717978
1970077770707000000000070007070007777770007077070007007070700000
700070000008798779797979797797877775575886777C7786C5C7C75C75C755
5755010000000000000000000000007000000000077700000000000007700707
7007077707707007070000000000005207775315111177197507777000000070
0770070000707077777700007777070707007000000007070070007070707779
779787988777987D77D7C88CC777568FF87675C7875655C7C553042100000000
0000000000000077700000000707000000000000777007070070000707000070
0700000000100075017775111171517100770700000000000000700007077777
7000007770707070007000707070700000000700000077797797979799879777
7757577775778FFFFFFF7CC7777C57C555550000000000000000000000000007
0000000000777000000000007770707077077777077770070707200074000001
7517171014353150770070707070707070707070777777700000777707007000
7007070000000007070700007070897797D397957897897DD77775C7567688FF
FFF8665CCCC5C7C5C75107000000000000000000000000777000000000770000
0000000077700707070700070770007070700010060016107177517701171077
7777770707070707070700077777770007777700707000700700000707070700
000000700000077797989579177989798F75777C7577C66FFE6CC5C675C7C57C
5C11000000000000000000000000000777000000000770000000000077707077
7777077707707007000000400000000161787511115007777777007700700000
0700007777777007777707070007070070007070000000070007000070070797
97978177797979787877587577CC5676F6CC7677C5C77C75C541000000100000
0000000000000000700000000007770000000000777070707070770707070700
7000070000000100571511161707777777000700000007000000777777700777
77070070070000070007000007070700070007000700077979777777798F7778
877D75C7C5C7C5677C5C75C5C7C57CC574110000000000000000000000000007
7700000000070700000000007770770007007077070770000070700000007000
1051717107777707707700070070070070707777700777770070700070700700
0070000700000007000700700007097877979798798F8987D7D677C5C75CC75C
C67CC767CCC765CCC50500000000000000000000000000007770000000007700
0000000077707007707000707077070707070700000000101017150077770707
0707000000000007077777000777770707000707000700707007070007070700
070000070700089779797988977987777575557C75C7C77CCC7CC7CCC56C5CC5
4151000000000000000000000000000077000000000077700000000077707700
0700007700707000070700000001016105753077777000770000007000070770
7777700077777070007070000700070007000070000000070007070000070879
7897798797789777D75757C577C57CCC68CC7CCCCC5CCC5C5013000000000000
0000000000000000777000000700707700000000787070000000007007000070
7707000000000710111077877707007700007000700000078770007777707007
07000070700700070000700707070700070000070070077977798797997FF998
7D775757C5777CCCC7C67CC5CC7C5CC547350000000000000000000000000000
7770000077000770000000008707700070000070000007070000000001000007
7007777000000070007077000070077770007778707007070070070007007070
707007000000000700070700000007987777979777777857775775757C5CCCCC
C75CCCCC5C757C54511100000000000000000000000000000777000077000077
0000000777707000000000000007777000000000000001110778770070070700
7000000700007887007778770707700007070007000700000007000707070700
0700000707070777997879797977939977D7575C77C5CCCCC87CC5C7C5C785C7
7811000000000000000000000000000007770000770000770000000777077000
7000000007770000000000000007070078770070000070000000070000778700
0778770070000070700070700700007070700070000000070070070000000798
7377797979789777D7757575556C5CC5CCC57CC5C7C775575317000000000000
0000000000000000007000077000000700000007870700000000000000077000
0000000000000077877070000070007007070000777870077877700707070700
0070700070070700000070000707070000000007007079739799737791797397
39575757C75C5CCC75CCC75C75C5CC5411110000000000000000000000000000
0777000777000007000000077707700000000000000000000000000000007787
7070000700000770000000077877077887707070000070070700007000700007
07070070700000070707070070000779777979997113971977575757755CC5C5
7CC5C75C7C5C5551101100000000000000000000000000000070707700000000
0000007787000000000000070000000000000000000787770707070007007700
0070077887007787707007070707007070070700700070700000070000070700
00000000000707778797977171777971585D757557C777567F5C775C55C5C107
1171000000000000000000000000000000777707700000000000000887000000
0000000770000000000000000788777070000000000000070000778700078877
0707000070700700007000070070000007070007070000070707070707009797
979799791537971739715755C7588C5C57CC5C7C5C7571077011000000000000
0000000000000000000707777000000000000078700000000000000000000000
0000000777777070000700707007070007088870077887070070070700007007
0700707007070700700007000007070000000000000079777398779739797717
7153555555555C5CCC5CC5C75547317111100000000000000000000000000000
0077770000000000000700000000077770700000000000000000008887707707
0700000000000007078870007787707070707070070700700007000700000070
007070070700000070707070707097973979971171779779797717575C7C5CC5
C5C7575757177177015100000000000000000000000000000000000770000000
00770000700070000000000000000000000078F8888707777000707007070077
8877007788770070070007007070070700700700070707070700007000070707
00000000000077897977971717977839717F91171545475454775C7541711151
1031000000000000000000000000000000000707700000000077700770007000
00000000000000000078F8788880000070700777000078F88870077887007070
7007070700070000700700707000000000007000070000000070070707079588
9788379791513897177853110101016101411111718710178110000000000000
0000000000000000000007707000000000777778800700000000000000000000
088F877770777007070777007007888F80077887707070007070700070700707
0700700000707070707007070070707070070000000153997999781171397971
7953151510101000711071107177110883830000000000000000000000000000
0000787707000000000777787000000000000000000000078FF7707870777000
0000007707788888007878707007070700070707000700700070070707000000
0007000070000000000007007071153713719535357153537971117311017101
5017171111750111117100000000000000000000000000000000777077000000
0007777870000000000000000000078FF8707777700070070070700078F88870
0788870707070070707000707070700707007000007070700700070700070707
0707007000017198879831839797197977115311017371127817313771111121
0111000000000000000000000000000000000077007000000007777870000000
00000000000088F88077008700070000000000078F8F87777887707007070707
0707070000700700007000707000000700070000007000000000000070779583
8839719535358315117177711171167178387158710107511711000000000000
000000000000000000000000000000000000778870070000000000000078FF87
0700008700700777007077088F87707888707070700070007007070707007070
0700700007070700070000707000707070707070008931319177153517138153
8811711150187111111911311111111110100000000000000000000000000000
00000000000000000000008F7000000000700000788FF7077870778770000087
0707008F88777777870707070707070700700070700700070070070700000070
70070700007000000000000007357753797935131179113188311531118F1771
1717811135130101011100000000000000000000000000000000000000000000
000007887000000000000008FFF807787700078707007070700078FF87008F77
0707070700707007070707007070707070007000700707000070000707000707
0707070701771889881711717915357191535315101317117111711713111171
131100000000000000000000000000000000000000000000000007F800000000
0000078FF8707077707008800000000007078887007888770700700707007070
0700700700700700070700070070000070007070000700000000000007811397
8351718953511397379531111311011111711131571171011071000000000000
00000000000000000000000000000000000007870000000000077FF877070707
00007770070707070078F870078F870707070070070700707070707007007070
7000070070007070007000000700070707070707713977139793737311711531
5311151701011171311173117311311171110000000000000010000000000000
000000000000000000000700000000000078FF87700000000070070700770000
07FF87008FF87070707070707007070070070070707070000707007000700007
0700070700070000000000001177178797179795771711581171711777153111
5117115771511107771001000001000000000000000000000000000000000000
000000000000000078FF887700707070700070007870070778F80078F8807070
0707070070707007007007007070707070007007070700700007000007000707
070070707115197717F797178839731317711311881715131111113791315311
1111001001000001000100000000000000000000000000000000000000000008
FFF87870070000000070007887007008FF70778FF77070707007070700700707
0707070700777070007007000000070007000707007070000007000537797139
7883817788977715397971531111110771711511715111111011100100000000
00060000000000000000000000000000000000000000078FFF77870000007070
070078887070078FF70078F87707070707070070707070700700700707070700
7007000700707000707070007000000707000071188373973799783939518379
7717317711351311311131111133141711710101010101000001010000000000
000000000000000000000077000078FF8F887777770700007007FF87000078F8
7077FF8707070707070707070070070070070070007070070700707070000707
000000070007070000007097138977799771789871319888F817778915113515
1151017011511313317810107710100101000700000000000000000000000000
0000007700078FFFFF8FFFFF8F8888870078F8700707FF87077FF87070707070
7007070070707070707007007007707000707000070070000070707000700007
070700737977957771173787975737FF83979783531711311711711110301117
111310107353417010101000100000000000000000007700000000000008F8FF
F87070787888FF8707FF8707008FF87078FF7707707070707070070707007007
0707070700707007070000707070000707000000070007000000097FF8797893
9797997933779783977393953711177711311017811117105311110110101031
0101001000000000000000000000700000007700008FF88F8707770007000007
7F88000077FF88078F8870707070707070707070070700700007000070070070
0007070000070070000707070000700707070717838879353531731815935197
139571777797187910171118F111101177501051010110510101070000001000
00000000000000000000000007FFF88F8707880070007077F87007078FF8788F
FF77070707070707070707070700707070700707000707007070000707007000
707000007070007000000779887F835117111779713537397873971391711383
8711101317017111111311311710113107010101000000000000000000000000
000000000FFFF877FF7077070007008870007078FF7078FF8770707070707070
0707007070070700707070700077700707007070007000700000700700007000
07077F83939977971777978117139F7777787197718377177711117711711016
10F710107311001011010712010000000000000000000000000000007FF88777
7F870000077008770070078FF7077FFF77077070707070707007070070707007
000070000707007000070007070070070707070000700070700037F897898973
979F839739753777999797317135191111710117107111111131151111701171
1017101700000000000000000000000000000007FF80F70077FF777788007070
70077FF87078FF87070707707070707070707007007000700707007000070700
70707070000700700000000707007000000773897971F7377978797188397939
7711881191531117711111011111121101111037105001717110111101000000
010000000000000000000008FF70F707007FF8FF807707000077FF87078FF870
7707070707070707070700707070707070700700707770070000000070707000
0707070000070007070977788777979739797388777883978171881717115311
1107101701101151110117711101117010117701600001000000000000000000
0000007FF70787777007FFF878F70070778FF87078FF87077077070707070070
0707070700700700070070700070707007070707000000707000007070700070
0089738F79398779778837893988977931793931111311501173111011111010
111108301115301017103507110100000000000000000000000000F887008807
0078F8F78F70070078FF87078FF8707707070707070707070700700707007070
7007000007070700700070007007070000707000000007000787988739757797
17379897979813F8598715171715131171110111010311110701131010711111
71071111410100101000000000000000000008FF707088007078778F87007078
FFF8707FF8870770707070707070707070707070700707007070070070077007
00700007007000707000007007070007097798F79797935397797977F3137873
8111371171117110310110101110101211521011017115031117116131050700
000100000000000000007FF7770788700707077FF707078FFF7707FFF8707707
7070707070707070700700700707070700070007007070700700707007000700
07070707000007007897398897897179797871F8397978879713573111717111
5111511110151111011114101511037151110111437010010010000000000000
0000FF8780008F00700078888F708FFFF7707FFF770770770770707070707070
0707070070700007070707000707070070070007000700007000000007070007
789798783789378717897378797193739171979717118F110117010305310105
1010117111177111170117071010100010000000000000000007FF8877077F07
00708F708888FFFF8708FFF77770770707077070700700707070700707007070
0070000070077007007007007070070700707070700007097797538F799758F8
7377979977881997715318F71171735311711011137311101011111171071115
11101113171401010000000000000000000FF8880000887007007707077FFFF8
077FFF8777077070770707070707070707007070700707007700707007077070
070070700000700007000000000700017971797779713897987F837783771717
7935313178311118814113510571101110101070111177110101501047010000
0000001000000000008FF8F700707F070070700078FFFFF777FFF77070707770
7070707070707007007070070707007000070000700707070070000707070007
0000700707000759717977998797973987989953799797197877951788795318
7111078111115107011111111171131111710350110001000000000000000000
07FF8F7007008870087007077FFFFF878FFF7777777707070707070707070707
0707007007007070707000070707700707007070000070707070070000070535
797387978F797975378973779753117111397737795315311317711131010110
1610111521101101000071703001000000100000000000000FFF880700700707
8F707007FFFFF77FFFF777707070707707070707007070700700707070070007
007070070070707000070000707000000007000707000531535983978F797179
37F3189797387117171117959711111151117111151311010871170111115110
101031000100000300000000000000007F8887007000700F88007078FFFF7878
FF77707777077070770707070700700707070700707070700700007007070700
7070070700070070707000700007815119779579797179719879717871918711
5117173131535311317311117078701017103111153111110111000100000000
50000000000000078F8770700707078FF707078FFF707FF88777777070770770
7070707070707070700707070070070070070000700770070000700070700700
000007000700179377F53797179715357797978F375119713171197153111105
107F131011771113187111171111250711071000000001000000000000000008
FF70070700007FFF707007FFF7778FFFF8777077777077070707070707070707
0070007007007007007007070070707007070007000070007070700070051151
5789737797153539835351399797151151153535153510111131151117711010
53111117130511111417701000010000000001000000007FF807000070778FF8
07007FFF7708FFF78F7777770707707070707070707070070707070070707070
0700007007077700700070700070007000000070005311111135195171795353
9795397577117131353117113111111711511315111110101101151111117817
110171000100000120100000000000FF887007070008FFF700078FF8077FF887
78F7777077707070707070070700707070700707070007007007000070077007
0070000070070700707070007077517115397171379711781531715317111158
7115311715171010711375121101117101101211711313101011300000070300
00000000000007FF70070000077FF8707078F88078FFF7777788777770707070
7070707007070707007070070070700707000707007070700700707007000007
0000007001783131171511789751719773539711111170135131517111171153
5101717111101001011111110110151111701000000010000500000000007FF7
007077077FFF8700708FF8708FFF77777778F777777070707070707070707007
0700707007070070007000700700770700070007007070700070700010887105
0781111871131531951781117101017111513151517513101151111101711110
101011017117171611014010100007000000000000008F87788FF870778F7070
07FF8708FFF8870777777F777777707070707070707070700707070070700707
0700070070077000707007007000000007000070517751118813535115351397
1717111071101111713511313113151110311501101010011178117117171111
5310100000100001000000000007FFFFF8F87700078070077FF8708FFF887770
777778F777777070707070707007007070700707070070007000700700707707
0007007000707070700070003111110177117011371155715311105101010101
7711715153115301511701101111781030731011131115217151000010001000
00000000007FFFF878880070770707078F8777FFF88787777777778F77777707
0707070070707070070070070007070700700070070077000700070007000000
0070001771107777171011115117311137510713501010511151111711771151
011711031121183151111111151711111217175001000100000000000078FF87
0770070007070078FF707FFF8888777077777778F87777707070707070707070
7070707007070070070007007070707070070007007070707000700775715887
1111777717711571571114103001010153117171111110101317111015101110
10111077131117141177012152141001000000000078FFF7700700077000078F
F777FF8F88878777077777878887777707070707007007007007070070700700
70007007000777000700070070000000007000111187178717F5037117110114
110101250100177101111171101515177178108110111711117F111711150113
151101521016007000000000078FF77F70700700007077FF807FFFFF88878777
7070778788887777707070707070700770700707070070070007007007070700
7070700700070707070000071017535157731110101053171012710100010171
11610510711780131111113513107F7101731011152113510303107700010000
700010007787F7077700700707007FFF778FFFF8888787777077777878888777
7707070707070070007070070007007007000700707077070000070007000000
0000701015073110171050171011141011011000001401010111101181017011
0771101110517871110171117111710110141010100000000000400788808800
08F700707077FFF888FFFFF88887877777070778787888777770707007070707
0700707070700707000070070000770007070000700707070700010101101414
1010101010001317710100101003011114101311111011881111111011711111
011101077107711010101000000000100000000878007F0707780700007FF877
FFFF8FF888787877770707778787887877770707070070707007070007007000
7007007007077070700070700700000000000016100101300100170100050101
2100000000001014110117710101107711010115101101101101111101111010
10100000010100000100007F7707787070070007078F8778FFFFFF8888878777
7770707778787887777770707070700707070007070707070000700070007700
0070000700070707010010471000016110000000001214141010010000010103
0110117107110711011731012117715117110101110101014100010000061070
000000F8700008800700707078FF708FFF8F8FF8887878777770770777887888
7777707070707070070070707007007000700707007070707007070000700000
0000003070152100430010001004101000000000010014110101610101811177
101111011101501301117110101071070000000010000000000007F700707887
000707008FF777FFFFFFFF8F8888777777707070777878788777777070070070
7070700700700700700070000700770007000070070007000014300100001001
0000000000010100710000010000100100177101013010010117101010111111
1107710101011010121000000000000000007FF707070FF707070708FF707FFF
8FF8FF8888787877777707070777887878777770707070700700707007070707
0007007070077707007070007000700010000004100000000100000000000001
2500140040010107000710010010110110177101710101011111101010101070
052010000700100100108F70000077880078008FF877FFFFFFFFF8F888878777
7770700700778787888777770707007070070070700007000070070007007700
7000070700070000000000000000100000000105001070000010003001000000
1010010010107010101010101077117105011101701010101010005001000000
0007FF707070007F708808FF8078FFFF8FF8FF8F887878777777770700707788
8787877770707070070707007070700700007007070707070700700000700100
0000000000000000000100000000701000000070770101077001001001000101
011011011111111113110110101010101001400000000010010FF70000070078
77F878F8778FF8FFFFFFFF888888777777707070070077878788777777070700
7070007070070070700700700000770000700007070000400000001000000000
0000000000070000000000010001610001017001001010010011101111117074
10831101011017170100000120101000008F87007070070880F8FFF777FFFFF8
FF8FF88888787877777777707007007787878877777007070700707000700700
0007070070700770700070700000000000000000000000001000000000010000
0000010410010000000071000070010011050111410771111135101110110101
110101007000001007FF770700007007878FFF808FFFFFFFFFFFF8F888878777
7770770700707077888787877777707007070700770070700070000700077700
0707000070000000000000000001000600040000010000000100041001000001
0000000010010010010311431011570111171710110511150110000001011001
0F8870000070007077FFF807FFF8FF8FF8FFFF88888787777777707770000000
7878878787770700707007070007000070007070070707707000007000000001
0000100000000000000000000000000000001000000001000001000000100001
0111011011716171014718711113110171410101010101007FF7007070070707
7FFF8778FFFFFFFFFFF8F8F88878787777707770707070707088787877707007
0700700070707070000700070000770000707007000000000000000000000000
0000000000000000004000100100000000000000010010101051171050351101
11011171051015310111301101053417FF70700007000070FFF8878FFFF8FF8F
F8FF8F8888878777777777077070000007778787777000070007070700700700
0070070070070770070007000000000000000000000000000000000070000000
0010000000000120000000010000010101210501110167510117117111151751
1531510535711108F800000700070708FFFF88FF8FFFFFFFFFFFFF8888787877
7770707707700707000788787777007007070070070070070007007007007707
0000700000000000000000000000000001000000000000001000000000000000
000100000010101071057113011111011031157111077711511511115371007F
870777707007008FFFF88FFFFFFFF8FF8FF8F888888877777777777070707000
0070078707770070707007007007007007007000700707700707000000000000
0000000000400000000000000000000000000100001000000000000000000101
0107101710105751111171115115117177117171115350FF8078F8700700078F
FF88FFFFF8FFFFFFFFFFF8F88787787777707077707070007000777707077700
0707070700700700007007070070077070000000000000000000000000000000
0000000000000000000000021000000000000001001030101010110111710701
210173511531177117171515371708FF87070700700707FF877FF8FFFFF8FFFF
8FF8F88888878777777777070770707000707070700777707007000707007000
0700700007007700007000000000000000000000000000000000000000000000
0001000000000000000000000000014101010110101181101118111131151115
1115353157707FFF70007070007078FF878FFF8FFFFFF8FFFFFFF88888787877
7777077707077070070707070070077700707070000700700070007070007707
0700000000000000000000000000000000000000000000000000001000000000
00000000000100707301010711011011711315151511151315315979777078F8
7707000007007FF708FFFFFF8FFFFFF8FF8F8F88878877777707770777070707
0070707070707077070007007070070070007000070707700000000000000000
0000000000000000000000000000000000000000000000000000000000060101
010105101010101010111311115311151151717539007FF70880007070078F87
78FF8FFFFF8FF8FFFFFFF8F88887787777777070707070707070700707007007
7070700707007000007007070000770700000000000000000000000000000000
0000000000000000000000000000000000010000000100001017031101101730
17311577171153517137797970078880077007000708F870FFFFFF8FFFFFFFFF
F8FF888887878777777707770770707070007070070707077707007070070007
0700700070070770000000000000000000000000000000000000000000000000
0100000000000000000000001000001000770171010101511117173911177731
159797978087888070070007007FF778FF8FFFFFF8FF8FF8FFFF8F8888878777
7777777077077070707070707070700007700700007007000070007007007770
0000000000000000000000000000000000000000000000100000000000000000
00000000000000001001010101031001010711535717177953515979077777F7
07000700708F808FFFFFF8FFFFFFFFFFFFF8F888878787777707070707070707
0700070707007070707707070700700007007007007007000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000001071010101353117151177979759797570087708F80007007008F8778F
F8FFFFFF8FFF8FF8F8FFF8F88878787777777777707707070707000707070070
0077700070070700700707007000777000000000000000000000000000000000
0000000000000000000000000000000000000000000001000001010030104101
781119717979797779779790787008887070700778F778FFFFFF8FFFFFFFFFFF
FFFF888888787777777707070707070707070700700707007007070700700000
0700000700070770000000000000000000000000000000000000000000100000
00000000000000000000000010000000000000010101010113117539797777D3
7777970787000887000000708F708FFF8FFFFFF8FF8FF8FF8FF8FF8887887877
7777777077070707070700707070700707007770070070007007070007000700
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000010010010701078319757797778987977008F7070780
07070708FF778FFFFFF8FFFFFFFFFFFFFFFF8888887877777707070770770707
0707070000700707000700770007007000700070707077700000000000000000
0000000000000000000000000000000000000000000000000000000000000000
010000077010017018877539979797779777707F700007F700000078F878FFF8
FFFFFF8FFFFF8FF8FF8FF8888878787777777777070707707070707070070700
7007070770707000700070000000077000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000071077001010
11311797777D77977D7D008F707007870707078FF88FF8FFF8FFFFFF8F8FFFFF
FFF8F88878878777777707707770707070707070070070070700007077000007
0070707007007770000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000001000000170101797589839777
773708F8000707F7007008F878FFFFFFFFF8FFFFFFFFFF8FF8FF8F8888787777
7777707707070707070707007007070700070700707007000700000700000770
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000010000001001010181797957977D97907F8707000787
070078F778FF8FF8FFFFF8FFFFF8FFFFFFFF8888878778777707770770707707
0707070707000070077000000077000070007070000070700000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000060005000017301079171797979779008F87000700F700078F8088FFFFFF
F8FFFFF8FFFFFF8FF8FF8F888887877777770777077070707070070070700700
7000070000077007070700007070077000000000000000000000000000000000
0000000000000000000000000000000000000000000000000001000000000007
10011717797979799707F870007007870777F877FFFFF8FFFFF8FFFFF8FF8FFF
FFF8F88887878777777777707070707070707070700700070000000707007000
0000707707000770000000000000000000000000000000000000000000000000
0000000000000000000000000000000001000000000100000717719597179797
9078F707070007870F7FF708FFF8FFF8FFFFF8FFFFFFFFF8F8FF888888787787
7707070777070707070707070070070070070000000707707077770707070070
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000100035013100797317815179008F800000007087
888F808FF8FFFFFFF8FFFFF8FF8FF8FFFFF8F888878787777777777070770707
0707007070707000000007000000070707777070070007700000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000300650071153977971507F87007770707708FF8778FFFFFF8FF
FFF8FFFFFFFFFFFFF8FF88888878777777770707707077070707070070070070
0700000007000007777707007007007000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000007000
000017179538111008F80077700000077FF708FF8FF8FFF8FFFFF8FF8FF8FF8F
FFF8F88878787777777777770770707070070070707007000007007000070077
7077707070700707000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000001701010117713597150
8FF7070070707077FF8778FFFFFFFFFFF8FFFFFFFFFFFFFF8FF8F88888787877
7707077077070707070707070070700000000000707007777777077000770770
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000010000070201791713513108FF700700000007F
FF70FFF8FF8FF8FFFFFF8FFFF8FF8FF8FF8F8888878777777777770770707070
7070707007000700700000700000077770707070070770770000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000001240700010007173153718707F8700007070778FF877FFFFFFFFFFF8
FF8FFF8FFFFFFFFFFFFF88888878787777777077070770707070700707070000
0070000007070777007770700000770000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00007935111788807F707707000008FFF878F8F8FF8FF8FFFFFFFFFF8FF8FF8F
F8F8F88878787777777077707707070707007070700070070000700700007770
7007070000700777000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000007000000010115135393910
0F888870007078FF888FFFFFFFFFFFFFF8FF8FFFFFFFFFFFFFFFF88888787787
7777770770707070707070700707000000700000007077077000707000000070
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000006071311351177808F7770700707FF8
88FFF8FF8FF8FF8FFFFFFF8FFF8FF8FF8F888888878787777770707707707070
7070700707000070000070700000770707700070700077070000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000010000000001000011717117111808F7000070008FF878F8FFFFFFFFFFFF
8FF8FFFFFFFFFFFFFFFF8F888887777777777770700707070070707070700000
0707000007007070700000070700007700000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000017117891717107F7007000707FF07FFFFF8FF8FF8F8FFFFFF8FF8FF8FF8F
8F8FFFFFFFFFFF8F8F8887777777070707000070000707070000707000077070
7070070070700770000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000100000117978711311
90F87000700788708FF8FFFFFFFFFFFFFF8FFFFFFFFFFFFFFFFF8F888F8F8FFF
F8FFFFFF8F888887777770707070000000000007000707007700000007070070
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000137311353517708800700707FF77
8FFFFF8F8FF8FFFF8FFFF8FFFF8FF8FF8FF8F888887787777877787787888787
8787888787777777077070000000700707707000777707770000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000517971115317117F70007008F708FF8F8FFFFFFFF8FF
FFFFFFF8FFFFFFFFFF8F88887878777770777077077077777777777777787787
7777777777070000007700000000707000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000317117171131537F0070007F8078FFFFFFFF8FF8FFF8FF8F8FFFF8FF8FF8
FFF8F88887877777777707707707070700707007707077077777777777777777
7777707707070707000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000173173971715
39087000707F777FFF8FF8FFFFFFFFFFFFFFFF8FFFFFFFFFF8FF888887877777
7070770707070700707070700707007000004707077777777777777077070077
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000011711531113953587070078F70FF
8FFFFFF8FF8F8F8FF8FFFFFF8FF8FF8FFFF88887887877777777707707070707
0700070070000707404000400000000000007077077777700000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000001513117971713177700077FF77FFFFF8F8FFFFFFFFFF
FFF8F8FFFFFFFFFF8F8F88888787777770770770707070707070700700707000
4040400200000010000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00001315317171515377707008F878FFF8FFFFFFF8FF8FF8F8FFFFF8FF8F8FFF
FFF8F88878777777770770707070700700707070070700446414040500410000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000153115371371
3953707778877FF8FFFFF8F8FFFFFFFFFFFFF8FFFFFFFF8FF8F8888887877777
0777070770707070707000707000046414440400400000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000131531111779713500887F708FFF
FF8FFFFFFF8F8FFF8FF8FFFFF8FF8FF8FFF8F887878777777707770707070700
7007070070706444444440400000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000015315379778835317088FF70F8F8FFFF8FFF8FFFFF8F
FFFFFFF8FFFFFFFFF8F888888787777707707070707070707070070700444444
4404440440400000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00007178939719889717908F8707FFFFF8FFFF8FFFFF8FFFFF8FF8FFFFF8FF8F
8FF8F88878777777770707707070700700070000044444444444044040040000
0000001000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000179377717393
7179707FF708FF8FFFF8FFFFFF8FFFF8FFFFFFFFF8FFFFFFFF88888788777777
07777070707070707070707044C4444444444440440000000100000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000001357913795351397107F8778FFFF
F8FFF8FF8FFFF8FFF8FF8F8FFFFF8FFF8F8F8888877877777707070707007070
0707000C4C444444444444440405040100000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000179317793153971107F8807F8F8F8FF8FFFFFFF8FFFF
FFFFFFFF8FFFFF8FFF8F88887887777070707707070700707000004C4C44C4C4
4444444044040000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000017117911531171710FFF877FFFFFFF8FF8F8F8FFFF8F8F8FF8FFFF8F8FFF
F8F8888887777777777707070707070070707C7CC6C44C44C444444404040000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000183111713117
11387FFF888F8FF8F8FF8FFFFFF8FFFFFFFFFFF8FFFFFFFF8F88888787877777
70707077070070070004CCCCC7CCC44444444444440404000000000000000000
0000000000000000000000000000000100000000000000000000000000000000
00000000000000000000000000000000000011187317177117137F8F88F8FF8F
F8F8F8F8F8FFF8FFFF8FF8FFFF8FF8F8FF8F8888787777707707707007070070
00CCCCC6C86CC4C44C4444440440400000000000000000000000000000000000
0000000000001000000000000000000000000000000000000000000000000000
000000000000000000001317711117F371150FF707FFFF8F8F8F8F8F8FF8FFF8
FFFFFFFF8FFFFFFF8F888888787777777077070770700700C4C4CCC8EFF6CC4C
4444444444040140000000000000000000000000000000000000000000100000
0000000000000000000000000000000000000000000000000000000000000000
0000151118353171873107F70F8F8F8F888F8F8F8F8FF8FFF8FF8FFFFFF8FFF8
F8F88888787777770707070700707004C7CC676FFFFFE7CCC54C444444054000
0000000000000000000000000000000000000000000000000000000010000000
0000000000000000000000000000000000000000000000000000131317111113
91170777788FF8F8F8F888F8F8F8FF8F8F8FFF8F8FFFF8FF8F88887887877707
77070707077004C4CCC68FFFFFFFFFECCC444444444040400010000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000717771113151717100878888FF88
8888F8F8F8F8F8F8FFFF8FFFFF8F8FF8FF8F888878777777707707070000C44C
C7CCC68EFFFF867CC444C4444040400000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000011311131531313335788788F88888888888888F88FF8
F8F8F8FF8FFFFF8F88888887877777707070707070445CC4C5CCCCC68F8ECCCC
44C4444444404004000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000115311111115153110F8788F8F8888888888F8F8F88F8F8FFF8FF8FF8F8F
8F8888888787777777707070047CC4CCC7CCCCCCCE8CCCC4C444444440404000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000131117171731
3151708877888888888888888888F8F8F8F8F8FF8FF8FF8F88F8887877777770
7007070454C5CC5CCCCCCCCCC86CCCC444444444540404000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000017177171371151371088788F8888
88888888888F888F88F8F8F8FF8FF8F8F888888878777777777700545475CCCC
CCCCCCCCCC6CCC44444444440440402100010000000000000000000000000000
0000000000000061000160010000000000000000000000000000000000000000
00000000000000000000171137111717137110787888888888888888888888F8
8F88F8F8F8F8F8F88F8888878787770707001575457875CC7CC4C444CCCCC444
44C4444444042000000000200100001000000000000000000000000010000100
0000010000000000000000000000000000000000000000000000000000000000
0000117113171781353780780788888878788888888888888F8F8F8F8F8F8F88
F888888787777777703575545C585CC77CCCC4C47CCC44444444444404240400
0000041000000024000000000000000000000000000000000001000000000000
0000000000000000000000000000000000000000000000000000111351317835
37939077777888788888878888888888888F88F88F88F8F88888878878777770
7975575757C5C75CC7C7CCCCCC444444C4444444440401000000000000006000
0000000000000000000000000000043007000000000000000000000000000000
0000000000000000000000000000000000007171835313511353107870888888
7887888788887888888888F8F8F8F88F888888878777770777537577557577C5
CC5F7CCCC4C44444444444040400000000016000000010000001000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000037811711773131177088877878878878878888888888
88888F888F8F8F888888887878770977971757778787C5C57CCCCCCCC4444C44
4444444040404000000001000000000000040000000000000000000000000010
0000000000000000000000000000000000000000000000000000000000000000
00001171111131187711177877788878878878887888888888888888F888888F
8888878887017779797575D78777575C5CCCCCCCCC4C44444444404405000000
1000000000000000100000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000711313171711
3171313087778788787888788888888888888888888F8F888888887708397887
1779775755575565C7CC4444C444444444444440404001000000000000500000
0000000000010000000000000000070000000000000000000000000000000000
0000000000000000000000000000000000007171701117311735317107778878
7887878878787888888888888888888888887777137797397797977577775757
5C5C5444C4C44444440444440000000000040000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000013777111317711115111100787878787888788888878
88888888888888888888771379973977977577787D7575C77577C4444CC44C47
7444044704414000040100000020000000000000000000000000000000000000
0400000000000000000000000000000000000000000000000000000000000000
0000117811711713153131717300787878787878878878888888888888888888
8738979797717979793797987D7575757C5C4444C5CC46C4C444404450020000
1000000001070161000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000111131111315
3117179317707778787878787887887887888888888888877977797171797787
9797797D7757575757CC44044C4CC4564C445447004000000000000000052500
7000000000000000000000010000000000000000000000000000000000000000
0000000000000000000000000000000000008131171017131539735179390777
7778787878788788888888888888777735398837973779788777977757757575
7775444044404CC5444460050400000006100001041000000100010000000000
0000000000000000000010000000000000000000000000000000000000000000
0000000000000000000037717117117971179713779739778787878787877887
88878888877793979397739779798398839871797D757575575CC00400447445
6440040400200100000000025200000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000711311717135377971797373933778777787878888787888787771717171
771797797797977987979779775757575C77C140401045445005000000010000
0010000000000010003000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000117771797977
9737398887977197307787777877778887777793179353973971797397377978
398779779757D777575C50000400404404047040000000000000010010017000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000001738798377883D39879783997177
9530077777777770139738797171353771739797797797787797779779757575
7C54000400000404000000000000000010000070007000000000000000070000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000017977779798737779773779771397353987153979717
1537978317971783897977797977739877739779771717555440000000000000
0500000000000000000007000000000300000070000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000797778777777977777777773797739797113873717137117931973179379
8797977377979777977989779717157050010000100000010000000001000014
0000000100000000040000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000758887877739
8977779797977797783717178917935881397175797979779773797798798987
3787779797171310000000000000000000000000000000002000000001000700
1700000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000003737878397777777378837979773
9777379397177933977179339777779797997797797797397977777973971710
0000000000000000000000000000000010700000000101000001000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000079797798777779779777977779778979777971777979
7973975779397977397777797397397798979783775187170000000000000100
0000000000000000401010010100046100060010000000000100000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000}
Stretch = True
end
object Label1: TLabel
Left = 2
Top = 206
Width = 298
Height = 24
Align = alBottom
Alignment = taCenter
Caption = 'This is my program, version 1'
Color = clBlack
Font.Charset = ANSI_CHARSET
Font.Color = clSilver
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object BitBtn1: TBitBtn
Left = 214
Top = 8
Width = 75
Height = 33
TabOrder = 0
Kind = bkOK
end
end
end
|
Home:
Code Repository:
Mastering Delphi 5