paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-31 13:12:37 +02:00
Code Issues Packages Projects Releases Wiki Activity

simplify ide splash logo replacing

Browse Source 
git-svn-id: trunk@13047 -
This commit is contained in:
paul 2007-11-27 08:04:39 +00:00
parent 2147234522
commit 4bbb79c4ed
6 changed files with 4084 additions and 13406 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
.gitattributes vendored
View File

@ -2487,6 +2487,8 @@ images/sourceeditor/bookmark6.xpm -text svneol=native#image/x-xpixmap
images/sourceeditor/bookmark7.xpm -text svneol=native#image/x-xpixmap
images/sourceeditor/bookmark8.xpm -text svneol=native#image/x-xpixmap
images/sourceeditor/bookmark9.xpm -text svneol=native#image/x-xpixmap
images/splash_logo.bat svneol=native#text/plain
images/splash_logo.lrs svneol=native#text/pascal
images/splash_logo.xpm -text svneol=native#image/x-xpixmap
images/template.png -text svneol=unset#image/png
images/todo_goto.bmp -text

9340
ide/splash.lfm
View File

File diff suppressed because it is too large Load Diff

4073
ide/splash.lrs
View File

File diff suppressed because it is too large Load Diff

7
ide/splash.pp
View File

@ -62,9 +62,15 @@ var
implementation
constructor TSplashForm.Create(AOwner: TComponent);
var
B: TBitmap;
begin
inherited Create(AOwner);
B := LoadBitmapFromLazarusResource('splash_logo');
Image.Picture.Graphic := B;
B.Free;
Application.OnIdle := @ApplicationOnIdle;
end;
@ -85,5 +91,6 @@ end;
initialization
{$I splash.lrs}
{$I ../images/splash_logo.lrs}
end.

1
images/splash_logo.bat Normal file
View File

@ -0,0 +1 @@
..\tools\lazres splash_logo.lrs splash_logo.xpm

4067
images/splash_logo.lrs Normal file
View File

File diff suppressed because it is too large Load Diff