TSPIDevice

type TSPIDevice = class(TObject)

protected

  function GetBitsPerWord; virtual; abstract;

  procedure SetBitsPerWord(); virtual; abstract;

  function GetLSBFirst; virtual; abstract;

  function GetMaxFrequency; virtual; abstract;

  function GetMode; virtual; abstract;

  procedure SetLSBFirst(); virtual; abstract;

  procedure SetMaxFrequency(); virtual; abstract;

  procedure SetMode(); virtual; abstract;

public

  function Read(); virtual;

Half duplex read

  function Write(); virtual;

Half duplex write

  procedure ReadAndWrite(); virtual; abstract;

Bidirectional read and write

  property Mode: TSPIMode; [rw]

The SPI Mode

  property LSBFirst: Boolean; [rw]

Transfer the least or most significant bit first

  property MaxFrequency: LongWord; [rw]

Maximum Frequency (Hz)

  property BitsPerWord: Byte; [rw]

Count of bits transferred as smallest unit

end;

TSPIDevice

Abstract SPI device

TObject