Vampyre imaging load image [CLOSE]

[Pe3s]

Hello, I wanted to try the vampyre library but I don't know how to display the image, I get an Access violation error.
Could you please tell me what I'm doing wrong?

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

1. procedure TForm1.FormCreate(Sender: TObject);
2. begin
3.   FImage := TMultiImage.Create;
4. end;
5.  
6. procedure TForm1.Button1Click(Sender: TObject);
7. begin
8.   if OpenDialog1.Execute then
9.   begin
10.     FImage.LoadFromFile(OpenDialog1.FileName);
11.     PaintBox1.Invalidate;
12.   end;
13. end;
14.  
15. procedure TForm1.FormDestroy(Sender: TObject);
16. begin
17.   FImage.Free;
18. end;
19.  
20. procedure TForm1.PaintBox1Paint(Sender: TObject);
21. begin
22.  DisplayImage(PaintBox1.Canvas, 0, 0, FImage);
23. end;  
24.