Classe TStream

Unit

mi.rtl.Objects.Methods.StreamBase.Stream

Declaração

type TStream = class(TStreamBase)

Descrição

• A class TStream é a classe base da classes _TStream do pacote mi.rtl.

Hierarquia

• TObjectsTypes
• TObjectsConsts
• TObjectsMethods
• TStreamBase
• TStream

Visão Geral

Campos

	_Base: Pointer;
	_Rec: Pointer;
	Status_Rewrite: Byte;
	ClockBegin: DWord;
	Last_Mode: TLast_Mode_Read_Write;
	var State: Longint;
	Ok_FreeMem_Rec:Boolean;
	_FileName: AnsiString;

Métodos

	procedure Set_BaseSize(a_Base : Pointer;a_BaseSize:Longint); Overload; Virtual;
	procedure SetBaseSize(a_BaseSize : Longint); Overload; Virtual;
	procedure Set_RecSize(a_Rec : Pointer;a_RecSize:Longint); Overload; Virtual;
	procedure SetRecSize(a_RecSize : Longint); Overload; Virtual;
	Function Calc_Pos(NR: LongInt;a_RecSize:Longint):Longint;
	function FileSize: Longint; overload; Virtual;
	procedure Seek(NR: LongInt;a_RecSize:Longint); Overload; override;
	constructor Create(); overload; override;
	destructor Destroy; Override;
	procedure Set_Ok_Aguarde(a_Ok_Aguarde: Boolean); Virtual;
	function CloseOpen:Integer; VIRTUAL;
	function Flush_Disk:Integer; Virtual;
	procedure Flush; Override;
	procedure Read(Var Buf; Count: Sw_Word;Var BytesRead:Sw_Word) ; Overload; Virtual;
	procedure Write(Var Buf; Count: Sw_Word;Var BytesWrite:Sw_Word); Overload; Virtual;
	procedure SetFileMode(Const aFileMode:Word); virtual;
	procedure SetShareMode(Const aShareMode:Cardinal); virtual;
	function SetStateFileMode(Const AState: Longint; Const Enable: boolean):Boolean;
	function GetStateFileMode(Const AState: Longint): Boolean;
	procedure Reset; overload; Override;
	procedure Reset(aFileMode: Word;ShareMode : Cardinal); overload; Virtual; abstract;
	procedure Rewrite; overload; override;
	procedure Rewrite(aFileMode: Word;ShareMode : Cardinal); Overload; Virtual; abstract;
	function SetBufSize(Const aBufSize : Sw_Word):Sw_Word; Overload; Virtual;
	function IsFileOpen:Boolean; Virtual;
	function GetRecBase(Var RecBase):Integer; Overload; Virtual;
	function PutRecBase(Var RecBase):Integer; Overload; Virtual;
	function GetRecBase:Integer; Overload; Virtual;
	function PutRecBase:Integer; Overload; Virtual;
	function GetRec(Nr: Longint;Var Rec):Integer; Overload; Virtual;
	function PutRec(Nr: Longint;Var Rec):Integer; Overload; Virtual;
	function GetRec(Nr: Longint):Integer; Overload; Virtual;
	function PutRec(Nr: Longint):Integer; Overload; Virtual;
	function BlockRead(Nr: Longint;Var Blocks ; Const Count: Longint):Longint; Virtual;
	function BlockWrite(Nr: Longint;Var Blocks ; Const Count: Longint):Longint; Virtual;
	procedure Error(Code, Info: Integer); Override;
	procedure Truncate(Pos: LongInt); Overload; Virtual;
	procedure CopyFrom(Var S: TStream; Count: LongInt); Overload; Virtual;
	procedure CopyFrom(Var S: TStream ); Overload; Virtual;
	function Bof:Boolean; Virtual;
	function Eof:Boolean; Virtual;
	function goBof:Boolean;
	function goEof:Boolean;
	procedure SetFileName(a_FileName: AnsiString); Virtual;
	function GetFileName: AnsiString; Virtual;

Propriedades

	property BaseSize: Longint Read _BaseSize write SetBaseSize;
	property RecSize: Longint Read _RecSize write SetRecSize;
	property Ok_Aguarde: Boolean Read _Ok_Aguarde write Set_Ok_Aguarde;
	property FileMode : Word Read _FileMode write SetFileMode;
	property ShareMode : Cardinal read _ShareMode write SetShareMode;
	property FileName : AnsiString read GetFileName write SetFileName;

Descrição

Campos

	_Base: Pointer;

	_Rec: Pointer;

	Status_Rewrite: Byte;

	ClockBegin: DWord;

	Last_Mode: TLast_Mode_Read_Write;

	var State: Longint;

	Ok_FreeMem_Rec:Boolean;

	_FileName: AnsiString;

Métodos

	procedure Set_BaseSize(a_Base : Pointer;a_BaseSize:Longint); Overload; Virtual;

	procedure SetBaseSize(a_BaseSize : Longint); Overload; Virtual;

	procedure Set_RecSize(a_Rec : Pointer;a_RecSize:Longint); Overload; Virtual;

	procedure SetRecSize(a_RecSize : Longint); Overload; Virtual;

	Function Calc_Pos(NR: LongInt;a_RecSize:Longint):Longint;

	function FileSize: Longint; overload; Virtual;

	procedure Seek(NR: LongInt;a_RecSize:Longint); Overload; override;

	constructor Create(); overload; override;

	destructor Destroy; Override;

	procedure Set_Ok_Aguarde(a_Ok_Aguarde: Boolean); Virtual;

	function CloseOpen:Integer; VIRTUAL;

	function Flush_Disk:Integer; Virtual;

	procedure Flush; Override;

	procedure Read(Var Buf; Count: Sw_Word;Var BytesRead:Sw_Word) ; Overload; Virtual;

	procedure Write(Var Buf; Count: Sw_Word;Var BytesWrite:Sw_Word); Overload; Virtual;

	procedure SetFileMode(Const aFileMode:Word); virtual;

	procedure SetShareMode(Const aShareMode:Cardinal); virtual;

	function SetStateFileMode(Const AState: Longint; Const Enable: boolean):Boolean;

	function GetStateFileMode(Const AState: Longint): Boolean;

	procedure Reset; overload; Override;

	procedure Reset(aFileMode: Word;ShareMode : Cardinal); overload; Virtual; abstract;

	procedure Rewrite; overload; override;

	procedure Rewrite(aFileMode: Word;ShareMode : Cardinal); Overload; Virtual; abstract;

	function SetBufSize(Const aBufSize : Sw_Word):Sw_Word; Overload; Virtual;

	function IsFileOpen:Boolean; Virtual;

	function GetRecBase(Var RecBase):Integer; Overload; Virtual;

	function PutRecBase(Var RecBase):Integer; Overload; Virtual;

	function GetRecBase:Integer; Overload; Virtual;

	function PutRecBase:Integer; Overload; Virtual;

	function GetRec(Nr: Longint;Var Rec):Integer; Overload; Virtual;

	function PutRec(Nr: Longint;Var Rec):Integer; Overload; Virtual;

	function GetRec(Nr: Longint):Integer; Overload; Virtual;

	function PutRec(Nr: Longint):Integer; Overload; Virtual;

	function BlockRead(Nr: Longint;Var Blocks ; Const Count: Longint):Longint; Virtual;

	function BlockWrite(Nr: Longint;Var Blocks ; Const Count: Longint):Longint; Virtual;

	procedure Error(Code, Info: Integer); Override;

	procedure Truncate(Pos: LongInt); Overload; Virtual;

	procedure CopyFrom(Var S: TStream; Count: LongInt); Overload; Virtual;

	procedure CopyFrom(Var S: TStream ); Overload; Virtual;

	function Bof:Boolean; Virtual;

	function Eof:Boolean; Virtual;

	function goBof:Boolean;

	function goEof:Boolean;

	procedure SetFileName(a_FileName: AnsiString); Virtual;

	function GetFileName: AnsiString; Virtual;

Propriedades

	property BaseSize: Longint Read _BaseSize write SetBaseSize;

	property RecSize: Longint Read _RecSize write SetRecSize;

	property Ok_Aguarde: Boolean Read _Ok_Aguarde write Set_Ok_Aguarde;

	property FileMode : Word Read _FileMode write SetFileMode;

	property ShareMode : Cardinal read _ShareMode write SetShareMode;

	property FileName : AnsiString read GetFileName write SetFileName;

---

Gerado por PasDoc 0.16.0.