如何去除 Warning

Question

我现在用Delphi7.一个非常讨厌的问题老是出现
[Warning] fra_MagWeekPlan.pas(230): Unsafe type 'Data: Pointer'
不安全指针的情况。
随便新建个工程, 放个Button和TreeView 在配上下面的代码就警告。用编译命令，如果这种情况多就太麻烦。有什么开关可以取消这个“不安全指针” 警告？
//===================================================
//代码
//----------------------------------------------------
//{$WARNINGS OFF}
procedure TForm1.Button1Click(Sender: TObject);
var
  I:Integer;
begin
  with TreeView1.Items do
  for I := 0 to Count -1 do
  begin
    if Assigned(Item[I].Data) then
      Dispose(Item[I].Data);
  end;
end;
//{$WARNINGS ON}
----------------------------------

Answer 1

Project-->Options-->Complier Messages
把show warning去掉

Answer 2

hanlin2004(青山隐不住) 说的对
不过建议不要去掉

Answer 3

不需要处理它的，都没影响的
能Run得好就是了

Answer 4

Project-->Options-->Complier Messages將最後三項  unsafe XXX 的不要勾選就好!
這個標準的做法, 樓上的其它說法都不對!!

Answer 5

將最後三項  unsafe XXX 的不要勾選就好!
這樣并不會影響任何東西, 這個warning只是為了保證你的代碼有一天向.net移植才有用,但我估計用不到的

Answer 6

谢谢大家的帮忙！
我最后还是决定，让这个Warning留这。

Answer 7

偶个人认为在win32下把设计指针的操作吼成unsafe才是掩耳盗铃，
毕竟Delphi7是纯粹的win32应用，跟.Net不搭边，没必要凑这个热闹。