D-Link DSL-G684T Instrukcja Użytkownika Pobierz pdf (Strona 106)

106

IdTelnet1.IOHandler.Writeln('set dns address

'+edit15.Text);

IdTelnet1.IOHandler.Writeln('set dns name

'+edit15.Text);

IdTelnet1.IOHandler.Writeln('set dns backup

'+edit16.Text);

end

else IdTelnet1.IOHandler.Writeln('set ip dhcp 1');

IdTelnet1.IOHandler.Writeln('set ip localport

'+edit5.Text);

IdTelnet1.IOHandler.Writeln('set wlan ext_antenna

'+inttostr(ComboBox2.ItemIndex));

IdTelnet1.IOHandler.Writeln('set wlan join

'+inttostr(ComboBox3.ItemIndex));

DLL := LoadLibrary('encryption.dll');

INI :=

TINIFile.Create(ExtractFilePath(Application.ExeName)+'setup.i

ni');

try

@Encrypt := GetProcAddress(DLL, 'Encrypt');

if @Encrypt = nil then raise

Exception.Create('Can’t load encryption.dll library!');

if ((Edit21.Text = '')or(Edit21.Text = '0')) then

begin

IdTelnet1.IOHandler.Writeln('$$$');

IdTelnet1.IOHandler.WriteLn('set opt password

0');

INI.WriteString('Main','optpswd','');

end

else

begin

IdTelnet1.IOHandler.Writeln('$$$');

IdTelnet1.IOHandler.WriteLn('set opt password

'+edit21.Text);

1 2 ... 101 102 103 104 105 106 107 108 109 110 111 ... 117 118

Brak uwag

D-Link DSL-G684T Instrukcja Użytkownika Strona 106