This is a Delphi translation of my award winning Visual Basic code, which I made about a year ago. It uses DirectX 7 to display sharks swimming around. This version includes a configuration screen which allows you to choose how many sharks and bubbles you want. It does not include the password dialog, and unfortunately does not allow you to choose the screen resolution, it is fixed at 640x480x16. You can change this in code, and I might add device enumeration later, but for now I just wanted to focus on getting DX7 to work with Delphi, WITHOUT using DelphiX... Have fun with it, hope it helps :).
File List:
FConfig.dcu
3Kb
FConfig.dfm
2Kb
FConfig.pas
389b
Icons/
0b
Icons/Shark.ico
7Kb
Images/
0b
Images/bubble.bmp
182b
Images/bubble2.bmp
182b
Images/diddy.bmp
22Kb
Images/shark.bmp
61Kb
Sharks.cfg
358b
Sharks.dof
1Kb
Sharks.dpr
8Kb
Sharks.rc
29b
Sharks.res
7Kb
UBubble.dcu
2Kb
UBubble.pas
4Kb
UDiddy.dcu
3Kb
UDiddy.pas
5Kb
UGlobals.dcu
2Kb
UGlobals.pas
2Kb
UScreensaver.dcu
5Kb
UScreensaver.pas
8Kb
UShark.dcu
3Kb
UShark.pas
5Kb
gpl.txt
13Kb
media.RES
84Kb
media.rc
93b
Similar code
Alpha Blending
(Popularity: ) : This program averages bitmaps together but also at different ratios in different areas depending on the colours of another bitmap. It uses ScanLine to manipulate the pixels of the 3 bitmaps in the blend so it is smooth for small ... Engine3d
(Popularity: ) : This source code demonstrates the techniques used to handle 3D graphics from scratch - without using an API such as OpenGL. The code includes Gouraud shading, which gives much better quality than flat shading for curved surfaces. Also included are ... Control Alpha Blend Value
(Popularity: ) : This code allows a user to control the alpha blend value of a form at runtime. Really simple stuff, the code isnt commented because its self explanitory. Dunno if this will help anyone or not, I was bored and though ... Convert ImageList (XP Fix)
(Popularity: ) : This example will convert any TImageList to 32-Bit, and this will fix various XP formatted icon problems. I found the conversion procedure online somewhere, and I am NOT its original author. But I have put it together into this example. ASM Animation
(Popularity: ) : This program creates an animation using blitting with assembly after getting memory addresses of pixel information using scanline. To understand the code, you'll need some knowledge of assembly. ASM Turtle 2
(Popularity: ) : This program shows how to make an interpreter. The script is based on the assembly language with jumps and labels but still programs graphical output just the same as Logo's Turtle. It has 5 html help files. I hope you ... AVICQ project
(Popularity: ) : AVICQ is a ICQ like communicator with duplex audio and video. Bitmap Animation Component
(Popularity: ) : Put TImageList And TBitmap Component in Your Form And Animate! P.S. When Adding Images To ImageList You NeedTo ChangeTransparent Colorothe wise You'll get mess... Simple video player
(Popularity: ) : Simple video player. A good example for beginners. Can play AVI. MPG, MPEG, not sure about DVD encoded videos. Features include: play, pause, stop, tracking, mute, zoom in and out, and fullscreen. If you like this then please rate. Transparent Picture-Form
(Popularity: ) : This code will allow you to make a form with a transparent picture instead of a form. So you don't have to use the old, (quite boring) square form. It also shows you how to drag a form without a ...
Code Library
) : This program averages bitmaps together but also at different ratios in different areas depending on the colours of another bitmap. It uses ScanLine to manipulate the pixels of the 3 bitmaps in the blend so it is smooth for small ...