| Class TRAS (unit Rascomp32) |
TComponent
| Constructors |
Constructor Create(AOwner: TComponent);| Functions |
function Connect: LongInt;
function CurrentStatus: String;
Destructor Destroy;
function DisConnect: LongInt;
function GetConnections: LongInt;
function GetConnectStatus: LongInt;
function GetEntry(strEntryName : string) : Boolean;
function GetErrorString(ErrorCode: LongInt): String;
function GetPhoneBookEntries: LongInt;
function IsConnected : Boolean;
procedure AboutToConnDev;
procedure AboutToOpenPort;
procedure AllDevsConnected;
procedure AuthAck;
procedure AuthCallBack;
procedure AuthChangePassword;
procedure Authenticate;
procedure Authenticated;
procedure AuthLinkSpeed;
procedure AuthNotify;
procedure AuthProject;
procedure AuthRetry;
procedure Connected;
procedure DevConnected;
procedure DisConnected;
procedure InteractiveStarted;
function InternalDisconnect: LongInt;
procedure PasswordExpired;
procedure PortOpened;
procedure PrepareforCallback;
procedure ReAuthenticate;
procedure RetryAuth;
procedure SetPhoneBookPath(Value: String);
procedure SetRedialAttempts(Value: Integer);
procedure WaitForModemReset;
procedure WaitingForCallBack;
procedure WndProc(var Msg: TMessage);| Properties |
property CallbackNumber : String
property DeviceName : String
property DeviceType : String
property Domain : String
property EntryName : String
property Password : String
property PhoneBookPath : String
property PhoneNumber : String
property RedialAttempts : Integer
property UserName : String| Events |
event OnAboutToConnDev : TNotifyEvent
event OnAboutToOpenPort : TNotifyEvent
event OnAllDevsConnected : TNotifyEvent
event OnAuthAck : TNotifyEvent
event OnAuthCallBack : TNotifyEvent
event OnAuthChangePassword : TNotifyEvent
event OnAuthenticate : TNotifyEvent
event OnAuthenticated : TNotifyEvent
event OnAuthLinkSpeed : TNotifyEvent
event OnAuthNotify : TNotifyEvent
event OnAuthProject : TNotifyEvent
event OnAuthRetry : TNotifyEvent
event OnCallBack : TNotifyEvent
event OnConnect : TNotifyEvent
event OnDevConnected : TNotifyEvent
event OnDisconnect : TRasStateEvent
event OnInteractiveStarted : TNotifyEvent
event OnPasswordExpired : TNotifyEvent
event OnPortOpened : TNotifyEvent
event OnPrepareforCallback : TNotifyEvent
event OnReAuthenticate : TNotifyEvent
event OnRetryAuth : TNotifyEvent
event OnWaitForModemReset : TNotifyEvent| Variables |
Connections : TConnectionList;
ConnectState : Word;
LastError : LongInt;
PhoneBookEntries : TStringList;
RASConn : HRASConn;
fAboutToConnDev : TNotifyEvent;
fAboutToOpenPort : TNotifyEvent;
fAllDevsConnected : TNotifyEvent;
fAuthAck : TNotifyEvent;
fAuthCallBack : TNotifyEvent;
fAuthChangePassword : TNotifyEvent;
fAuthenticate : TNotifyEvent;
fAuthenticated : TNotifyEvent;
fAuthLinkSpeed : TNotifyEvent;
fAuthNotify : TNotifyEvent;
fAuthProject : TNotifyEvent;
fAuthRetry : TNotifyEvent;
FCallbackNumber : String;
fDevConnected : TNotifyEvent;
FDeviceName : String;
FDeviceType : String;
FDomain : String;
FEntryName : String;
fInteractiveStarted : TNotifyEvent;
fOnCallback : TNotifyEvent;
fOnConnect : TNotifyEvent;
fOnDisconnect : TRasStateEvent;
FPassword : String;
fPasswordExpired : TNotifyEvent;
FPhoneBookPath : String;
FPhoneNumber : String;
fPortOpened : TNotifyEvent;
fPrepareforCallback : TNotifyEvent;
fReAuthenticate : TNotifyEvent;
FRedialAttempts : Integer;
fRetryAuth : TNotifyEvent;
FUserName : String;
fWaitForModemReset : TNotifyEvent;
fWindowHandle : HWND;
RASEvent : Word;| Constructors |
Constructor Create(AOwner: TComponent);********************************************************************* } { TRASConnection } { *********************************************************************
| Functions |
function Connect: LongInt;
function CurrentStatus: String;Set the number of redial attempts.
Destructor Destroy;
function DisConnect: LongInt;
function GetConnections: LongInt;
function GetConnectStatus: LongInt;Stop message flow.
function GetEntry(strEntryName : string) : Boolean;Get all the phone book entries.
function GetErrorString(ErrorCode: LongInt): String;Allow only one connection.
function GetPhoneBookEntries: LongInt;Get all the entry names in the phone book
function IsConnected : Boolean;retrieve data for a phone book entry
procedure AboutToConnDev;
procedure AboutToOpenPort;
procedure AllDevsConnected;
procedure AuthAck;
procedure AuthCallBack;
procedure AuthChangePassword;
procedure Authenticate;
procedure Authenticated;
procedure AuthLinkSpeed;
procedure AuthNotify;
procedure AuthProject;
procedure AuthRetry;
procedure Connected;Handlers for the various events that happen whilst RAS establishes and authenticates a connection.
procedure DevConnected;
procedure DisConnected;
procedure InteractiveStarted;
function InternalDisconnect: LongInt;Stop message flow.
procedure PasswordExpired;
procedure PortOpened;
procedure PrepareforCallback;
procedure ReAuthenticate;
procedure RetryAuth;
procedure SetPhoneBookPath(Value: String);Case
procedure SetRedialAttempts(Value: Integer);RASCS_DeviceConnected: DeviceConnected;} {Daniel's Addition
procedure WaitForModemReset;
procedure WaitingForCallBack;
procedure WndProc(var Msg: TMessage);Note that under NT szPhoneNumber contains any overriding phone number to be used with this entry. it does not return the default phone number for the entry. An empty string indicates that the phone book's default phone number should be used. If szEntryName is blank, szPhoneNumber must contain something!
| Properties |
property CallbackNumber : String
property DeviceName : String
property DeviceType : String
property Domain : String
property EntryName : StringPublished declarations
property Password : String
property PhoneBookPath : String
property PhoneNumber : String
property RedialAttempts : Integer
property UserName : String| Events |
event OnAboutToConnDev : TNotifyEvent
event OnAboutToOpenPort : TNotifyEvent
event OnAllDevsConnected : TNotifyEvent
event OnAuthAck : TNotifyEvent
event OnAuthCallBack : TNotifyEvent
event OnAuthChangePassword : TNotifyEvent
event OnAuthenticate : TNotifyEvent
event OnAuthenticated : TNotifyEvent
event OnAuthLinkSpeed : TNotifyEvent
event OnAuthNotify : TNotifyEvent
event OnAuthProject : TNotifyEvent
event OnAuthRetry : TNotifyEvent
event OnCallBack : TNotifyEvent
event OnConnect : TNotifyEvent
event OnDevConnected : TNotifyEvent
event OnDisconnect : TRasStateEvent
event OnInteractiveStarted : TNotifyEvent
event OnPasswordExpired : TNotifyEvent
event OnPortOpened : TNotifyEvent
event OnPrepareforCallback : TNotifyEvent
event OnReAuthenticate : TNotifyEvent
event OnRetryAuth : TNotifyEvent
event OnWaitForModemReset : TNotifyEvent| Variables |
Connections : TConnectionList;List of phone book entries.
ConnectState : Word;Connection handle.
LastError : LongInt;List of active connections.
PhoneBookEntries : TStringList;Public declarations
RASConn : HRASConn;
fAboutToConnDev : TNotifyEvent;
fAboutToOpenPort : TNotifyEvent;
fAllDevsConnected : TNotifyEvent;
fAuthAck : TNotifyEvent;
fAuthCallBack : TNotifyEvent;
fAuthChangePassword : TNotifyEvent;
fAuthenticate : TNotifyEvent;
fAuthenticated : TNotifyEvent;
fAuthLinkSpeed : TNotifyEvent;
fAuthNotify : TNotifyEvent;
fAuthProject : TNotifyEvent;
fAuthRetry : TNotifyEvent;
FCallbackNumber : String;
fDevConnected : TNotifyEvent;
FDeviceName : String;
FDeviceType : String;
FDomain : String;
FEntryName : String;Private declarations
fInteractiveStarted : TNotifyEvent;
fOnCallback : TNotifyEvent;
fOnConnect : TNotifyEvent;
fOnDisconnect : TRasStateEvent;
FPassword : String;
fPasswordExpired : TNotifyEvent;
FPhoneBookPath : String;
FPhoneNumber : String;
fPortOpened : TNotifyEvent;
fPrepareforCallback : TNotifyEvent;
fReAuthenticate : TNotifyEvent;
FRedialAttempts : Integer;
fRetryAuth : TNotifyEvent;
FUserName : String;
fWaitForModemReset : TNotifyEvent;
fWindowHandle : HWND;
RASEvent : Word;