TIPOptions

From Ultibo.org
Jump to: navigation, search

Return to Unit IP


Description


To be documented

Class definitions



TIPOptions = class(TTransportOptions)

Note: For Get/Set Options Level = IP_PROTO Option = ???
 
constructor Create;  
destructor Destroy; override;  
private
FMemory:TMemoryStream;  
FOptions:Pointer;  
FLength:Integer;  
 
FTOS:Byte; IPTOS_LOWDELAY etc
FTTL:Byte; Time To Live
FFlags:Word; IP_DF etc
FHeader:Boolean; IP_HDRINCL
FMulticastIF:TInAddr; IP_MULTICAST_IF
FMulticastTTL:Byte; IP_MULTICAST_TTL
FMulticastLOOP:Boolean; IP_MULTICAST_LOOP
 
procedure SetTOS(ATOS:Byte);  
procedure SetTTL(ATTL:Byte);  
procedure SetFlags(AFlags:Word);  
procedure SetHeader(AHeader:Boolean);  
procedure SetMulticastIF(const AMulticastIF:TInAddr);  
procedure SetMulticastTTL(AMulticastTTL:Byte);  
procedure SetMulticastLOOP(AMulticastLOOP:Boolean);  
 
procedure SetLength(ALength:Integer);  
public
property TOS:Byte read FTOS write SetTOS;  
property TTL:Byte read FTTL write SetTTL;  
property Flags:Word read FFlags write SetFlags;  
property Header:Boolean read FHeader write SetHeader;  
property MulticastIF:TInAddr read FMulticastIF write SetMulticastIF;  
property MulticastTTL:Byte read FMulticastTTL write SetMulticastTTL;  
property MulticastLOOP:Boolean read FMulticastLOOP write SetMulticastLOOP;  
 
property Options:Pointer read FOptions; IP_OPTIONS
property Length:Integer read FLength write SetLength;  


Function declarations



constructor TIPOptions.Create;
Description: To be documented
Note None documented


destructor TIPOptions.Destroy;
Description: To be documented
Note None documented


procedure TIPOptions.SetTOS(ATOS:Byte);
Description: To be documented
Note None documented


procedure TIPOptions.SetTTL(ATTL:Byte);
Description: To be documented
Note None documented


procedure TIPOptions.SetFlags(AFlags:Word);
Description: To be documented
Note None documented


procedure TIPOptions.SetHeader(AHeader:Boolean);
Description: To be documented
Note None documented


procedure TIPOptions.SetMulticastIF(const AMulticastIF:TInAddr);
Description: To be documented
Note None documented


procedure TIPOptions.SetMulticastTTL(AMulticastTTL:Byte);
Description: To be documented
Note None documented


procedure TIPOptions.SetMulticastLOOP(AMulticastLOOP:Boolean);
Description: To be documented
Note None documented


procedure TIPOptions.SetLength(ALength:Integer);
Description: To be documented
Note None documented


Return to Unit Reference