|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
||||||||||||||||
Переcоздание TForm08.05.2012, 00:53. Показов 7015. Ответов 72
Метки нет (Все метки)
Ребят, в общем задача простая: есть форма, на ней n-контролов (боксы, едиты, листы и пр.), которые заполняются. Есть кнопка по нажатию которой все контролы должны очищаться, т.е. форма перед нами должна предстать как будто только что созданная.
Очищать каждый элемент вручную - глупо. Использование FindComponent более рационально, однако слишком много разных типов контролов, так что все равно не подходит. Ну соответственно решил пересоздавать форму по нажатию этой кнопки:
Вот... Но даже если я решу эту проблему, все равно заметно как форма моргает и если предыдущая форма имела какие-то другие координаты, а не по центру (что выставлено по умолчанию для TForm1), то после нажатия кнопки происходит прыжок формы на центр... Может кто-нибудь подскажет, как по умнее это сделать? Благодарю! Добавлено через 3 минуты Не по теме: P.S. LK, поправьте тайтл, пожалуйста... Что-то я промаСал
0
|
||||||||||||||||
| 08.05.2012, 00:53 | |
|
Ответы с готовыми решениями:
72
копии TForm Наследник TForm
|
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
|
| 08.05.2012, 05:30 [ТС] | |
|
Даже TDateTimePicker принимает значение 1899 когда щелкаешь на кнопку, что означает, что компонента принимает значение, которое у нее было на момент создания, то есть все правильно...
А вот что с простейшими Edit-ами, я не понимаю...
0
|
|
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
||
| 08.05.2012, 05:38 [ТС] | ||
|
Avazart, неа, этим эдитам нет, а вот всяким комбобоксам, лейблу - да.
Да... У Вас действительно все замечательно работает, за исключением RadioButton - он почему-то не сбрасывает свое значение.
0
|
||
|
|
|
| 08.05.2012, 05:38 | |
|
0
|
|
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
|
| 08.05.2012, 05:39 [ТС] | |
|
LK, =)))
Блин, ненавижу мистику...(
0
|
|
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
|
| 08.05.2012, 05:56 [ТС] | |
|
Avazart, я уже этим и занимаюсь... Это хохма настоящая... Все снес! Остались только 4 эдита, которые упрямо не хотят обновляться!)))
Может все-таки Вам удастся посмотреть проект? Он теперь совсем маленький))
0
|
|
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
|
| 08.05.2012, 06:03 [ТС] | |
|
Avazart, тот, что Вы скинули - замечательно работает.
0
|
|
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
|
| 08.05.2012, 06:07 [ТС] | |
|
Вот мое чудо....
0
|
|
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
||
| 08.05.2012, 06:14 [ТС] | ||
|
Будет слишком накладно мой исходный проект переделывать ![]() Может там просто в настройках формы что-то указано? Или это не должно влиять по идее...
0
|
||
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
|
| 08.05.2012, 06:21 [ТС] | |
|
Avazart, ха! А на самом-то деле косяк есть и в Вашем проекте. Вы текст Edit-ам поставьте по умолчанию "" (в смысле уберите вообще). Я-то все это время в таком режиме тестил... Вот Edit к пустому полю-то и не возвращается. Если что-то там было, то пожалуйста...
0
|
|
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
|
| 08.05.2012, 06:32 [ТС] | |
|
Avazart, жееесть, столько мучал Вас и зря...
![]() Простите, пожалуйста...
0
|
|
|
|
||
| 08.05.2012, 06:39 | ||
.
0
|
||
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
|
| 08.05.2012, 06:42 [ТС] | |
|
Ну что ж... Факир был пьян и фокус не удался
![]() Значит не бум выделываться и бум юзать это ![]() Avazart, еще раз ОГРОМНЕЙШЕЕ СПАСИБО! Добавлено через 1 минуту LK, а может быть у Вас есть какие-нибудь мысли по этому поводу?
0
|
|
|
|
|
| 08.05.2012, 06:44 | |
|
The_Immortal, что требуется ? Создать динамически форму? Убрать с имеющейся формы компоненты? Кратко. Внятно. А то я все понять не могу (вина не ваша, конечно).
0
|
|
|
1569 / 505 / 48
Регистрация: 04.04.2009
Сообщений: 1,891
|
|
| 08.05.2012, 06:52 [ТС] | |
|
LK, на имеющейся форме сохранить компоненты в первоначальном состоянии (какие они были на момент создания формы) и при необходимости вернуть эти компоненты к этому состоянию.
0
|
|
| 08.05.2012, 06:52 | |
|
Доступ к обьектам TForm
Вопрос по TForm::OnKeyPress
Вывод текта на TForm Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |
|
| Опции темы | |
|
|
Новые блоги и статьи
|
|||
|
Nekobox - outbounds[0].transport: unknown transport type: raw
damix 01.10.2026
Фикс ошибки
Правым кликом по серверу -> отладочная информация -> edit
Заменить "net": "raw", на "net": "tcp",
Нажать кнопку reload.
|
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js.
В помощники взял Яндекс-Алису.
Было создано три зала на разные интересы.
исторические и ретро
сериал Хичкок. . .
|
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
|
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#.
Название изменил на ColorStep.
Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
|
|
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами:
- ВидТО (СправочникСсылка. ВидыТО);
- ВидГСМ. . .
|
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала.
Ниже прикреплён. . .
|
Программа опроса у.з. расходомера SLS-720F
Argus19 02.09.2026
Программа опроса у. з. расходомера SLS-720F
Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU.
Опрашиваются регистры. . .
|
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка:
Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
|