zoukankan      html  css  js  c++  java
  • 十二、详测 Generics Collections TList (3): Insert、Delete、Remove、Extract

    unit Unit1;

    interface

    uses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs, StdCtrls;

    type
      TForm1 
    = class(TForm)
        Button1: TButton;
        
    procedure Button1Click(Sender: TObject);
      
    private
        
    { Private declarations }
      
    public
        
    { Public declarations }
      
    end;

    var
      Form1: TForm1;

    implementation

    {$R *.dfm}

    uses
      Generics.Collections;

    procedure TForm1.Button1Click(Sender: TObject);
    var
      List: TList
    <Integer>;
      i: Integer;
      str: 
    string;
    begin
      List :
    = TList<Integer>.Create;
      list.Add(
    111);
      list.Add(
    222);
      list.Add(
    333);
      list.Add(
    444);
      list.Add(
    555);
      List.Insert(
    0,888); //Insert
      List.Insert(
    2,999);
      str :
    = '';
      
    for i in List do str := str + UIntToStr(i) + ' ';
      ShowMessage(str);

      List.Delete(
    0);  //Delete
      List.Delete(List.count 
    - 1);
      str :
    = '';
      
    for i in List do str := str + UIntToStr(i) + ' ';
      ShowMessage(str);
      List.Remove(
    333);    //Remove
      str :
    = '';
      
    for i in List do str := str + UIntToStr(i) + ' ';
      ShowMessage(str);
      List.Extract(
    222);   //Extract
      str :
    = '';
      
    for i in List do str := str + UIntToStr(i) + ' ';
      ShowMessage(str);
      List.Free;
    end;

    end.
  • 相关阅读:
    总结CSS3新特性(颜色篇)
    JavaScript的一些小技巧(转)
    CSS3中的calc()
    使用 Google Guava 美化你的 Java 代码
    Hibernate Validator验证标签说明
    SQL语法粗整理
    DruidDataSource配置属性列表
    IntelliJ Idea 常用快捷键列表
    curl命令使用(转)
    spring纯java注解式开发(一)
  • 原文地址:https://www.cnblogs.com/jxgxy/p/1595894.html
Copyright © 2011-2022 走看看