 |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
 
|
|
В чем ошибка? 
| Unregistered |
|
|||
|
Unregistered |
Думаю меню тут нипричем. Коментируя строку меню - ничего не происходит.
|
|||
|
||||
Загрузка ...
| Unregistered |
|
|||
|
Unregistered |
KAI
На какое событие повешено появление SysInfo? |
|||
|
||||
| Pakshin A. S. |
|
|||
|
Эксперт  Профиль Группа: Участник Клуба Сообщений: 5056 Регистрация: 16.2.2003 Репутация: 21 Всего: 61 |
А если сделать форму SysInfo дочерней, заихнуть её в создаваемые формы (Auto-Create Forms по-моему). И открывать ей по SysInfo.Visible:=true или SysInfo.Show,точно не помню!
А можно и SysInfo.Show обойтись. Соответственно выкинуть Create(nil) формы и её Free. |
|||
|
||||
| Unregistered |
|
|||
|
Unregistered |
На какое событие? Я давал код выше.
Странно, но даже простое SysInfo.Show выводит ту же ошибку  Блин, в чем же она заключаеться..? |
|||
|
||||
| Medved |
|
|||
 Эксперт Профиль Группа: Завсегдатай Сообщений: 7209 Регистрация: 15.9.2002 Где: Kazakhstan, Astan a Репутация: 14 Всего: 154 |
Если хотите получить ответ на свой вопрос, покажите весь код. А то мы уже на протяжении двух страниц выпытываем его. А Вы постите по одной строчке, смотря на которую, нельзя ничего сказать конкретного .
-------------------- |
|||
|
||||
| Unregistered |
|
|||
|
Unregistered |
Я же дал код... При обработке события "if Registry.ReadInteger('ShowSysInfo') = 1" происходит ошибка. Коды, которые просили, дал. Код всех проги давать думаю глупо. Там несколько сотен строк.
Фому создаю способом, которым создаю другую форму (заставку, она работает). По каким причинам может возникнуть ошибка? Я бы дал скриншот ошибки, но как его дать... |
|||
|
||||
| <Spawn> |
|
|||
 Око кары:) Профиль Группа: Экс. модератор Сообщений: 2776 Регистрация: 29.1.2003 Где: Екатеринбург Репутация: 44 Всего: 64 |
Как ты дал весь код? А до "if Registry.ReadInteger('ShowSysInfo') = 1" что написано? Может ты экземпляр класса TRegistry не создал, или не открыл нужный ключ или, читаемое тобой значение, имеет другой тип или его вообще не существует.
-------------------- "Для некоторых людей программирование является такой же внутренней потребностью, подобно тому, как коровы дают молоко, или писатели стремятся писать" - Николай Безруков. |
|||
|
||||
| Unregistered |
|
|||
|
Unregistered |
Здесь спрашивали, на какой строке выдает ошибку - я ее дал. В коде, который давал, есть создание формы + (!) MenuSysInfo.Checked:=True; Коментируем строку создания формы SysInfo:=TSysInfo.Create(nil); и чек бокс будет работать. То есть ошибка именно в созданее формы. Все реестры работают.
|
|||
|
||||
| p0s0l |
|
|||
 Г-н Посол Профиль Группа: Экс. модератор Сообщений: 3668 Регистрация: 13.7.2003 Где: 58°38' с.ш. 4 9°41' в.д. Репутация: 58 Всего: 112 |
Если не сложно, кинь мне исходник на мыло, я гляну...
-------------------- С уважением, г-н Посол. |
|||
|
||||
| dm9 |
|
|||
 Дмитрий Копытин Профиль Группа: Vingrad developer Сообщений: 3876 Регистрация: 22.7.2002 Где: Москва Репутация: 6 Всего: 137 |
Может, я и не прав, но попробуй перетащить всё из onCreate формы на onActivate:
procedure TSysInfo.FormCreate(Sender: TObject); -> procedure TSysInfo.FormActivate(Sender: TObject); "SysInfo.Top" - как это быдет работать, если форма ещё не создана? :-\ Или я ошибаюсь? |
|||
|
||||
| Unregistered |
|
|||
|
Unregistered |
dm9
Блин, спасибо, попробую! |
|||
|
||||
| Akella |
|
|||
 Творец Профиль Группа: Модератор Сообщений: 18485 Регистрация: 14.5.2003 Где: Корусант Репутация: 36 Всего: 329 |
Почему пишешь SysInfo:=TSysInfo.Create(nil)?
Попробуй SysInfo:=TSysInfo.Create(self); |
|||
|
||||
| dm9 |
|
|||
|
Дмитрий Копытин Профиль Группа: Vingrad developer Сообщений: 3876 Регистрация: 22.7.2002 Где: Москва Репутация: 6 Всего: 137 |
dsergey, это не важно, главное не забывать освобождать после этого память...
|
|||
|
||||
| Pathfinder |
|
|||
|
Unregistered |
December, у меня проблема с переключением между формами в проге - ошибка Access Violation!!! Что белать? Заранее спасибо.
|
|||
|
||||
| Maverick |
|
|||
 Эксперт Профиль Группа: Завсегдатай Сообщений: 1307 Регистрация: 22.9.2003 Где: Odessa, Ukraine Репутация: 2 Всего: 10 |
 Спустя два месяца.... Тут не только December, тут любой забудет.... Я после такого срока к своим прогам отношусь как к чужим.... 1) Надо новую тему создать... 2) Подробнее, пожалуйста.... --------------------  |
|||
|
||||
|
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.1048 ] [ Использовано запросов: 21 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |