Форум программистов, компьютерный форум CyberForum.ru

Delphi и WinAPI

Войти
Регистрация
Восстановить пароль
 
Insendio
24 / 24 / 7
Регистрация: 02.10.2014
Сообщений: 142
#1

Ошибка при работе с Clipboard: "Сannot open clipboard. Отказано в доступе." - Delphi WinAPI

08.07.2016, 21:14. Просмотров 455. Ответов 3
Метки нет (Все метки)

Хотел написать программу для автоматической замены текста в буфере обмена, но при обращении к буферу получаю ошибку "Сannot open clipboard. Отказано в доступе.".
Вот весь код:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
program ClipBrdChanger;
 
uses
  Unit2 in 'Unit2.pas' {Form2},
  Winapi.Windows,
  System.SysUtils,
  Vcl.Clipbrd;
 
{$R *.res}
var
s:string;
 
begin
      while true do
  begin
    Sleep(1000);
    
    Clipboard.Open;
    if Clipboard.HasFormat(CF_TEXT) then
    begin
    s:=Clipboard.AsText;
    if Pos('User1',s)>0 then
    Clipboard.SetTextBuf(PChar(StringReplace(s, '\\User1\D\', 'D:\',[rfIgnoreCase])));
    Clipboard.Close;
    end;
     Sleep(1000);
  end;
end.
Жду помощи от гуру.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.07.2016, 21:14
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Ошибка при работе с Clipboard: "Сannot open clipboard. Отказано в доступе." (Delphi WinAPI):

При попытке удалении dll "Отказано в доступе" - Delphi
Dll - sqlite3 Нужна для работы sqlite3table и самого sqlite Exe распаковывает dll в текущую директорию с помощью TResourceStream и...

При работе программы выскакивает ошибка "Stack Overflow" - Delphi
Такая проблемка. При работе программы выскакивает ошибка "Stack Overflow". Причём я сам-то в этот момент стек не использую как...

Аналоги Clipbrd \ Clipboard - Delphi
Есть такой модуль как clipboard. При его подключении к программе она прибавляет веса сутьли не полмеабайта. А мне всего лишь нужно...

Как копировать часть Image в clipboard? - Delphi
Как скопировать прямоугольную часть Image в clipboard? Если что не пинайте, я чайник :)

Ошибка "record, object of file type required" при компиляции - Delphi
При компиляции выдает ошибку "record, object of file type required",выделяет последнюю строку с end., это моя первая работа поэтому я не...

Ошибка "Error 1606. Could not access network location 0\" при установке Delphi 7 - Delphi
Здравствуйте! Нужна ваша помощь. При установке Delphi 7 выдает ошибку "Error 1606. Could not access network location 0\". Переустанавливал...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Insendio
24 / 24 / 7
Регистрация: 02.10.2014
Сообщений: 142
04.12.2016, 00:50  [ТС] #2
Поднимаю тему.. Проблема еще не решена....
northener
3073 / 2130 / 439
Регистрация: 15.07.2013
Сообщений: 12,403
04.12.2016, 01:06 #3
Проблемы никакой не вижу, кроме безобразно неграмотной программы. Ошибки заявленной в топике не получаю. Правда нет кода Unit2.
Insendio
24 / 24 / 7
Регистрация: 02.10.2014
Сообщений: 142
04.12.2016, 03:36  [ТС] #4
northener,
Миниатюры
Ошибка при работе с Clipboard: "Сannot open clipboard. Отказано в доступе."  
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.12.2016, 03:36
Привет! Вот еще темы с ответами:

Отказано в доступе к сервису - Delphi WinAPI
Добрый день. Ранее для определенных задач был написан собственный сервис (наследник от TService). Все было хорошо сервис без проблем...

Ошибка incomplete types: "Cardinal" and "Extended" - Delphi
Всем привет. Помогите исправить ошибку. Я вот пиши аудио проиграватель и у меня возникла ошибка: incomplete types: "Cardinal" and...

1. Перенос изображения из bmp в jpg? 2.Clipboard to JPG? - Delphi
Уважаемые программисты ! У меня 2 похожих (но разных) вопроса: 1. Как перенести изображение из файла bmp в файл jpg? 2. Как перенести...

Программа для накрутки "мне нравиться" "подписчиков"" - Delphi
Народ привет тут увидал прогу называеться FVCheat она накручивает ВК подписчиков сердечек (мне нравиться) друзей и т.д там просто...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
Yandex
Объявления
04.12.2016, 03:36
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru