| Class TNetSales (unit Netsales) |
TList
| Constructors |
constructor Create;| Functions |
procedure SetCurrent(const Value: integer);
procedure Add_One(ID, Info: String);
procedure Add_OneNoNotify(ID, Info: String);
procedure Clear;
procedure Delete_Current;
destructor Destroy;
procedure First;
function GetCurrentID: string;
function GetCurrentInfo: TStringList;
function GetCurrentInfoAsString: String;
function IsCurrentValid: bool;
procedure Last;
procedure Next;
procedure Prior;
procedure ReadFromIni(Ini: TIniFile);
procedure UpdateCurrentID(aID: String);
procedure UpdateCurrentInfo(aInfo: TStringList);
procedure UpdateCurrentInfoAsString(aInfo: String);
procedure WriteToIni(Ini: TIniFile);| Properties |
property Current : Integer| Events |
event OnChange : TNotifyEvent| Variables |
FCurrent : Integer;
FOnChange : TNotifyEvent;| Constructors |
constructor Create;********************************************************** TNetSales
| Functions |
procedure SetCurrent(const Value: integer);
procedure Add_One(ID, Info: String);Force to update
procedure Add_OneNoNotify(ID, Info: String);
procedure Clear;
procedure Delete_Current;LastItem
destructor Destroy;
procedure First;
function GetCurrentID: string;get strings from Current object
function GetCurrentInfo: TStringList;
function GetCurrentInfoAsString: String;
function IsCurrentValid: bool;
procedure Last;
procedure Next;navigation
procedure Prior;
procedure ReadFromIni(Ini: TIniFile);
procedure UpdateCurrentID(aID: String);update strings in Current object
procedure UpdateCurrentInfo(aInfo: TStringList);
procedure UpdateCurrentInfoAsString(aInfo: String);
procedure WriteToIni(Ini: TIniFile);| Properties |
property Current : Integerproperty
| Events |
event OnChange : TNotifyEvent| Variables |
FCurrent : Integer;
FOnChange : TNotifyEvent;