| Class TInfoForm (unit Info) |
TForm
^^^^^^^ --> get the current IP-Address
| Constructors |
| Functions |
procedure btnHangupClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure FormHide(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure statsScan;
procedure getActiveConnectionData;
function getIP : string;| Properties |
| Events |
| Variables |
beGerat : TLabel;
beschSpeed : TLabel;
beSeit : TLabel;
beVerbind : TLabel;
btnHangup : TButton;
btnOk : TButton;
Image3 : TImage;
IpEdit : TEdit;
labBesIP : TLabel;
Label2 : TLabel;
labEmpfangen : TLabel;
labGerat : TLabel;
labHinw : TLabel;
labSeit : TLabel;
labSpeed : TLabel;
labVerb : TLabel;
labwertempf : TLabel;
labwertges : TLabel;
Panel1 : TPanel;
stats : TInterMeter;| Constructors |
| Functions |
procedure btnHangupClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);Timer1.Enabled:=False;
procedure FormCreate(Sender: TObject);
procedure FormHide(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure statsScan;Timer1.Enabled:=False;
procedure getActiveConnectionData;Private-Deklarationen
function getIP : string;No connection open
| Properties |
| Events |
| Variables |
beGerat : TLabel;
beschSpeed : TLabel;
beSeit : TLabel;
beVerbind : TLabel;
btnHangup : TButton;
btnOk : TButton;
Image3 : TImage;
IpEdit : TEdit;
labBesIP : TLabel;
Label2 : TLabel;
labEmpfangen : TLabel;
labGerat : TLabel;
labHinw : TLabel;
labSeit : TLabel;
labSpeed : TLabel;
labVerb : TLabel;
labwertempf : TLabel;
labwertges : TLabel;
Panel1 : TPanel;
stats : TInterMeter;