Пользователь
Добро пожаловать,
Регистрация или вход
Потеряли пароль?
Ник:
Пароль:
Меню сайта
Главная
Аккаунт
Пользователи
Опросы
Поиск по сайту
Новости RSS
Форум
Отправить другу
Связаться с нами
Книги
Самоучители
Каталог софта
Исходники
Компоненты
Обработки 1С
CMS-центр
Шаблоны сайтов
Наборы иконок
Статьи и обзоры
Вопросы и ответы
Скрипты
Нетематичное
Ваше мнение
Поиск по сайту
Активно и часто использую
Использую редко
Обхожусь стандартным рубрикатором
Не знаю, что это такое
Я и сам не знаю, что ищу
Результаты
Другие опросы
Всего голосов:
488
Комментарии:
0
Наши партнеры
Статистика
Статьи и обзоры
Главная
Лучшие
Популярные
Список
Добавить
Создание компонента во время работы приложения
Inprise также рассказывала об этом в выпусках TechInfo. Поищите ti2938.asc Creating Dynamic Components at Runtime на публичном WWW или FTP сайте компании Inprise.
Код
Var
MyButton : TButton;
MyButton := TButton.Create(MyForm); // MyForm теперь "обладает" MyButton
with MyButton do
BEGIN
Parent := MyForm; // Выбираем родителей. MyForm "усыновляет" MyButton
height := 32;
width := 128;
caption := 'Я здесь!';
left := (MyForm.ClientWidth - width) div 2;
top := (MyForm.ClientHeight - height) div 2;
END;
Разместил:
admin
| | Прочитано: 30091 | |
Смотрите также связанные новости
07.11.2024 -
Кроссворд на Delphi
07.11.2024 -
Рождение, жизнь и гибель формы
07.11.2024 -
Воспроизводим Flash-файл в своем приложении
07.11.2024 -
Работа с потоками в Delphi
07.11.2024 -
SQL-запросы в Delphi
07.11.2024 -
BlobField как Bitmap
07.11.2024 -
Запись и чтение чисел в BLOB-поле
Нет комментариев. Почему бы Вам не оставить свой?
Вы не можете отправить комментарий анонимно, пожалуйста
войдите или зарегистрируйтесь
.
Внимание! Если у вас не получилось найти нужную информацию, используйте
рубрикатор
или воспользуйтесь
поиском
.
Статьи
и
обзоры
Delphi
и
TurboPascal
Создание
компонента
во
время
работы
приложения
Inprise
также
рассказывала
об
этом
выпусках
TechInfo
Поищите
ti2938
Creating
Dynamic
Components
Runtime
на
публичном
или
сайте
компании
КодVar
MyButton
TButton
Create
MyForm
теперь
&
quot
обладает&
with
BEGIN
Parent
Выбираем
родителей
усыновляет&
height