First chance exception at $00017D80. Exception class EAccessViolation with message 'Access violation at address 0058520B, accessing address 00000000'. Process client_mobile (38
target platform:OS X - MacOSX 10.9.5
Code:
procedure TExtensions.DecodeVersionString;
var
VersionText: TExtString;
CharPos: Integer;
begin
VersionText := GetGLString(GL_VERSION); //VersionText = '' ??
CharPos := 1;
FMajorVersion := StrToIntDef(ExtractNumberWord(VersionText, CharPos), 0);
if CharPos <= Length(VersionText) then
FMinorVersion := StrToIntDef(ExtractNumberWord(VersionText, CharPos, 1), 0);
end;
Bookmarks