| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как поюзать ClientSocket из консольного приложения? [D6, WinXP]
Sitnic © (2009-04-20 19:32:00)Консольное приложение. К нему привязан DataModule. На нем размещаю Clientsocket.
program Project2;
{$APPTYPE CONSOLE}
uses
SysUtils,
Unit2_1 in 'Unit2_1.pas' {DataModule1: TDataModule};
begin
{ TODO -oUser -cConsole Main : Insert code here }
DataModule1:=TDataModule1.Create(nil); // Создаем объект. Все путем создается.
DataModule1.ClientSocket1.Port:=5190;
DataModule1.ClientSocket1.Host:='MyServer.com'; // Заполняем свойства.
//Тоже все в порядке. Все заполняется, все отображается
DataModule1.ClientSocket1.Open; // пробуем коннектится.
// Тут он чего-то такое делает. видать пробует зацепиться.
// И опять кажет свойство ClientSocket1.active = false.
// Не вяжется.
end.
Пробую делать все тоже самое в ГУИ - все работает. Все коннектится, все в шоколаде.
А в консоли - хрен. Где кривые руки?
Сергей М. (2009-04-21 09:24:00) [1]
> Slym © (21.04.09 09:22) [13]
У него клиент, а не сервер)
Slym (2009-04-21 09:22:00) [2]поставь сокету режим тредблокинг и никаких окон ненадо
Sitnic (2009-04-21 05:29:00) [3]
> Ему эти самые окна в этих самых
Фсе казлы, один Сергей М. дартаньян.
Что ж, и такое бывает.
FireMan_Alexey (2009-04-20 22:07:00) [4]Афтор) загляни сюда ... http://www.delphimaster.ru/articles/console.html
FireMan_Alexey (2009-04-20 22:00:00) [5]
> Сергей М. © [8]
я аж улыбнулся! :) (оффтоп)
Сергей М. (2009-04-20 21:25:00) [6]
> Ему 'nb cfvst окна в этих cfvs[ компонентах - что барану
> те самые ворота)
Ему эти самыеокна в этих самых
Сергей М. (2009-04-20 21:23:00) [7]
> FireMan_Alexey © (20.04.09 20:42) [7]
>
> А где ты обрабатываешь оконные сообщения?
Он их нигде не обрабатывает.
Ему 'nb cfvst окна в этих cfvs[ компонентах - что барану те самые ворота)
Равно как и (и начиная с) значения св-ва ClientType)
FireMan_Alexey (2009-04-20 20:42:00) [8]А где ты обрабатываешь оконные сообщения?
ClientSocket он вообще-то по умолчанию на окнах сидит...
там Пикать и диспатчить надо... :)
Сергей М. (2009-04-20 20:19:00) [9]
> Sitnic (20.04.09 19:51) [5]
"Мгновенно" - это когда при выполнении нижеследующего кода
ClientSocket1.Open;
if ClientSocket1.Active then ShowMessage(' Мгновенно');
в любомприложении (хоть гуёвого, хоть .... вого) ты увидишь выделенное жирным слово)
Sitnic (2009-04-20 19:51:00) [10]>Ну тогда тряси бубен, коль слушать не желаешь.
Да как же тебя услышишь, коль ты неиче не говоришь...
Сергей М. (2009-04-20 19:47:00) [11]
> Говорю же
Ну тогда тряси бубен, коль слушать не желаешь.
Sitnic (2009-04-20 19:44:00) [12]
> Кстати, ТОТ ЖЕ самый код и в гуёвом приложении покажет то
> же самое.
Говорю же - в ГУИ все коннектица но 100% и мгновенно.
>Хотя, посомтри что в OnError он говорит?
Он ничего в Еггог не говорит. Он просто не вяжется. Работает в смысле безошибочности все распрекрасно.
Rouse_ (2009-04-20 19:34:00) [13]Давно уже не работал с этой оберткой, но помниться ему окно нужно было... Хотя, посомтри что в OnError он говорит?
Сергей М. (2009-04-20 19:34:00) [14]
> Где кривые руки?
Как это где ? У тебя, разумеется)
Кстати, ТОТ ЖЕ самый код и в гуёвом приложении покажет то же самое.
| |
