Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

не регистрируется класс RegisterClass [D6, WinXP]


Страницы:   1 2

_Guest_ ©   (2008-07-01 11:46:00) 

Есть модуль:

unit UFDCE;

interface

uses
 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,  ComCtrls, StdCtrls;

type
 TFDCE = class(TForm)
   DateTimePicker1: TDateTimePicker;
   procedure FormResize(Sender: TObject);
 end;

implementation

{$R *.DFM}

procedure TFDCE.FormResize(Sender: TObject);
begin
 DateTimePicker1.Height := ClientHeight;
 DateTimePicker1.Width := ClientWidth;
end;

initialization
 RegisterClass(TFDCE);

end.


Далее в программе, если искать этот класс FindClass('FDCE');
, то возникает ошибка: "класс не найден".
Если выполнять регистрацию при создании главной формы, происходит то же самое. Подскажите это глюк или я что-то неправильно делаю? Спасибо.


Поросенок Винни-Пух   (2008-07-01 13:24:00) [21]

initialization
ShowMessage('bla bla bla');
RegisterClass(TFDCE);

end.


Поросенок Винни-Пух   (2008-07-01 13:23:00) [22]

Похоже, конечно, что не вызывается, понять бы еще почему?

Например потому, что модуля нет ни в одном из юзез


_Guest_   (2008-07-01 13:20:00) [23]


> Поросенок Винни-Пух ©   (01.07.08 13:08) [5]
> если класс не найден, значит либо имя неправильное,  

Что значит не правильное? Это про мою опечатку - тогда я все еще раз проверил - нет пишу имя класса, а не экземпляра, совпадает с зарезервированным - тоже нет - пробовал, что еще может быть?

> либо register не вызывается вовсе

в отладчике на RegisterClassвствет, внутрь (в Classes) не пускает. Похоже, конечно, что не вызывается, понять бы еще почему?
Кроме как быть потомком TPersistent других ограничений на класс нет?


Поросенок Винни-Пух   (2008-07-01 13:08:00) [24]

если класс не найден, значит либо имя неправильное, либо register не вызывается вовсе


_Guest_   (2008-07-01 12:36:00) [25]

Похоже, я что-то неправильно делаю или про какую директиву не знаю: у меня ни один класс не регистрируется, TListBox например.


_Guest_   (2008-07-01 12:23:00) [26]


> Ega23 ©   (01.07.08 12:20) [2]
> FindClass('TFDCE');

Да, конечно FindClass('TFDCE');, это опечатка здесь, а не в программе, извините.


Ega23   (2008-07-01 12:20:00) [27]

FindClass(' TFDCE');
?


Palladin   (2008-07-01 12:19:00) [28]

а тебе не кажется что TFDCE и FDCE это разные вещи?


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо