C++Builder 初级调试技术
在BCB论坛中有很多是可以用调试来看到问题所在.只是初学者不知道有这些东东,即使知道也不是如何去用.
我曾经也是这样.从第一本入门书 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="";
}
}
//---------------------------------------------------------------------------
用F8 看看程序流程
=>WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) //调试指针指向程序入口点 但还没有执行该条语句
{
try //第2下F8后指向这里
{
Application->Initialize(); //第3下F8后指向这里 决定是进到里面看看函数运行过程还是继续? 选择跳过 再按一次F8
Application->CreateForm(__classid(TForm1), &Form1); //第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 指到这里 想告术你该函数即将结束 这是它出口点
按Ctrl+F5 出现的画面 显示的是默认的字体;
第7下 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
Text=Text+Edit1->Text;
}
Memo1->Lines->Add(Text);
Text="";
}
}
这次 就按F9来运行 你可以看见 边上会打个绿色的小钩 表示该断点是有效的.接着按下Button1按钮
程序就会停了下来
接着就可以使用 F8 Ctrl+F5 如果没有问题就可以把端点取消掉 让后F9 让它自己运行去
以后再说了,先说到这里 再见!!! Program DeBug Over……….
