IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

 
 Ответить  Открыть новую тему 
> Пошаговая компиляция + Showmodal
klem4
сообщение 1.10.2005 11:01
Сообщение #1


Perl. Just code it!
******

Группа: Модераторы
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


2 вопроса :

1) Обнаружил, что Delphi внезапно перестала реагировать на нажатие клавиши F7, тто есть я не могу теперь осуществить пошаговую компиляцию

2)

В OnCreate формы нельзя записывать Вызов второй формы чтоли ?

procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Caption := _ShowNow;
_LoadImage;
if NOT(FileExists('Rasp.txt')) then
Form2.ShowModal;
end;


Сообщение отредактировано: klem4 - 1.10.2005 11:04


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
klem4
сообщение 1.10.2005 11:12
Сообщение #2


Perl. Just code it!
******

Группа: Модераторы
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Все, врубился кажется все дело в :

Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm2, Form2);


чтобы не мучаться сделал вот так :
procedure TForm2.FormCreate(Sender: TObject);
begin
IF NOT(FileExists('Rasp.txt')) then
Form2.ShowModal;
end;


мне тут не принципиально ...

но с F7 реально не приятно ...

Сообщение отредактировано: klem4 - 1.10.2005 11:15


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
klem4
сообщение 1.10.2005 12:24
Сообщение #3


Perl. Just code it!
******

Группа: Модераторы
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Решить проблему пошагового прогона помогла только переустановка дельфей ...


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
xds
сообщение 1.10.2005 14:47
Сообщение #4


N337
****

Группа: Пользователи
Сообщений: 737
Пол: Мужской

Репутация: -  26  +


Возможная причина - в опциях отключена генерация отладочной информации.


--------------------
The idiots are winning.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
klem4
сообщение 1.10.2005 14:51
Сообщение #5


Perl. Just code it!
******

Группа: Модераторы
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Цитата(xds @ 1.10.2005 15:47)
Возможная причина - в опциях отключена генерация отладочной информации.


Конечно все может быть, но я ведь не отключал ничего... Теперь это уже не важно.


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 8.07.2025 21:28
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"