ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Copy Paste, Top-Level form
5 сообщений из 5, страница 1 из 1
Copy Paste, Top-Level form
    #32661786
Oxygene
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oxygene
Гость
Основная форма приложения - As Top-Level.. В textboxes, editboxes на этой форме не вставляется текст скопированный откуда угодно, например из текстового редактора.. Тоже самое творится и со всеми дочерними формами In Top-level если они запускаются из под главной формы.. Не могу понять в чем дело. Кто-нибудь может помочь?
...
Рейтинг: 0 / 0
23.08.2004, 17:21
| Ответить | Цитировать | Написать  
Copy Paste, Top-Level form
    #32661801
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Должен быть пункт меню с соответствующими системными BAR-пунктами.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
DEFINE POPUP _medit MARGIN RELATIVE SHADOW COLOR SCHEME  4 
DEFINE BAR _MED_UNDO OF _medit PROMPT "Отменить" ;
	KEY CTRL+Z, "CTRL+Z"
DEFINE BAR _MED_REDO OF _medit PROMPT "Вернуть" ;
	KEY CTRL+R, "CTRL+R"
DEFINE BAR _MED_SP100 OF _medit PROMPT "\-"
DEFINE BAR _MED_CUT OF _medit PROMPT "Вырезать" ;
	KEY CTRL+X, "CTRL+X"
DEFINE BAR _MED_COPY OF _medit PROMPT "Копировать" ;
	KEY CTRL+C, "CTRL+C"
DEFINE BAR _MED_PASTE OF _medit PROMPT "Вставить" ;
	KEY CTRL+V, "CTRL+V"
DEFINE BAR _MED_CLEAR OF _medit PROMPT "Очистить"
DEFINE BAR _MED_SP200 OF _medit PROMPT "\-"
DEFINE BAR _MED_SLCTA OF _medit PROMPT "Выделить все" ;
	KEY CTRL+A, "CTRL+A"

Если создаешь меню через дезайнер, то это те пункты в который в столбце "Result" выбирается "Bar #", а в столбце для команды пишется соответсвующее имя, например "_MED_COPY"
...
Рейтинг: 0 / 0
23.08.2004, 17:28
| Ответить | Цитировать | Написать  
Copy Paste, Top-Level form
    #32661808
Oxygene
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oxygene
Гость
А если у меню меню вообще нет?? Я имел ввиду ручное копирование текста, - Copy -> Ctrl+Insert ; Paste -> Shift+Insert..
...
Рейтинг: 0 / 0
23.08.2004, 17:31
| Ответить | Цитировать | Написать  
Copy Paste, Top-Level form
    #32662273
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Тогда придется писать ручками. Описывать действия по горячим клавишам (ON KEY LABEL). В FoxPro текстовая часть буфера обмена хранится в системной переменной

_CLIPTEXT

Далее, надо определять позицию курсора в объектах (SelStart), выделенную часть (SelLen), организовать замену выделенного фрагмента на то, что хранится в этой системной переменной или наоборт, запись в эту переменную.

Вобщем, та еще работенка.

Впрочем, я не уверен, что меню обязательно должно быть видимым. Но я с этим не экспериментировал. У меня меняю есть всегда.
...
Рейтинг: 0 / 0
24.08.2004, 09:19
| Ответить | Цитировать | Написать  
Copy Paste, Top-Level form
    #32662511
Oxygene
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Oxygene
Гость
Вроде разобрался.. Спасибо! Просто внутри нужного мне textbox'а в событии RightClick написал следующий код:

SYS(1500,"_med_paste","_medit")

Пока работает без глюков! Нашел в Solution..
...
Рейтинг: 0 / 0
24.08.2004, 11:06
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Copy Paste, Top-Level form
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]