procedure Tform1.dsi(?????);//请问这里应该如何表示
var 
tip:array [0..63] of ansichar;
begin
  Tip:=title;//title作为字符传递的参数
end;

解决方案 »

  1.   

    type 
      y=array [0..63] of ansichar;
     
    procedure Tform1.dsi(title:y);//请问这里应该如何表示
    var 
    tip:y;
    begin
      Tip:=title;//title作为字符传递的参数
    end;
      

  2.   

    这段代码有问题,将
    1、不要用Tip:=title;改用StrCopy(Tip, Title),当然Title不能超过63个字符。因为Tip已经分配了一段内存
    2、声明Title为PChar就可以了,另外Char比AnsiChar之类的更灵活,根据需要它既可以是AnsiChar,也可以是WideChar(Unicode)
    procedure Tform1.dsi(Title: PChar);
    var tip:array [0..63] of Char;
    begin
      StrCopy(Tip, Title); 
    end;