副标题#e#
有许多是可以用调试来看到问题地址.只是初学者不知道有这些东东,纵然知道也不是如何去用.
我曾经也是这样.从第一本入门书 BUG 一直困扰本身, 经常用ShowMessage("xxxx");来调查措施运行现象.
因为本人只学过TC 在TC中代码写的不很长,措施流程本身很清楚,也就没去利用TC的调试器,好象它没有集成
的调试器. 在BCB下,措施流程老是跳来跳去不象TC下样布局化编措施样层次清楚.因为BCB编程中会发生许多
事件,许多内部变革,并且有许多组件.就象汇编语言中的符号寄存器样,初学者无法把握它.
我曾经获得一本徐新华遍的<<C++BUILLDER5高级编程之IDE OOP>> 有人认为它是一本烂书,我觉的差不多.
内里较量全民先容了BCB集成的调试器,可是内里没有用实例来讲授.本人试来试去也不得其法.最后介入了事情
从事情中及前辈的示范,很快学会了根基调试手段.主要利用 F7 F8 F5 CTRL+F5 因为这些必需组合在一起才
能事情好,就象API函数样必需有多个函数齐心合力才气办成事.
这就是我想写该文章的目标,也可做为我的心得. 此刻我们就讲讲根基的非事件的例子……
我们就来段 :
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
Image1->Canvas->Font->Name="SimSun";
Image1->Canvas->Font->Size=30;
Image1->Canvas->TextOut(0,0,Edit3->Text);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString Text;
int i,j;
for(i=0;i<30;i++)
{
for(j=0;j<30;j++)
{
if(Image1->Canvas->Pixels[j][i]==clWhite)
Text=Text+Edit2->Text; ////虽然假如你要生成如下的文字,配景就用" ".
else
Text=Text+Edit1->Text;
}
Memo1->Lines->Add(Text);
Text="";
}
}
//---------------------------------------------------------------------------
#p#副标题#e#
用F8 看看措施流程
=>WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) //调试指针指向措施进口点 但还没有执行该条语句
{
try //第2下F8后指向这里
{
//第4下F8后指向这里抉择进去看看按下F7 请看下面....
Application->Run(); //第9下 F8 后指向这里 措施即将进入动静轮回 顿时就会显示出措施界面来
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
catch (...)
{
try
{
throw Exception("");
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
}
return 0;
}
//---------------------------------------------------------------------------
第5下 F7后指向:
=> __fastcall TForm1::TForm1(TComponent* Owner) //结构函数进口点
: TForm(Owner) //第6下 F8 不管它!!
{
Image1->Canvas->Font->Name="SimSun"; //第7下 F8 想看看Name是不是"SimSun" 好把光标移到Name中间按下 Ctrl+F5
Image1->Canvas->Font->Size=30; //第7下 F8 后已经运行了上面的语句了 看当作果如何?
Image1->Canvas->TextOut(0,0,Edit3->Text); //第8下 F8 同样可以看看Edit3的Text 你本身去看看!!
=> } //第9下 F8 指到这里 想告术你该函数即将竣事 这是它出口点
再看看 F5 断点配置 :把光标移到 if(Image1->Canvas->Pixels[j][i]==clWhite) 中间 按下F5 它就会用赤色标志出
留意必需在有效代码行中配置 空格和刮号为无效的.
void __fastcall TForm1::Button1Click(TObject *Sender)
{
AnsiString Text;
int i,j;
for(i=0;i<30;i++)
{
for(j=0;j<30;j++)
{
if(Image1->Canvas->Pixels[j][i]==clWhite)
Text=Text+Edit2->Text; ////虽然假如你要生成如下的文字,配景就用" ".
else
Application->Initialize(); //第3下F8后指向这里 抉择是进到内里看看函数运行进程照旧继承? 选择跳过 再按一次F8
Application->CreateForm(__classid(TForm1), &Form1);
//第4下F8后指向这里抉择进去看看按下F7 请看下面….
措施就会停了下来
接着就可以利用 F8 Ctrl+F5 假如没有问题就可以把端点打消掉 让后F9 让它本身运行去
今后再说了,先说到这里 再见!!! Program DeBug Over……….
