Компьютерный форум 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 вне форума
 
Ответить с цитированием Вверх
Старый 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 код Выкл.

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


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


Copyright ©2004 - 2026 NoWa.cc

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