各位朋友给看看，这段程序

Question

buffer:array[0..packlen] of char;
temp:string;
case buffer[0] of
  'r':
   begin
    temp:=extractfilename(edit1.Text);
    j:=length(temp);
    temp:=format('%.10d%.10d',[edit1.Tag])+temp;
    strcopy(buffer,'b'+temp);错误是这一行
    serversocket1.Socket.Connections[i].SendBuf(buffer,length(buffer));
现在出现了这样的错误[Error] Usocket.pas(131): Incompatible types: 'String' and 'PAnsiChar'，请指点，谢谢

Answer 1

strcopy(buffer,'b'+temp);
改为
GetMem(buffer, Length(PChar('b' + temp));
StrCopy(buffer, PChar('b' + temp));

Answer 2

buffer現在是Char型的，不能直接用StrCopy
用dulei115的方法應該可以了