error in XE7

[thiago dornelas]

Hi my friend,

I installed the component in XE7 but I have a problem.

when I give a double click the TprReport the message " Information form class not found " .

already checked the library path and directories of pReport are informed.
"..\15.0\@ Componentes\PReport\PReport\Source" and
"..\15.0\@ Componentes\PReport\CommonControls\Source"

you know what it can be?

thank you

[Marcin Moszkowicz]

Hi,
I had the same problem. After adding in pr_Common at implementtion uses pr_Preview and pr_Designer problem disapers :

implementation
uses
  pr_Strings, pr_CommonPreviewPanel, pr_Parser, SpTBXItem, pr_Preview, pr_Designer ;

I'm testing on XE8 and now is work fine.

Additional to use in Windows 10 you need to change in pr_Utils adding in place of System and Windows Directory less restricted place, specially on domain computers. Sometimes when the administrator set Group Policy for domain system even the program folder has problems with writting pr.ini file. So it must be more tested :

function GetFindFileName;
var
  Buf: array [0 .. 255] of char;
begin
  Result := AddFlash(ExtractFilePath(Application.ExeName)) + FileName;
  if not FileExists(Result) then
  begin
    { find in System dir }
    if TOSVersion.Major <6 then
    begin
      GetSystemDirectory(Buf, 255);
      Result := AddFlash(StrPas(Buf)) + FileName;
      if not FileExists(Result) then
      begin
        { find in Windows dir }
        GetWindowsDirectory(Buf, 255);
        Result := AddFlash(StrPas(Buf)) + FileName;
      end;
    end
    else begin
      //on windows 7 or later use documents directory
      Result := TPath.Combine(TPath.GetDocumentsPath,FileName);
      if not FileExists(Result) then
      begin
        { or library }
        Result := TPath.Combine(TPath.GetLibraryPath,FileName);
      end;
    end;
  end;
end;

tthanks Delphino for a great job.

best regards
Marcin

[Andrey]

Good afternoon...
Then, good news?