Ошибка "class C1 Not Found"

отредактировано April 2011 Раздел: FastReport 4.0
Добрый день!

Сделал простой viewer отчетов fp3 (точнее нашел на Вашем форуме).

uses
Forms,
SysUtils,
Dialogs,
frxClass,
frxRes,
Unit1 in 'Unit1.pas' {DataModule1: TDataModule};

{$R *.res}

begin
Application.Initialize;
Application.Title := 'Просмотр документов .fp3';
Application.CreateForm(TDataModule1, DataModule1);
Application.Run;
With DataModule1 do begin Try
<команда загрузки русского языка frlang.xml (сейчас под рукой кода нет)>
frxReport1.Clear;
frxReport1.PreviewOptions.Buttons := frxReport1.PreviewOptions.Buttons - [pbEdit]; <
добавил
frxReport1.PreviewPages.LoadFromFile(ExtractFileName(ParamStr(1)), True);
frxReport1.ReportOptions.Name:=
ExtractFilePath(ParamStr(1))+ExtractFileName(ParamStr(1));
frxReport1.ShowPreparedReport;
except
Try
if OpenDialog1.Execute then begin
frxReport1.Clear;
frxReport1.PreviewPages.LoadFromFile(OpenDialog1.FileName, True);
frxReport1.ReportOptions.Name:=OpenDialog1.FileName;
frxReport1.ShowPreparedReport;
end;
Except
MessageDlg('Ошибка!',mtError,[mbOk],0);
end;
end;
end;
end.


Но открывает не все отчеты. На некоторых вылетает ошибка: Class c1 not found и закрыть программу можно только через диспетчер.

С чем это может быть связано?

Комментарии

  • отредактировано 06:03
    Тему можно удалять.
    ошибка была из-за того, что не разместил класс checker на форму.

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.