关于ktv点播系统的播放列表的问题(100分)

环境是delphi +access
要实现的功能是这样的:
我点了歌曲后,"已点歌曲"的信息就存在一张表上,我要实现删除已点的某一首歌道是简单,但怎么实现歌曲的优先,就是让它在当前位置上移一位?
另外"已点歌曲"即播放列表可不可以不用数据表实现,也就是说用什么数据结构来替代这张数据表?

再简单不过的问题，通常已点歌列表是不需要保存成文件的，所以为什么不直接用数组的形式呢？例如：
VAR Selected_songs : array [1..24,1..3] of String;
// 已选歌曲数组
Selected_songs[I,1]='歌名';
Selected_songs[I,2]='演唱者';
Selected_songs[I,3]='文件';
其中I就是播放次序，要实现优先需要把数组的元素重新排列一下就OK了啊
temp_1 := Selected_songs[There_Selected,1];
temp_2 := Selected_songs[There_Selected,2];
temp_3 := Selected_songs[There_Selected,3];
for i:= There_Selecteddo
wnto 2do

begin

Selected_songs[i,1] := Selected_songs[i-1,1];
Selected_songs[i,2] := Selected_songs[i-1,2];
Selected_songs[i,3] := Selected_songs[i-1,3];
end;

Selected_songs[1,1] := temp_1;
Selected_songs[1,2] := temp_2;
Selected_songs[1,3] := temp_3;

我的代码都给你了，该不成问题了吧。

[]