Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.07.11;
Скачать: CL | DM;

Вниз

пересылка файдла каждые 5 сек.   Найти похожие ветки 

 
Worm   (2004-04-28 16:26) [0]

Доброе время суток! Возникла такая проблема: необходимо чтобы программа каждые 5 сек. переправляла подключённому клиенту файл. Смотрел в FAQ но там только под D6, а у меня 7.


 
csr ©   (2004-04-28 17:49) [1]

Блин... Дак что конкретно интересует? В чем проблема?


 
Worm   (2004-04-28 20:02) [2]

Надо переслать файл через TCPServer на TCPClient. но я никак не могу найти пример пересылки файлов.


 
FireMan_Alexey ©   (2004-04-29 10:10) [3]

Пользуй TClientSocket и TServerSocket, там есть такая процедура SendStream(S:TStream);


 
Worm   (2004-04-29 21:20) [4]

мне надо с TPClient на TCPServer. Посылать я умею, но получать надо пример посмотреть, а у меня такового нет.


 
FireMan_Alexey ©   (2004-04-30 12:14) [5]

А чем тебе TClientSocket и TServerSocket не нравится?


 
Worm   (2004-04-30 21:33) [6]

Ну в моей Дельфе таковых нет, а при попытке поставить даёт ошибку.
И переписывать всю программу просто влом.
Вот как я уже и говорил прошу исходник серверной части(или просто  код) для принятия файлов.Если есть для TServerSocket то выложи пожалуйста, а там я сам посмотрю что к чему.


 
FireMan_Alexey ©   (2004-05-14 11:48) [7]

А версия делфей у тебя какая?
Если 7-я то Uses ScktComp;
Var
 ServerS:TServerSocket;
Begin
 ServerS:=TServerSocket.Create;
 ...
 ...
 ...
end

Да и еще там исходник этого модуля лежит в делфях
посмотри примеры и описания событийных процедур!



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

Текущий архив: 2004.07.11;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.041 c
1-1088398293
X-Men
2004-06-28 08:51
2004.07.11
Как получить указатель на функцию?


14-1088146812
Kolyan
2004-06-25 11:00
2004.07.11
Pungvini Rulyat!!!!


4-1085867814
keymaster
2004-05-30 01:56
2004.07.11
Как передать данные через USB


14-1087932464
Sergey Masloff
2004-06-22 23:27
2004.07.11
Holy War! AMD vs INTEL $-)


14-1087852759
Piter
2004-06-22 01:19
2004.07.11
Планы Microsoft по выпуску Service Pack