Показать сообщение отдельно
  #3  
Старый 05.04.2013, 17:02
Аватар для cotseec
cotseec cotseec вне форума
Активный
 
Регистрация: 16.07.2008
Сообщения: 353
Версия Delphi: D7,TDE06,RAD09
Репутация: 1443
По умолчанию

TClipBoard в помощь
Цитата:
а с помощью функций POS можно как то посмотреть типа если в буфере содержится "http://" то заносить в edit1 а если нет то пропускать?
если в буфере обмена есть ссылка, то
Код:
if ClipBoard.HasFormat(CF_TEXT) and (Pos('http://',ClipBoard.AsText)>0) then
(правда это может быть не всегда ссылка, например, в тексте цитаты содержится "http://", но это не ссылка)
__________________
Понять, что хочет заказчик - бесценно, ведь он платит MasterCard
Ответить с цитированием