怎样用Delphi 写一个Quequ?

我想用一个队列, 但不知用Object Passical 怎样写? 能给一个使用的例子吗?

解决方案 »

  1.   

    不用你写
    delphi就有TQueue类
    在
    Contnrs单元
      

  2.   

    不行啊,出错了,说没有这个code 帮助也找不到... 你能不能给个简单的例子?先谢谢了!
      

  3.   

    同意老达摩，
    DELPHI6有这单元的。
      

  4.   

    unit Unit1;interfaceuses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs,
      Contnrs;
    type
      TForm1 = class(TForm)
      private
        { Private declarations }
      public
        { Public declarations }
      end;var
      Form1: TForm1;
    implementation
    var 
      MyQueue:TQueue;    //声明队变量
    {$R *.dfm}end.
      

  5.   

    还是出错!![Error] Unit1.pas(24); Undeclared identifier: 'TQuequ'
      

  6.   

    打错了
    TQuequ
    应为
    TQueue
      

  7.   

    谢谢了,可以了, TQueue 是对的.. 给分, 尽管我只有200分..:)