40 lines
1.1 KiB
Plaintext
40 lines
1.1 KiB
Plaintext
SplashAbout component for Lazarus
|
|
minesadorada@charcodelvalle.com
|
|
============================
|
|
|
|
Installation
|
|
========
|
|
Make a new folder 'splashabout' in your lazarus/components folder
|
|
Copy the contents of the zip file into it
|
|
In Lazarus [Packages] menu open the package file splashabout.lpk
|
|
In the resulting dialog, click [Compile] then [Use] -> Install
|
|
Lazarus will ask you whether to 'recompile the IDE' - answer 'yes'
|
|
|
|
When all is done, click the 'Additional' component palette to see the SplashAbout component.
|
|
|
|
To test:
|
|
* Open the Example application (components/splashabout/exampleapp folder) 'project1.lpr'
|
|
* Run the application
|
|
|
|
Use
|
|
===
|
|
Add the component to your form (SplashAbout1)
|
|
|
|
To show a splash screen
|
|
===================
|
|
In the FormCreate event, use this code:
|
|
procedure TForm1.FormCreate(Sender: TObject);
|
|
begin
|
|
SplashAbout1.ShowSplash;
|
|
end;
|
|
|
|
To show the 'About' dialog, use this code
|
|
===============================
|
|
procedure TForm1.Button1Click(Sender: TObject);
|
|
begin
|
|
SplashAbout1.ShowAbout;
|
|
end;
|
|
|
|
Tweaking
|
|
=======
|
|
See the 'exampleapp' example project to experiment |