Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Приветствую, уважаемые эксперты!
Помогите с курсачем. Выдается ошибка "Project Tasc1.exe raised exseption class EClassNotFound with message 'Class TImage not found'. Process...". Хотя TImage есть.
На одном из форумов нашел замечание, типа если переименовывал Image1, то надо в код вставить
initialization
RegisterClass(TImage);
Вставил после {$R *.dfm}, теперь ошибка
"[Error] Main.pas(34): Statement expected but 'FUNCTION' found
[Fatal Error] Tasc1.dpr(5): Could not compile used unit 'Main.pas' "
Со временем напряженка, не можете помочь?
Думаю, что если по новой создам проект и оставлю Image1 вместо imgGrafic, то ошибка уйдет, но все-таки хотелось бы понять причину ее появления и что делать для устранения

К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)

Вопрос задал: KwaK (статус: Посетитель) Вопрос отправлен: 12 декабря 2012, 00:15 Состояние вопроса: закрыт, ответов: 1.

Ответ #1. Отвечает эксперт: min@y™

Я сразу же убрал

initialization
  RegisterClass(TImage);

type
  TForm1 = class(TForm)
    imgGrafic: TImage; // <--- перенёс сюда
    btnBuild:TButton;  // <--- перенёс сюда
    procedure btnBuildClick(Sender: TObject);
 private  { private declarations }
 
 public  { public declarations }
  //задание функции
  function F(x:real):real;
  //поиск минимума функции
  procedure Extrem1(Xmax,Xmin:real; var Ymin:real);
  //поиск максимума функции
  procedure Extrem2(Xmax,Xmin:real; var Ymax:real);
 end;
 
var
  Form1: TForm1;
  //imgGrafic: TImage; // <--- убрал отсюда
  //btnBuild:TButton;  // <--- убрал отсюда
 
implementation

Ответ отправил: min@y™ (статус: Доктор наук) Время отправки: 12 декабря 2012, 08:34 Оценка за ответ: 5

Мини-форум вопроса

DNK (статус: Студент), 12 декабря 2012, 09:17 [#1]: Позабавило "Digital Networked Knight"

Толяныч (статус: 4-ый класс), 12 декабря 2012, 15:08 [#2]: Цитата (DNK): Позабавило Вопрос или ответ ?

DNK (статус: Студент), 12 декабря 2012, 18:28 [#3]: Ситуация "Digital Networked Knight"

KwaK (статус: Посетитель), 12 декабря 2012, 19:55 [#4]: Спасибо за помощь. А получилось так потому, что в делфи практически не работаю, в основном VBA. Просто надо было помочь своим бывшим студентам. Вопрос закрыт.

12 декабря 2012, 19:57: Вопрос закрыт (решение принял автор вопроса — KwaK): Ответ дан исчерпывающий

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.