TAsioHostCore

type TAsioHostCore = class(TObject)

protected

  class function GetInputChannelClass; virtual;

  class function GetOutputChannelClass; virtual;

  procedure WndProc();

  procedure PMAsio(); message;

  procedure PMBufferSwitch(); message;

  procedure PMBufferSwitchTimeInfo(); message;

  procedure AquireCanDos; virtual;

  procedure AquireClockSources; virtual;

  procedure AquireDriverName; virtual;

  procedure AquireDriverVersion; virtual;

  procedure AquireSampleRate; virtual;

  procedure BufferSizeChange; virtual;

  procedure BufferSwitch(); virtual;

  procedure BufferSwitchTimeInfo(); virtual;

  procedure ClearBuffers; virtual;

  procedure DetermineBuffersize; virtual;

  procedure InitializeCallbacks; virtual;

  procedure InitializeDriver; virtual;

  procedure LatencyChanged; virtual;

  procedure Reset; virtual;

  procedure ResyncRequest; virtual;

  procedure SampleRateChanged; virtual;

  procedure InternalBufferSwitch(); virtual;

  function InternalBufferSwitchTimeInfo(); virtual;

  procedure InternalSampleRateDidChange(); virtual;

  function MessageHandler(); virtual;

  property BuffersCreated: Boolean; [r]

public

  constructor Create(); virtual;

  destructor Destroy; override;

  procedure DefaultHandler(); override;

  procedure ControlPanel;

  procedure CreateBuffers;

  procedure DisposeBuffers;

  procedure Start;

  procedure Stop;

  function CanSampleRate();

  property AsioTime: TAsioTimeSub; [rw]

  property BufferGranularity: Integer; [rs]

  property BufferMaximum: Integer; [rs]

  property BufferMinimum: Integer; [rs]

  property BufferPreferredSize: Integer; [rs]

  property BufferSize: Cardinal; [rs]

  property CanDos: TAsioCanDos; [r]

  property Driver: IStdCallAsio; [r]

  property DriverName: string; [r]

  property DriverVersion: Integer; [r]

  property InputChannel []: TAsioChannelInput; [r]

  property InputChannelCount: Integer; [r]

  property InputLatency: Integer; [r]

  property OutputChannel []: TAsioChannelOutput; [r]

  property OutputChannelCount: Integer; [r]

  property OutputLatency: Integer; [r]

  property Running: Boolean; [r]

  property SampleRate: Double; [rw]

  property Supports: TAsioSupports; [rw]

  property OnBufferSwitch: TBufferSwitchEvent; [rw]

  property OnLatencyChanged: TNotifyEvent; [rw]

  property OnReset: TNotifyEvent; [rw]

end;

TAsioHostCore

TObject