Is there someway to include pictures in the exefile?

[Robert W.B.]

In Android java, my Pictures for my Aura Migraine app is included in the apk file.
Is there a way to include Pictures in the Lazarus/Freepascal exefile?
Or do i have to send them in a mapp with the aura migraine exefile?
Sincerely
Bob

[Handoko]

Yes, you can include images into the exe file.

Try this:
01. Lazarus main menu > Project > Project Options
02. Project Options > Resources > Add

Then this is the the example code to load the image:

Code: Pascal  [Select][+][-]

1. unit Unit1;
2.  
3. {$mode objfpc}{$H+}
4.  
5. interface
6.  
7. uses
8.   Classes, Forms, Controls, Graphics, ExtCtrls;
9.  
10. type
11.  
12.   { TForm1 }
13.  
14.   TForm1 = class(TForm)
15.     Image1: TImage;
16.     procedure FormCreate(Sender: TObject);
17.   end;
18.  
19. var
20.   Form1: TForm1;
21.  
22. implementation
23.  
24. {$R *.lfm}
25.  
26. { TForm1 }
27.  
28. procedure TForm1.FormCreate(Sender: TObject);
29. var
30.   Stream: TResourceStream;
31. begin
32.   // Get the background image
33.   Stream := TResourceStream.Create(HInstance, 'IMG', RT_RCDATA);
34.   Image1.Picture.LoadFromStream(Stream);
35.   Stream.Free;
36. end;
37.  
38. end.

You can download the zip file for testing.

The documentation about Lazarus Resources:
http://wiki.freepascal.org/Lazarus_Resources

[Robert W.B.]

Great
Thanks Handoko.

[YiannisKam]

I've tried the above example but it doesn't work for me. First error said, identifier not found RT_RCDATA. I typed quotes around it and it worked. But now I got an exception: Resource "IMG" not found.

[wp]

Add unit LCLType to "uses".

[YiannisKam]

It still doesn't work. Same exception message.

[KodeZwerg]

It still doesn't work. Same exception message.

Code: Pascal  [Select][+][-]

1. Uses Types

[KodeZwerg]

or

Code: Pascal  [Select][+][-]

1. Uses Windows

[YiannisKam]

Sorry, neither of them work.

[KodeZwerg]

Sorry, neither of them work.

Than add it on your own.

Code: Pascal  [Select][+][-]

1. const
2.    RT_RCDATA = MAKEINTRESOURCE(10);

[alaa123456789]

but the exe file will be big , maybe better you put it in DLL and link it to the exe

https://github.com/alas82/resource-in-dll.git

thanks

[YiannisKam]

After a lot of trial and error, it worked. I only need LCLType. The problem was the quotes around RT_RCDATA which I typed in the first place in order to get rid of the identifier not found error. That was hard.
And I want to apologize because you told me the solution, but I am a beginner and even reading the documentation is somewhat hard for me.

[wp]

And I want to apologize because you told me the solution, but I am a beginner and even reading the documentation is somewhat hard for me.

No reason to excuse. We all started this way. And the more errors you make the faster you'll progress.

[PascalDragon]

but the exe file will be big , maybe better you put it in DLL and link it to the exe

https://github.com/alas82/resource-in-dll.git

And what does that really achieve? You still have to provide the library and in total the size will be bigger than if you'd put the image into the executable, because of the additional overhead of the library file itself minus the resources.

[alaa123456789]

And what does that really achieve? You still have to provide the library and in total the size will be bigger than if you'd put the image into the executable, because of the additional overhead of the library file itself minus the resources.

what you do then if you have software of 100 picture for ex??