Feststellen, ob Netzwerkkabel gezogen wurde?

[DaFox]

Zitat von djmasi:

Mein Fehler

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var QOCInfo: TQOCInfo;
begin
  Memo1.Clear;
  QOCInfo.Size := 16; //Bitte das einfügen
  if CheckBox1.Checked then
    if Edit1.Text <> '' then

Oder besser das hier
QOCInfo.dwSize := SizeOf(TQOCInfo); einfügen.

Gruß,
Markus