Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Dial-Up дозвон, Зная имя соединения 
:(
    Опции темы
DriveSoftware
Дата 10.10.2003, 17:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 291
Регистрация: 17.3.2003

Репутация: нет
Всего: 4



Привет.

Как запустить дозвон до прова зная имя соединения?
PM MAIL WWW ICQ   Вверх
stab
Дата 10.10.2003, 21:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Экс. модератор
Сообщений: 1839
Регистрация: 1.1.2003

Репутация: 14
Всего: 48



простейший вариант:

Код

type
 PRasDialDlg = ^TRasDialDlg;
 tagRASDIALDLG = record
   dwSize: DWORD;
   hwndOwner: HWND;
   dwFlags: DWORD;
   xDlg: LongInt;
   yDlg: LongInt;
   dwSubEntry: DWORD;
   dwError: DWORD;
   reserved: DWORD;
   reserved2: DWORD;
 end;
 {$EXTERNALSYM tagRASDIALDLG}
 TRasDialDlg = tagRASDIALDLG;


function RasDialDlgA(lpszPhonebook: PAnsiChar; lpszEntry: PAnsiChar; lpszPhoneNumbe: PAnsiChar; var lpInfo: TRasDialDlg): BOOL; stdcall; external 'rasdlg.dll';

procedure TForm1.Button1Click(Sender: TObject);
var
 rd: TRasDialDlg;
begin
 ZeroMemory(@rd, SizeOf(rd));
 with rd do
 begin
   dwSize := SizeOf(rd);
   hwndOwner := Handle;
 end;
 RasDialDlgA(nil, 'Connection Name', nil, rd);
end;


если UI не нужен, то RasDial, но об этом позже smile.gif и если понадобиться


--------------------
6, 6, 6 - the number of the beast.
PM MAIL WWW   Вверх
Полудненко Олег
Дата 11.10.2003, 20:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Українець
**


Профиль
Группа: Участник...
Сообщений: 556
Регистрация: 13.8.2003

Репутация: 1
Всего: -11



А как можно позвонить комунить с помощью модема и устроить с этим кемнить чё-то типа инета.
PM MAIL   Вверх
DeVoid
Дата 12.10.2003, 13:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 12.10.2003

Репутация: нет
Всего: нет



Цитата
А как можно позвонить комунить с помощью модема и устроить с этим кемнить чё-то типа инета.

А ты представляешь хоть что в итоге должно получиться ?
Интересно будет посмотреть, на ваше че-то типа инета.
Говори конкретнее, тебе нужно файлы перекидать по сетке или че ?
PM MAIL   Вверх
DriveSoftware
Дата 31.10.2003, 12:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 291
Регистрация: 17.3.2003

Репутация: нет
Всего: 4



>если UI не нужен, то RasDial, но об этом позже и если понадобиться

Очень нужно, подскажите.
PM MAIL WWW ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0435 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.