Ну так раз у вас PBuffer - указатель, то сначала нужно выделить память под структуру и присвоить вашей переменной указатель на выделенную область памяти.
К тому же packed record вам тут совершенно не нужен. Попробуйте так
var
request : integer; //код возвращаемый функцией
host, port, user, password : Pchar;
u_type : char;
answer : PChar;
size: integer;
begin
host := '127.0.0.1';
port := '6666';
u_type := 'C';
size := 5000;
user := 'MASTER';
password := 'MASTERKEY';
request := IC_reg(host, port, u_type, user, password, answer, size);
edit1.Text := 'Получено '+IntToStr(request)+' байт. Ответ: '+answer;
end;