function npumep(S:PChar):PChar;
begin
Result:='Blitz3D npuBeT u3 Delphi 7';
end;
Если с PChar не покатит то PAnsiChar
Дело в том что делфийский String это щачло карпа которое понимает только Delphi. А везде принято использовать PChar тоесть грубо массив символов.