Pascal嵌套数组输出方法与音乐播放器专辑显示报错排查

这个错误几乎肯定是因为你在代码里尝试直接操作Tracks这个嵌套数组类型的变量了——比如直接把它传给Writeln，或者在某些上下文里（比如函数返回值、赋值操作）直接处理整个数组，而Pascal不支持这种操作。

既然你只需要显示专辑信息，不需要曲目，那解决起来很简单：在显示专辑的逻辑里完全避开对Tracks变量的直接操作。

给你几个具体的调整方向：

1. 检查显示逻辑：确保你打印专辑的时候，只访问专辑的名称、艺术家这些基础字段，别碰AlbumTracks（也就是Tracks类型的字段）。比如写一个只打印专辑核心信息的过程：

procedure PrintAlbumBasicInfo(album: Album);
begin
  Writeln('专辑: ', album.Name);
  Writeln('艺术家: ', album.Artist);
  Writeln('----------------');
end;

2. 调整ReadAllTrack函数：如果这个函数是用来加载曲目，但你现在不需要用这些曲目，要么暂时注释掉函数里对Tracks数组的返回/赋值逻辑，要么把它改成过程（避免直接返回复杂类型）。比如：

// 改成过程，把Tracks数组作为var参数传入，而不是返回它
procedure ReadAllTrack(prompt: String; var tracks: Tracks);
var
  i, trackCount: Integer;
begin
  Write(prompt);
  Readln(trackCount);
  SetLength(tracks, trackCount);
  for i := 0 to trackCount - 1 do
  begin
    Write('第', i+1, '首曲目名称: ');
    Readln(tracks[i].Title);
    Write('时长(秒): ');
    Readln(tracks[i].Duration);
  end;
end;

调用这个过程加载曲目后，只要不在显示专辑的时候使用tracks变量，就不会触发错误。

3. 排查代码中的违规操作：找一找有没有类似Writeln(album.AlbumTracks)这种直接输出嵌套数组的代码，或者把Tracks类型变量直接赋值给其他不兼容类型的地方，删掉或注释掉这些代码就行。

内容的提问来源于stack exchange，提问作者Khang