Компьютерный форум NoWa.cc Здесь может быть Ваша реклама
Правила Форума
редакция от 22.06.2020
Портал .::2BakSa.WS::.
Вернуться   Компьютерный форум NoWa.cc > В помощь вебмастеру > Программирование > Delphi

Уважаемые пользователи nowa.cc и 2baksa.ws. У нас сложилось тяжёлое финансовое положение. Мы работаем для вас вот уже более 15 лет и сейчас вынуждены просить о помощи. Окажите посильную поддержку проектам. Мы очень надеемся на вас. Реквизиты для переводов ниже.
Webmoney Webmoney WMZ: 826074280762 Webmoney WME: 804621616710
PayPal PayPal_Email E-mail для связи по вопросу помощи
Кошелёк для вашей помощи YooMoney 4100117770549562
YooMoney Спасибо за поддержку!
Ответ
 
Опции темы Опции просмотра Language
Старый 11.07.2007, 11:19   #1
Неактивный пользователь
 
Пол:Мужской
Регистрация: 02.07.2007
Сообщений: 19
Репутация: 0
По умолчанию Код SUIPack мешает отладке проги по F7

Хочу провести отладку проги. На форме есть компонент suiForm класса TsuiForm. Когда жму F8,
то строка идет по тексту:
begin
Application.Initialize;
Application.CreateForm(TMainForm, MainForm);
Application.CreateForm(TFormProbitie, FormProbitie);
...


если я захочу зайти внутрь, скажем, Application.CreateForm(TFormProbitie, FormProbitie);,
то попаду не в процедуру procedure TFormProbitie.FormCreate(Sender: TObject); как я ожидаю, а в такую процедуру:
Код:
procedure TsuiCustomButton.Notification(AComponent: TComponent;
  Operation: TOperation);
begin
    inherited;

    if (
        (Operation = opRemove) and
        (AComponent = m_FileTheme)
    )then
    begin
        m_FileTheme := nil;
        SetUIStyle(SUI_THEME_DEFAULT);
    end;
end;
содержащуюся в файле SUIPack\Source\SUIButton.pas, а затем, по мере нажатий на F8, перейдет в
Код:
procedure TsuiMaskEdit.Notification(AComponent: TComponent;
  Operation: TOperation);
begin
    inherited;

    if (
        (Operation = opRemove) and
        (AComponent = m_FileTheme)
    )then
    begin
        m_FileTheme := nil;
        SetUIStyle(SUI_THEME_DEFAULT);          
    end;
end;
из SUIPack\Source\SUIEdit.pas и т.д. Зачем мне эти блуждания по SUIPack-овским кодам? Я хочу сразу после
нажатия F7 попадать в Application.CreateForm(TFormProbitie, FormProbitie);! Что делать?

Delphi 7, SUIPack 4
malor вне форума
 
Ответить с цитированием Вверх
Здесь может быть Ваша реклама
Здесь может быть Ваша реклама


Реклама: брекеты для прикусатеплоходная поездка из москвы в казаньфлюс для пайки золотаskc60клапан ирисовый ird 125


Старый 07.04.2008, 22:14   #2
Dr Evil
Неактивный пользователь
 
Пол:Мужской
Регистрация: 24.08.2006
Сообщений: 31
Репутация: 6
По умолчанию Ответ: Код SUIPack мешает отладке проги по F7

Надо использовать точки останова...
__________________
Бог два раза в жизни дает человеку бесплатные зубы... в третий раз за них предется платить... :4:
Dr Evil вне форума
 
Ответить с цитированием Вверх
Ответ


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Что Вам мешает бросить курить?... mimi Если хочешь быть здоров 192 11.05.2015 15:19
Помогите с TMSComponentPack4607 и с SUIPack Dr Evil Компоненты 10 20.10.2009 16:02
2 оси, 1 проги casperok Архив 7 23.06.2006 14:18

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход


Текущее время: 01:40. Часовой пояс GMT +3.


Copyright ©2004 - 2024 2BakSa.WS

Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2024, vBulletin Solutions, Inc. Перевод: zCarot
Время генерации страницы 0.13932 секунды с 13 запросами