Скачать: CL | DM;

Прога не находит класс при старте программы   Найти похожие ветки 

← →
intaari   (2005-06-21 16:54) [0]

Добрый день!!!

В FastReport, компонент frxReport, нарисовал внешний вид отчета. Добавил одно поле Memo и один Checbox. Прописал каждому событие OnPreviewClick:

procedure Memo2OnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean);
var
 s: String;
begin
 s := TfrxMemoView(Sender).Text;
 SetLength(s, Length(s) - 2); // cut off #13#10
 TfrxMemoView(Sender).Text := InputBox("Edit", "Edit Memo2 text:", s);
 Modified := True;
end;

procedure CheckBox1OnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean);
begin
 if TfrxCheckBoxView(Sender).checked=true
 then TfrxCheckBoxView(Sender).checked := false
 else TfrxCheckBoxView(Sender).checked := true;
 Modified := True;
end;

begin

end.
Нажал на вкладке "Code" кнопку "Run Script" - все работает.
Закрыл редактор отчета и скомпилировал весь проект - ошибок нет все ОК.
Запускаю проект и тут выскакивает  "class TfrxCheckBoxView not found". С чего это он не может найти этот клас если при компиляции все ОК?

---

← →
Ega23 ©   (2005-06-21 16:57) [1]

SetLength(s, Length(s) - 2); // cut off #13#10

А откуда ты знаешь, что там ВСЕГДА #13#10 в конце??????

---

← →
evvcom ©   (2005-06-21 17:04) [2]

Ты случаем руками типы компонентов в описании класса твоей формы или в ресурсах формы не правил? pas и dfm не ReadOnly (например при групповой разработке) в текущий момент?

---

← →
intaari   (2005-06-23 13:06) [3]

Спасибо за советы разобрался, просто на форму надо добавить frxCheckBoxObject1 и тогда в uses добавляется frxChBox, хитрая у них система

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.029 c