﻿<?xml version='1.0' encoding='UTF-8'?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/"><channel><title>Релиб / Программирование / Delphi  / Код SUIPack мешает отладке проги по F7 / Latest Posts</title><generator>InstantForum.NET v4.1.4</generator><description>Релиб</description><link>http://www.relib.com/forums/</link><webMaster>robot@relib.com</webMaster><lastBuildDate>Fri, 22 Aug 2008 04:08:09 GMT</lastBuildDate><ttl>20</ttl><item><title>Код SUIPack мешает отладке проги по F7</title><link>http://www.relib.com/forums/Topic914646-8-1.aspx</link><description>Хочу провести отладку проги. На форме есть компонент suiForm класса TsuiForm. Когда жму F8,&lt;br&gt;то строка идет по тексту:[i]&lt;br&gt;begin&lt;br&gt;  Application.Initialize;&lt;br&gt;  Application.CreateForm(TMainForm, MainForm);&lt;br&gt;  Application.CreateForm(TFormProbitie, FormProbitie);&lt;br&gt;...[/i]&lt;br&gt;&lt;br&gt;если я захочу зайти внутрь, скажем, [i]Application.CreateForm(TFormProbitie, FormProbitie);[/i], &lt;br&gt;то попаду не в процедуру procedure TFormProbitie.FormCreate(Sender: TObject); как я ожидаю, а в такую процедуру:&lt;br&gt;[code]procedure TsuiCustomButton.Notification(AComponent: TComponent;&lt;br&gt;  Operation: TOperation);&lt;br&gt;begin&lt;br&gt;    inherited;&lt;br&gt;&lt;br&gt;    if (&lt;br&gt;        (Operation = opRemove) and&lt;br&gt;        (AComponent = m_FileTheme)&lt;br&gt;    )then&lt;br&gt;    begin&lt;br&gt;        m_FileTheme := nil;&lt;br&gt;        SetUIStyle(SUI_THEME_DEFAULT);&lt;br&gt;    end;&lt;br&gt;end;[/code]&lt;br&gt;содержащуюся в файле SUIPack\Source\SUIButton.pas, а затем, по мере нажатий на F8, перейдет в [code]procedure TsuiMaskEdit.Notification(AComponent: TComponent;&lt;br&gt;  Operation: TOperation);&lt;br&gt;begin&lt;br&gt;    inherited;&lt;br&gt;&lt;br&gt;    if (&lt;br&gt;        (Operation = opRemove) and&lt;br&gt;        (AComponent = m_FileTheme)&lt;br&gt;    )then&lt;br&gt;    begin&lt;br&gt;        m_FileTheme := nil;&lt;br&gt;        SetUIStyle(SUI_THEME_DEFAULT);          &lt;br&gt;    end;&lt;br&gt;end;[/code] из SUIPack\Source\SUIEdit.pas и т.д. Зачем мне эти блуждания по SUIPack-овским кодам? Я хочу сразу после&lt;br&gt;нажатия F7 попадать в [i]Application.CreateForm(TFormProbitie, FormProbitie);[/i]! Что делать?&lt;br&gt;&lt;br&gt;Delphi 7, SUIPack 4</description><pubDate>Wed, 11 Jul 2007 11:22:31 GMT</pubDate><dc:creator>malor</dc:creator></item></channel></rss>