Class TForm1 (unit Main_F)

Inherits from

TForm

Constructors



Functions

procedure Button1Click(Sender: TObject);


procedure Button2Click(Sender: TObject);


procedure Button3Click(Sender: TObject);


procedure Button4Click(Sender: TObject);


procedure Button5Click(Sender: TObject);


procedure DialUpActiveConnection(Sender: TObject; Handle: Integer; Status: TRasConnStatusA; StatusString: String; EntryName, DeviceType, DeviceName: array of Char);


procedure DialUpAsyncEvent(Sender: TObject; State, Error: Integer; MessageText: String);


procedure DialUpConnect(Sender: TObject);


procedure DialUpDialing(Sender: TObject);


procedure DialUpEntryGet(Sender: TObject; EntryName: array of Char);


procedure DialUpError(Sender: TObject; ErrorCode: Integer; ErrorMessage: String);


procedure DialUpNotConnected(Sender: TObject; ErrorCode: Integer; ErrorMessage: String);


Properties

Events

Variables

Button1 : TButton;


Button2 : TButton;


Button3 : TButton;


Button4 : TButton;


CheckBox1 : TCheckBox;


DialUp : TDialUp;


Label1 : TLabel;


ListBox1 : TListBox;


RadioButton1 : TRadioButton;


RadioButton2 : TRadioButton;


Status : TLabel;


Status2 : TLabel;



Constructors


Functions


procedure Button1Click(Sender: TObject);


procedure Button2Click(Sender: TObject);


procedure Button3Click(Sender: TObject);


procedure Button4Click(Sender: TObject);


procedure Button5Click(Sender: TObject);


procedure DialUpActiveConnection(Sender: TObject; Handle: Integer; Status: TRasConnStatusA; StatusString: String; EntryName, DeviceType, DeviceName: array of Char);


procedure DialUpAsyncEvent(Sender: TObject; State, Error: Integer; MessageText: String);


procedure DialUpConnect(Sender: TObject);


procedure DialUpDialing(Sender: TObject);


procedure DialUpEntryGet(Sender: TObject; EntryName: array of Char);


procedure DialUpError(Sender: TObject; ErrorCode: Integer; ErrorMessage: String);


procedure DialUpNotConnected(Sender: TObject; ErrorCode: Integer; ErrorMessage: String);


Properties


Events


Variables


Button1 : TButton;


Button2 : TButton;


Button3 : TButton;


Button4 : TButton;


CheckBox1 : TCheckBox;


DialUp : TDialUp;


Label1 : TLabel;


ListBox1 : TListBox;


RadioButton1 : TRadioButton;


RadioButton2 : TRadioButton;


Status : TLabel;


Status2 : TLabel;