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

Уважаемые пользователи nowa.cc. Мы работаем для вас более 20 лет и сейчас вынуждены просить о финансовой помощи по оплате за сервер.
Окажите посильную поддержку, мы очень надеемся на вас. Реквизиты для переводов ниже.
Webmoney Webmoney WMZ: Z021474945171 Webmoney WME: E159284508897 Webmoney WMUSDT: T206853643180
Кошелёк для вашей помощи YooMoney 4100117770549562
YooMoney Спасибо за поддержку!

Ответ
 
Опции темы Опции просмотра Language
Старый 11.07.2007, 10: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 вне форума
 
Ответить с цитированием Вверх
Здесь может быть Ваша реклама
Здесь может быть Ваша реклама


Реклама: франциско бошМагазин бытовой техники: отпариватель polaris pgs 1820va - переходи на сайт ТАЙМТВ!TikTok Shopifyпривод belimo ушел с рынка в россииМагазин бытовой техники: холодильник атлант 142 см - переходи на сайт ТАЙМТВ!


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

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


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

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

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

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


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


Copyright ©2004 - 2026 NoWa.cc

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