Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Изменить настройки сети

beeper © (2003-12-16 19:31:00)

Хочу написать прогу для смены IP и других сетевых настроек, чтоб руками не лазить.
Кто знает как это можно сделать?
Изменение ключей реестра, отвечающих за эти настройки не помогает, нужно судя по всему что-то еще.
Возможно я не все из необходимых поменял.
Кто занимался подобной проблемой, отзовитесь!

Yaro (2003-12-22 07:47:00) [1]

Удалено модератором
Примечание: Оффтоп...

RaPToR_1 (2003-12-22 01:33:00) [2]

Удалено модератором
Примечание: Флуд...

Yaro (2003-12-22 00:57:00) [3]

Удалено модератором
Примечание: Уже все сказано...

Esc (2003-12-21 15:58:00) [4]

www.delphi-jedi.org

Beeper (2003-12-18 13:37:00) [5]

Некто Fay сказал что на "Jedi" есть готовый юнит.
Это что за "Jedi" такое, где находится?

VideoLord (2003-12-17 21:52:00) [6]
Тебе сюда:

http://delphi.mastak.ru/cgi-bin/forum.pl?id=1069239219&n=4

+ IP Helper API, как правильно сказал Rouse_ (для установки IP адреса, существующего в текущей сесии, до перезагрузки)

имя (2003-12-17 19:18:00) [7]

Удалено модератором

Плаха (2003-12-17 19:11:00) [8]

А по подробней можно?

Rouse_ (2003-12-17 17:35:00) [9]

IpHlpApi + MSDN

Желаю успехов

Плаха (2003-12-17 15:42:00) [10]

Да. Это конечно всё хорошо. но только парамет {593630CC-B333-42BC-9BFA-58879283FBDA} будет только у тебя,а на всех остольных машинах будет другой параметр. А как можно зделать чтобы эту прогу можно былобы использовать на нескольких машинах

beeper (2003-12-17 15:07:00) [11]

Нет, не перезагрузка, в ХР не нужно перезагружать.
Вот кусок кода
procedure TForm1.Button1Click(Sender: TObject);
var
v_reg : tregistry;
begin
v_reg := tregistry.Create;
v_reg.RootKey := HKEY_LOCAL_MACHINE;
if v_reg.OpenKey("\SYSTEM\ControlSet001\Services\{593630CC-B333-42BC-9BFA-58879283FBDA}\Parameters\Tcpip", False) then
begin
v_reg.WriteString("IPAddress","82.148.26.252");
v_reg.CloseKey;
end;
if v_reg.OpenKey("\SYSTEM\ControlSet001\Services\Tcpip\Parameters\Interfaces\{593630CC-B333-42BC-9BFA-58879283FBDA}", False) then
begin
v_reg.WriteString("IPAddress","82.148.26.252");
v_reg.CloseKey;
end;
if v_reg.OpenKey("\SYSTEM\CurrentControlSet\Services\{593630CC-B333-42BC-9BFA-58879283FBDA}\Parameters\Tcpip", False) then
begin
v_reg.WriteString("IPAddress","82.148.26.252");
v_reg.CloseKey;
end;
if v_reg.OpenKey("\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\{593630CC-B333-42BC-9BFA-58879283FBDA}", False) then
begin
v_reg.WriteString("IPAddress","82.148.26.252");
v_reg.CloseKey;
end;

v_reg.Free;
end;

Плаха (2003-12-17 09:01:00) [12]

А как ты написал чтобы в реестре настройки менялись? Дай код плиз.

Anatoly Podgoretsky (2003-12-16 20:09:00) [13]

Это чтото еще называется перезагрузка.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »