[fpc-pascal] Re: AV: FCL-Image and XPM image

[silvioprog]

2013/7/13 waldo kitty <wkitty42 at windstream.net>

> On 7/13/2013 17:03, silvioprog wrote:
>
>> 2013/7/13 silvioprog <silvioprog at gmail.com <mailto:silvioprog at gmail.com>>
>>
>>     C:\Users\Silvio\Desktop\xpm>**project1.exe
>>     An unhandled exception occurred at $00412008:
>>     EAccessViolation: Access violation
>>        $00412008
>>        $00411D6F
>>        $00410B81
>>        $0040F9B1
>>        $004015D5  main,  line 15 of project1.lpr
>>
>>     In attached, I'm sending a small project and my XPM image to test it.
>>
>>     Thank you!
>>
>>
>> IMG, it works now, I discovered:
>>
>> i.UsePalette := True;
>>
>> Thank you anyway! :)
>>
>
> shouldn't that AV still be handled properly? in the library or??
>
> --
> NOTE: No off-list assistance is given without prior approval.
>       Please keep mailing list traffic on the list unless
>       private contact is specifically requested and granted.


I saw it:

procedure TFPCustomImage.SetUsePalette(Value:boolean);
begin
  if Value <> assigned(FPalette)
  then
    if Value
    then
      begin
        FPalette := TFPPalette.Create (0);
        // FPalette.Add (colTransparent);
      end
    else
      begin
        FPalette.Free;
        FPalette := nil;
      end;
end;

-- 
Silvio Clécio
My public projects - github.com/silvioprog
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-pascal/attachments/20130713/b289e660/attachment.html>