D-Link DSL-G684T Manuel d'utilisateur télécharger pdf (Page 109)

109

Connected2.Enabled := true;

end

else application.MessageBox('ERROR','invalid login or

password');

IdTelnet1.Host := INI.ReadString('Main','ip','');

edit7.Text := INI.ReadString('Main','ip','');

finally

FreeLibrary(DLL);

INI.free;

end;

Connected2Click(Sender);

end;

procedure TForm1.Button8Click(Sender: TObject);

begin

IdTelnet1.IOHandler.WriteLn('set opt password 0');

end;

procedure TForm1.Button9Click(Sender: TObject);

begin

if IDTelnet1.Connected then

IdTelnet1.IOHandler.WriteLn('poz='+label51.Caption);

end;

procedure TForm1.CheckBox1Click(Sender: TObject);

begin

if not checkbox1.Checked then

begin

if (servo = 0)and(checkbox3.Checked) then

begin

IdTelnet1.IOHandler.WriteLn('servo=1');

servo := 1;

end;

button1.Enabled := false;

1 2 ... 104 105 106 107 108 109 110 111 112 113 114 ... 117 118

Pas de commentaire

D-Link DSL-G684T Manuel d'utilisateur Page 109