mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-18 03:19:17 +02:00
fixed paths from Olivier
git-svn-id: trunk@6730 -
This commit is contained in:
parent
0998146d41
commit
3e1747c0ff
@ -127,7 +127,7 @@ begin
|
|||||||
|
|
||||||
Bmp:=TBitMap.Create;
|
Bmp:=TBitMap.Create;
|
||||||
try
|
try
|
||||||
Bmp.LoadFromFile(ExpandFileName('./10.bmp'));
|
Bmp.LoadFromFile(ExpandFileName('../../images/LazarusForm.bmp'));
|
||||||
DRaw(10,450,BMP);
|
DRaw(10,450,BMP);
|
||||||
finally
|
finally
|
||||||
Bmp.Free;
|
Bmp.Free;
|
||||||
@ -135,7 +135,7 @@ begin
|
|||||||
|
|
||||||
xpm:=TPixMap.Create;
|
xpm:=TPixMap.Create;
|
||||||
try
|
try
|
||||||
xpm.LoadFromFile(ExpandFileName('./10.xpm'));
|
xpm.LoadFromFile(ExpandFileName('../../images/lazarus.xpm'));
|
||||||
StretchDraw(Rect(10,500,110,600),xpm);
|
StretchDraw(Rect(10,500,110,600),xpm);
|
||||||
finally
|
finally
|
||||||
xpm.Free;
|
xpm.Free;
|
||||||
|
Loading…
Reference in New Issue
Block a user