mORMot Open Source

general-e

Member

From: Germany

Registered: 2013-04-11

Posts: 7

AV in ExtractAllResources()

Hi, I get a AV in Procedure ExtractAllResources()

CaptionNames param Action is always empty ('') and TrimLeftLowerCase(Action^) crashes!?

// for Delphi 2009 and up, CaptionName(): string will be converted into a WinAnsiString
with InternalClassProp(Tables[index])^ do begin
   P := @PropList;
   for j := 1 to PropCount do begin // add all field names
     AddOnceDynArray(StringToWinAnsi(CaptionName(@P^.Name))); // <<== here AV 
     P := P^.Next;
   end;
end;

Can you help?

ab

Administrator

From: France

Registered: 2010-06-21

Posts: 14,272

Website

Re: AV in ExtractAllResources()

You are right.
I've just fixed an unexpected AV error in Procedure ExtractAllResources().
See http://synopse.info/fossil/info/fd0faee5dc

Thanks for the feedback.