Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.08.2010, 01:26   #1
Federal
Пользователь
 
Регистрация: 21.05.2010
Сообщений: 77
По умолчанию DLL и буфер обмена

Можно ли реализовать или нет? Очень нужна помощь


Последний раз редактировалось Federal; 05.08.2010 в 01:33.
Federal вне форума Ответить с цитированием
Старый 05.08.2010, 08:46   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

По Сокетам не хочешь передавать?
Или с помошью посылки сообщений.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 05.08.2010, 09:29   #3
Federal
Пользователь
 
Регистрация: 21.05.2010
Сообщений: 77
По умолчанию

По сокетам? А можно?
Federal вне форума Ответить с цитированием
Старый 05.08.2010, 11:45   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

А чего нет? Это такой же механизм передачи данных как и многие другие
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 05.08.2010, 12:12   #5
Federal
Пользователь
 
Регистрация: 21.05.2010
Сообщений: 77
По умолчанию

что то вроде того?
Federal вне форума Ответить с цитированием
Старый 05.08.2010, 12:29   #6
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Вот вот. Что-то вроде этого
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 05.08.2010, 13:24   #7
Federal
Пользователь
 
Регистрация: 21.05.2010
Сообщений: 77
По умолчанию

Ну я всегда боялся UDP, поэтому дружить нам не приходилось
Код:
библиотека
var
  RS_sock: TSocket;
  SockAddr: TSockAddr;
  i: integer;
  S:string;
begin
  SockAddr.sin_family :=AF_INET;
  SockAddr.sin_port := htons(7777);
  SockAddr.sin_addr.S_addr := inet_addr(Pchar('localhost'));
  RS_sock:=socket(AF_INET,SOCK_DGRAM,IPPROTO_UDP);
  connect(RS_sock,SockAddr,SizeOf(TSockAddr));
  SendTo(RS_sock,S,length(S),0,SockAddr,i);
  CloseSocket(RS_sock);
end;
/////Логично вроде или нет?
////А вот вопрос как принять?
Код:
программа
procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TStream;
  ABinding: TIdSocketHandle);
begin
 memo1.lines.add(IdUDPServer1.ReceiveString(1));
end;
end;
бред в мемо
Код:
@Цs
TЦs
xЦs
њЦd
АЦs
дЦa
	Цd
,	Цs
P	Цa
t	Цd
˜	Цs
ј	Цa
а	Цd

Цs
(
Цa
L
Цd
p
Цs
”
Цa
ё
Цd
Federal вне форума Ответить с цитированием
Старый 05.08.2010, 13:35   #8
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
SendTo(RS_sock,@S[1],length(S),0,SockAddr,i);
Ато ты послал указатель и радуешся )
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 05.08.2010, 14:20   #9
Federal
Пользователь
 
Регистрация: 21.05.2010
Сообщений: 77
Радость

Ахаха сработало. Спасибо Stilet:=SUPERMODERATOR;
В ближайшее время доделаю проект Кликер выложу исходники...вдруг кому интересно

Последний раз редактировалось Federal; 05.08.2010 в 14:24.
Federal вне форума Ответить с цитированием
Старый 05.08.2010, 15:21   #10
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
вдруг кому интересно
В журнал наш статью напиши
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Буфер обмена Dem6 Общие вопросы Delphi 0 14.12.2009 19:09
буфер обмена olimpus Microsoft Office Excel 2 19.09.2009 08:52
Буфер обмена nusik Общие вопросы Delphi 2 21.05.2009 00:53
буфер обмена __@cmd@__ Общие вопросы Delphi 2 04.02.2009 12:24