编程论坛 → Delphi论坛

try except

adam1103 发布于 2007-12-24 18:21， 1759 次点击

try
...
....
......
.....
...

except
....
..
这个语句是什么意思?

4 回复

anthony6342007-12-24 19:17

处理错误的。
书上有说的

anthony6342007-12-24 19:30

procedure TForm1.Button1Click(Sender: TObject);
var
  testRange: array [0..5]of Integer;
  index: Integer;
begin
  index := 6;
  ZeroMemory(@testRange, SizeOf(testRange));
  try
    testRange[index] := 6;
    Self.Caption := IntToStr(testRange[index]);
  except
    on e: Exception do
      Self.Caption := '测试错误:' + e.Message;
  end;
end;
顶了一个以前的帖上来，你可以去浏览下

adam11032007-12-25 08:51

哦
谢谢了

ZeroMemory(@testRange, SizeOf(testRange));
@testRange 是什么意思?

zhoukai2008-04-18 09:28

一点小的回答！

try
正常语句
except
异常处理语句
end
功能：当发生异常时，在EXCEPT后面可以知道发生了什么异常，并可能进行相关的处理。
@放在变量的前面，可以获取该变量的地址！