Как создать класс со своей формой?

@jeka12345 · Регистрация: 23.07.2012

Студворк — интернет-сервис помощи студентам

Здравствуйте все.
Только начинаю изучать делфи, и возник такой вопрос: а можно ли вообще в делфи создать класс с собственной формой? Т.е. задача примерно такая: при программном создании объекта этого класса, чтобы автоматически создавалась форма объекта и помещалась в координаты, которые переданы объекту при создании.
Пробовал примерно так:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Type
TClassForm=class(TForm)
   procedure FormCreate(Sender:TObject);
end;
 
TMyClass = class (TObject)
   LeftCoord:integer;
   TopCoord:integer;
   ClassForm: TClassForm;
    constructor Create(x,y:integer) ;
    destructor destroy;
end;
implementation
constructor TMyClass.Create(x, y: integer);
begin
inherited;
LeftCoord:=X;
TopCoord:=Y;
ClassForm.Create(application);
ClassForm.Left:=LeftCoord;
ClassForm.Top:=TopCoord;
end;

Не получается(((
Вообще такое сделать можно или класс со своей формой должен быть только потомком от TForm? Или же таким образом это вообще не реализовать и надо копать в сторону компонент?

Комментарий модератора

Теги кода добавлены модератором. По правилам форума, код должен быть оформлен соответствующими тегами. Для оформления кода Delphi следует выделить этот код и на панели редактирования сообщения нажать кнопку: "DELPHI".

BuPy7 · 23.07.2012, 19:13

До этого какой язык изучали?

@jeka12345 · 23.07.2012, 19:24 **[ТС]**

Да можно сказать - никакой(
Когда-то давно на турбопаскале лабы делал))

@Alex_pac · 23.07.2012, 22:42

зачем сразу класс? можно написать 1 процедуру которая любой потомок TForm будет по координатам выравнивать и не только.

@jeka12345 · 24.07.2012, 01:09 **[ТС]**

Сообщение от Alex_pac

можно написать 1 процедуру которая любой потомок TForm будет по координатам выравнивать и не только.

Не совсем понятно как такая процедура поможет в поставленной задаче.
Или же Вы таким ответом ответили примерно следующее:"Такое сделать невозможно. Максимум что возможно - это насоздавать массив форм и потом с помощью способов процедурного программирования этим массивом форм управлять. Привязывать к координатам и не только".
Или же это надо воспринимать как ответ: "Да ты абсолютно прав. Класс со своей формой должен быть только потомком от TForm"

@Alex_pac · 24.07.2012, 01:15

в принципе создать свою форму очень просто.

и потом берете модуль с формой, pas файл и dfm файл и привязываете к любому, проекту, классу, компоненту и тп.

естественно что у этой формы будет класс наследник TForm типа TMyForm и тп

@jeka12345 · 24.07.2012, 02:07 **[ТС]**

Сообщение от Alex_pac

и потом берете модуль с формой, pas файл и dfm файл и привязываете к любому... классу...

Можно вот здесь поподробнее?
Привел кусок кода который как раз и должен был реализовывать описание своей формы и привязку ее к собственному классу. Но не работает? Можете подсказать в чем ошибка?(ошибку в ДНК не предлагать

)

Добавлено через 44 минуты
Тема закрыта. Разобрался. Всем спасибо.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .

BuPy7 Нет ТЗ - давай досвидания 746 / 377 / 64 Регистрация: 01.12.2011 Сообщений: 2,250 Записей в блоге: 6
	23.07.2012, 19:13
	До этого какой язык изучали? 0

@jeka12345 0 / 0 / 0 Регистрация: 23.07.2012 Сообщений: 4
	23.07.2012, 19:24 [ТС]
	Да можно сказать - никакой( Когда-то давно на турбопаскале лабы делал)) 0

@Alex_pac 1302 / 708 / 107 Регистрация: 25.05.2011 Сообщений: 2,158 Записей в блоге: 51
	23.07.2012, 22:42
	зачем сразу класс? можно написать 1 процедуру которая любой потомок TForm будет по координатам выравнивать и не только. 0

@Alex_pac 1302 / 708 / 107 Регистрация: 25.05.2011 Сообщений: 2,158 Записей в блоге: 51
	24.07.2012, 01:15
	в принципе создать свою форму очень просто. и потом берете модуль с формой, pas файл и dfm файл и привязываете к любому, проекту, классу, компоненту и тп. естественно что у этой формы будет класс наследник TForm типа TMyForm и тп 0