Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.06.07;
Скачать: [xml.tar.bz2];

Вниз

Как поюзать ClientSocket из консольного приложения?   Найти похожие ветки 

 
Sitnic   (2009-04-20 19:32) [0]

Консольное приложение. К нему привязан 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.


Пробую делать все тоже самое в ГУИ - все работает. Все коннектится, все в шоколаде.
А в консоли - хрен. Где кривые руки?


 
Rouse_ ©   (2009-04-20 19:34) [1]

Давно уже не работал с этой оберткой, но помниться ему окно нужно было... Хотя, посомтри что в OnError он говорит?


 
Сергей М. ©   (2009-04-20 19:34) [2]


> Где кривые руки?


Как это где ? У тебя, разумеется)

Кстати, ТОТ ЖЕ самый код и в гуёвом приложении покажет то же самое.


 
Sitnic   (2009-04-20 19:44) [3]


> Кстати, ТОТ ЖЕ самый код и в гуёвом приложении покажет то
> же самое.

Говорю же - в ГУИ все коннектица но 100% и мгновенно.

>Хотя, посомтри что в OnError он говорит?
Он ничего в Еггог не говорит. Он просто не вяжется. Работает в смысле безошибочности все распрекрасно.


 
Сергей М. ©   (2009-04-20 19:47) [4]


> Говорю же


Ну тогда тряси бубен, коль слушать не желаешь.


 
Sitnic   (2009-04-20 19:51) [5]

>Ну тогда тряси бубен, коль слушать не желаешь.

Да как же тебя услышишь, коль ты неиче не говоришь...


 
Сергей М. ©   (2009-04-20 20:19) [6]


> Sitnic   (20.04.09 19:51) [5]


"Мгновенно" - это когда при выполнении нижеследующего кода

ClientSocket1.Open;
if ClientSocket1.Active then ShowMessage("Мгновенно");


в любом приложении (хоть гуёвого, хоть .... вого) ты увидишь выделенное жирным слово)


 
FireMan_Alexey ©   (2009-04-20 20:42) [7]

А где ты обрабатываешь оконные сообщения?
ClientSocket он вообще-то по умолчанию на окнах сидит...
там Пикать и диспатчить надо... :)


 
Сергей М. ©   (2009-04-20 21:23) [8]


> FireMan_Alexey ©   (20.04.09 20:42) [7]
>
> А где ты обрабатываешь оконные сообщения?


Он их нигде не обрабатывает.
Ему "nb cfvst окна в этих cfvs[ компонентах - что барану те самые ворота)
Равно как и (и начиная с) значения св-ва ClientType)


 
Сергей М. ©   (2009-04-20 21:25) [9]


> Ему "nb cfvst окна в этих cfvs[ компонентах - что барану
> те самые ворота)


Ему эти самые окна в этих самых


 
FireMan_Alexey ©   (2009-04-20 22:00) [10]


> Сергей М. ©   [8]

я аж улыбнулся! :) (оффтоп)


 
FireMan_Alexey ©   (2009-04-20 22:07) [11]

Афтор) загляни сюда ... http://www.delphimaster.ru/articles/console.html


 
Sitnic   (2009-04-21 05:29) [12]


> Ему эти самые окна в этих самых


Фсе казлы, один Сергей М. дартаньян.
Что ж, и такое бывает.


 
Slym ©   (2009-04-21 09:22) [13]

поставь сокету режим тредблокинг и никаких окон ненадо


 
Сергей М. ©   (2009-04-21 09:24) [14]


> Slym ©   (21.04.09 09:22) [13]


У него клиент, а не сервер)



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2009.06.07;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.004 c
2-1239854707
Чипырик
2009-04-16 08:05
2009.06.07
OpenPictureDialog.InitialDir


2-1240482239
Slapy
2009-04-23 14:23
2009.06.07
Проверка данных в памяти


15-1238405776
Alex_2009
2009-03-30 13:36
2009.06.07
windows 2000 пропал доступ к редактору реестра


15-1238659736
SP
2009-04-02 12:08
2009.06.07
Route


15-1238574089
Игорь Шевченко
2009-04-01 12:21
2009.06.07
Как давно это было :)





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский