Well, at least it's not Microsoft.
This page contains tips, controls and applications for Borland Delphi 1.
Tips
- Where, in Visual Basic, you would do:
DoEvents
In Delphi, you do:
Application.ProcessMessages;
- This line of code raises X to the power Y:
Result:=Exp(Ln(X)*Y);
- This code fills a ComboBox with a list of valid fonts:
FontCombo1.Items.Assign(Screen.Fonts);
if FontCombo1.Items.Count>9 then
FontCombo1.DropDownCount:=10
else
FontCombo1.DropDownCount:=FontCombo1.Items.Count;
FontCombo1.ItemIndex:=0;
Controls
- mpanels.zip - Draggable panels.
- TToolPanel - A modified TPanel which is draggable, will automatically align to any edge (or none)
and arranges whatever controls it contains (they must all have the same dimensions).
- TRollupPanel - A draggable TPanel which has a rollup button. Does not align. Does not arrange contents.
- scrlltxt.zip - Scrolling text.
- TScrollText - A control which displays single line text and scrolls it to the left.
- ctrldemo.zip - Project demonstrating use of TToolPanel, TRollupPanel and
TScrollText controls.
- pacman.zip - Animated pacman.
- TPacMan - An animated PacMan which can face up, down, left or right.
A demonstration project is included, but requires the TScrollText control to be installed.
Applications
- timebomb.zip - Performs one or more actions of your choice, at a time
of your choice.
Actions:
- Explode - Play a .wav file of an explosion.
- Run an application.
- Display a message.
- Close itself.
Times:
- At a specified time of day.
- After a specified delay.
And to stop people messing:
- Lock Button - Lock all controls with a password.
- Hide Button - Hide itself until the actions have been performed.
All operations can be programmed and started using command line arguments.
Note: The Set button is not yet implemented.
|