unit3.~pas

Delphi6分布式开发例程 )

unit Unit3;

interface
type
    HoldMeThread = class(TThread)
    private
    protected
        procedure Execute:override;
    end;   

implementation

end.