小编san*_*ego的帖子

我是第一次开发Delphi项目,我曾经在Java上开发.

有没有办法像在java中一样在delphi的控制台中打印.

System.out.println("Message");

我用来测试代码和发现bug(原始).

我得到这个错误将调试一个项目,以前在Delphi 7中我已经升级到Delphi XE2,同样的错误发生在几种方法中.

First chance exception at $006DC660. Exception class $C0000005 with message 'access violation at 0x006dc660 read of address 0xffffffff' 

这是方法之一:

PFI = ^TFI;           
TFI = record
Id         : TToken;
Name       : TName;
Parameters : string;
end;

function TListFI.IsIn(S: PChar): PFI;

  function SearchName2(Item: PFI):Boolean;
  var N1, N2: PChar;
  begin
    N1:= StrNew(Item^.Name);
    N2:= StrNew(S); //Here is the issue
    SearchName2:= (StrComp(StrUpper(N1), StrUpper(N2)) = 0);
    StrDispose(N1);
    StrDispose(N2);
  end;

begin
  IsIn:= PFI(FirstThat(@SearchName2));
end;

我用google搜索,我发现有人描述了类似的问题,并且他确认当增量链接器被禁用时它可以工作,有人可以告诉我它是什么,在哪里或提供一些建议来解决这种情况.

[编辑]

删除@ now会在IsIn中给出以下错误:= PFI(FirstThat(SearchName2));

E2010 Incompatible types: 'TObject' and …