Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Delphi


РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 772
от 06.04.2007, 12:35

Администратор:Калашников О.А.
В рассылке:Подписчиков: 457, Экспертов: 83
В номере:Вопросов: 3, Ответов: 5


Вопрос № 80465: Здравствуйте, уважаемые эксперты! Если я по закрытии окна высвобождаю память методом Form1.Free, то как мне "вернуть его к жизни", если нужно открыть окно снова?...
Вопрос № 80486: При нажатии на Run выходит окно CPU. Как его убрать....
Вопрос № 80496: Привет. Пожалуйста, ктонибуть ответьте на вопрос........ В реестре есть ключик тип REG_DWORD и нужно изменить значение с (0) на (1). облазил всё и ничего похожего нет за исключением... попадается вот эта дрянь: procedure TForm1.FormC...

Вопрос № 80.465
Здравствуйте, уважаемые эксперты!
Если я по закрытии окна высвобождаю память методом Form1.Free, то как мне "вернуть его к жизни", если нужно открыть окно снова?
Отправлен: 31.03.2007, 17:55
Вопрос задал: Win2k (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 4)

Отвечает: sir henry
Здравствуйте, Win2k!
Вам нужно заново создать Form1:

Form1:=TForm1.Create(Self);
Ответ отправил: sir henry (статус: Академик)
Россия, Красноярск
----
Ответ отправлен: 01.04.2007, 06:06
Оценка за ответ: 2
Комментарий оценки:
Но это первое, о чем я подумал, но оно не пашет, т.к. окно создается еще раньше с помощью Application.CreateForm(TForm1, Form1);, получается, что все компоненты загружены и вылетает ошибка. Я по-разному пытался делать но так и не добился результата, поэтому задал сюда вопрос. К сожалению, проблема так и не решена.


Вопрос № 80.486
При нажатии на Run выходит окно CPU. Как его убрать.
Отправлен: 31.03.2007, 21:20
Вопрос задал: George soselia (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Ерёмин Андрей
Здравствуйте, George soselia!
Вообще, это окно появляется, как правило, в том случае, когда в программе случается критическая ошибка и она вылетает. Если у вас это окно появляется сразу после запуска, то возможно, при запуске сразу происходит какая-то ошибка. Но это только предположение, так как в вопросе вы не указали практически никаких данных, которые помогли бы решить проблему.
---------
Нет правила без исключений. Правило без исключений - исключение из правил.
Ответ отправил: Ерёмин Андрей (статус: Профессор)
Россия, Тула
WWW: Программирование на Delphi. Помощь, советы, обмен опытом.
ICQ: 286867644
----
Ответ отправлен: 01.04.2007, 09:35


Вопрос № 80.496
Привет. Пожалуйста, ктонибуть ответьте на вопрос........
В реестре есть ключик тип REG_DWORD и нужно изменить значение с (0) на (1).
облазил всё и ничего похожего нет за исключением... попадается вот эта дрянь:

procedure TForm1.FormCreate(Sender: TObject);
var
BrandIni:TRegIniFile;
begin
BrandIni:=TRegIniFile.Create ('SYSTEM');
BrandIni.RootKey:=HKEY_LOCAL_MACHINE;
BrandIni.OpenKey ('SYSTEM', true);
BrandIni.OpenKey ('CurrentControlSet', true);
BrandIni.WriteString ('List', 'Set', 1)
BrandIni.Free;
end;

Они утверждают, что будет прописан тип DWORD я пробовал и чуть глаз не выпал, вроде
все нормально тока тип изменился на REG_SZ соответственно прога которая использовала ключ
перестала им пользоваться
Отправлен: 01.04.2007, 04:00
Вопрос задал: guytfuy (статус: Посетитель)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Coupler
Здравствуйте, HDex!
Я просто написал код заново - работает. В Вашем коде много непонятного: для чего использовать TRegIniFile, хотя это, наверное кто как привык, я использовал TRegistry; почему используется WriteString - для записи REG_DWORD нужно WriteInteger. В общем, мой код смотрите в приложении.

Приложение:

Ответ отправил: Coupler (статус: Студент)
Ответ отправлен: 01.04.2007, 05:02

Отвечает: Базанов Иван Александрович
Здравствуйте, guytfuy!
Вместо
BrandIni.WriteString ('List', 'Set', '1'); // все ж строка...
для типа DWORD используется
BrandIni.WriteInteger ('List', 'Set', 1);

---------
Disassemble your life and get the key
Ответ отправил: Базанов Иван Александрович (статус: 5-ый класс)
Ответ отправлен: 01.04.2007, 10:57

Отвечает: PGM
Здравствуйте, HDex!

WriteInteger вместо WriteString - вот спасение ;).
Ответ отправил: PGM (статус: 3-ий класс)
Ответ отправлен: 01.04.2007, 20:29


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Email: support@rusfaq.ru, тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале
Версия системы: 4.46 от 18.03.2007
Яндекс Rambler's Top100

В избранное