gethostbyname problem

[JnZn558]

delphi 2009 hab ich.

Delphi-Quellcode:

function test( str: string ) : Boolean;
begin
pHostEntry := gethostbyname( PAnsiChar( 'RechnerName' ) ); // so geht es ohne problem
pHostEntry := gethostbyname( PAnsiChar( PChar( str ) ) ); // so compiliert es, aber funz ned. pHostEntry wird hier nil
end;

welcher vorschlag bitte?