求救！！我的程序怎么不可以调试了？左边没有兰色小点！！请高手指点！！！

Question

DELPHI和机器全部重新启动一遍，再不行，重装DELPHI.

Answer 1

有的可以调试，有的不行，不是DELPHI的问题吧？

Answer 2

Delphi编译时会将无用的代码过滤，所有在有些地方就不能设断点。
另外有些在线程中也不能调试

Answer 3

下面是一个向MODEM发送AT指令的过程，就是在这里不能设置断点。高手帮忙看看procedure TFMain.DSendClick(Sender: TObject);
var Async: THandle;
begin
  if Edit.Enabled and not Edit.Focused then Edit.SetFocus;
  if (msCommandState in Modem.ModemState) then
    begin
    Modem.SendCommand(Edit.Text);
    end
  else if not (loSend in Modem.Locked) then
  begin
    Modem.PurgeIn;
    BufStr := '';
    if (Memo.Lines[Memo.Lines.Count-1]<>'') then Memo.Lines.Add('');
    Async := Modem.InitAsync(nil, True);
    Modem.SendStringAsync(Async, Edit.Text+#13#10);
    ShowMessage('ok');
  end;
end;

Answer 4

原因可能是这样的：
你看看菜单：Project -> Options 的 Compiler页
里面有个Debugging的GroupBox，里面的Debug information必须要选上
否则就没有调试的可能了