02.10.2017, 16:57
|
Прохожий
|
|
Регистрация: 02.10.2017
Сообщения: 1
Версия Delphi: Delphi 7
Репутация: 10
|
|
Помогите разобраться
На форме имеется множество кнопок 3 из которых при нажатии переходят в интернет, все настройки хранятся внутри программы хотелось бы добавить кнопку или ini для замены интернет адресов,но не представляю как это можно осуществить
Код:
procedure TForm1.Image5Click(Sender: TObject);
begin
ShellExecute(Handle, 'open', PChar('http://192.168.0.56/'), nil, nil, SW_SHOW);
PlaySound('SND1', 0, SND_RESOURCE or SND_ASYNC);
end;
procedure TForm1.Image6Click(Sender: TObject);
begin
ShellExecute(Handle, 'open', PChar('http://192.168.0.56/index.php?page=registration'), nil, nil, SW_SHOW);
PlaySound('SND2', 0, SND_RESOURCE or SND_ASYNC);
end;
procedure TForm1.Image7Click(Sender: TObject);
begin
ShellExecute(Handle, 'open', PChar('http://192.168.0.56/forum/'), nil, nil, SW_SHOW);
PlaySound('SND3', 0, SND_RESOURCE or SND_ASYNC);
end;
lmikle: пользуемся тегами!
Последний раз редактировалось lmikle, 02.10.2017 в 18:45.
|