还有如何取出任意一行的value和string?

解决方案 »

  1.   

    var
      I: Integer;
    begin
      I := ValueListEditor1.Selection.Top;
      ShowMessage(ValueListEditor1.Keys[I]);
      ShowMessage(ValueListEditor1.Values[ValueListEditor1.Keys[I]]);
    end;————————————————————————————————————
    宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
    ————————————————————————————————————