Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / при создании меню как изменить комбинации с русской клавиатуры / 18 сообщений из 18, страница 1 из 1
25.12.2007, 16:46
    #35033257
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!

Всем программистам привет! Respect! Забыл как бороться с такой проблемой: сформировал меню, затем сгенерировал, а когда пытаюсь запустить начинает ругаться на комбинации русских клавиш:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
DEFINE PAD _29c0zt913 OF _MSYSMENU PROMPT "ФОРМЫ" COLOR SCHEME  3  ;
	KEY ALT+Ф, ""
DEFINE PAD _29c0zt914 OF _MSYSMENU PROMPT "ИНДЕКСИРОВНИЕ" COLOR SCHEME  3  ;
	KEY ALT+И, ""
DEFINE PAD _29c0zt915 OF _MSYSMENU PROMPT "ПОИСК" COLOR SCHEME  3  ;
	KEY ALT+П, ""
DEFINE PAD _29c0zt916 OF _MSYSMENU PROMPT "ОТЧЕТНОСТЬ" COLOR SCHEME  3  ;
	KEY ALT+О, ""
DEFINE PAD _29c0zt917 OF _MSYSMENU PROMPT "ЭТИКЕТКИ" COLOR SCHEME  3  ;
	KEY ALT+Э, ""
DEFINE PAD _29c0zt91d OF _MSYSMENU PROMPT "ВЫХОД" COLOR SCHEME  3  ;
	KEY ALT+В, ""
ON PAD _29c0zt913 OF _MSYSMENU ACTIVATE POPUP формы
ON SELECTION PAD _29c0zt91d OF _MSYSMENU qiut
меняю их на что нить английское, но при повтоном запуске опять все по новой. Подскажите как быть то?

P.S. на фоксе больше года не прогил, позабыл много чего, так что сильно не пинайте.
...
Рейтинг: 0 / 0
25.12.2007, 16:58
    #35033304
при создании меню как изменить комбинации с русской клавиатуры
Сходи на forum.foxclub.ru? в разделе FAQ по меню все написано.
...
Рейтинг: 0 / 0
25.12.2007, 17:06
    #35033336
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!
я ранее на том форуме тусовался очень даже активно. Еще вопрос по отчетам(все позабыл), как в pageFooter вывести количество строк на странице(заранее известно, что страница будет одна). А также как сделать вывод, мол стр. № 1. Я знаю, что есть переменная _pageno, а как к ней приконкатенировать слова забыл( и так "" + _pageno и так пытался '' + _pageno, а все не хочет). Подскажите как быть то?
...
Рейтинг: 0 / 0
25.12.2007, 17:08
    #35033342
при создании меню как изменить комбинации с русской клавиатуры
Не надо к ней ничего конкатенировать. Надпись "Стр." и поле для _pageno рядом ставишь и наслаждаешься полученным результатом.
...
Рейтинг: 0 / 0
25.12.2007, 17:19
    #35033371
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!
не спорю, так можно, но я делал конкатенацией такие вещи, но в принципе и так можно. А по поводу количества строк, нет никакой глобальной переменной, типа _rowcol?
...
Рейтинг: 0 / 0
25.12.2007, 17:31
    #35033398
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
FasterHarder
Код: plaintext
I started in 1983, in 2007 i still on a case!
не спорю, так можно, но я делал конкатенацией такие вещи, но в принципе и так можно. А по поводу количества строк, нет никакой глобальной переменной, типа _rowcol?
1. "Стр. " + alltrim(str(_pageno))
2. Глобальной нет. Заводишь переменную в отчете (меню report->Variables) ставишь value to store: 1 и Calculation: Sum
...
Рейтинг: 0 / 0
25.12.2007, 17:43
    #35033438
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!
спасибо Dima_T, начинаю вспоминать, сделал так:
Код: plaintext
"стр № " + alltrim(str(_pageno)) + "из " + alltrim(str(_pagetotal))
...
Рейтинг: 0 / 0
25.12.2007, 17:51
    #35033469
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
FasterHarder... начинаю вспоминать ... Чтобы не вспоминать банальные вещи достаточно хранить исходники того что когда либо было написано.
Я иногда нахожу полезные вещи в давно забытых много лет назад проектах.
...
Рейтинг: 0 / 0
25.12.2007, 18:06
    #35033517
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!
у меня на текущий момент нет даже строки кода на фоксе(акромя хелпа:)), даже забыл как прогу, состоящую из одной строки сделать:)(разобрался методом тыка + хелп). У меня будут вопросы еще по мелочам, думаю что знающему человеку на них ответить потребутеся от 10 до 30 сек(а чтобы найти в хелпе мне нужно будет минут по 5 - 10 на каждый), так что если что сильно не пинайте за глупые вопросы.
...
Рейтинг: 0 / 0
25.12.2007, 18:48
    #35033664
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!

есть некая модальная формочка(малого размера) с комбобоксом(содержит перечень полей некой таблицы). Также есть кнопка при нажатии на которую происходит индексирование данной таблицы и она должна открыться для просмотра. Как сделать так, чтобы форма открылась на весь экран, а не на пол или на размер этого модального окна(in screen). Подскажите как быть то?
Local nameField As String * храним поле, по которому пойдет индексация
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
If(Empty(This.Parent.cmbIndex.Text)) Then
	Messagebox("Выберите поле, по которому провести индексацию.",  0 , "Сообщение для пользователя")
	This.Parent.cmbIndex.SetFocus()
Else
	nameField = Alltrim(This.Parent.cmbIndex.Text)
	Clear
	Close Databases

	Use expon!organization Exclusive

	Index On &nameField TAG IND   * используем макроподстановку
	Browse;
		TITLE 'ПРОИНДЕКСИРОВАННАЯ ТАБЛИЦА ОРГАНИЗАЦИЙ';
		NORMAL
		
	DELETE TAG IND  	* удаляем созданный индекс
Endif

P.S. пока только на пол экрана.
...
Рейтинг: 0 / 0
25.12.2007, 19:09
    #35033699
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!
Подскажите, какое событие происходит у комбобокса в момент, когда он раскрыт и по одному из пунктов сделан щелчок мыши(т е в момент выбора чего либо из комбо)? Подскажите как быть то?
...
Рейтинг: 0 / 0
25.12.2007, 19:53
    #35033771
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
FasterHarder... Как сделать так, чтобы форма открылась на весь экран, а не на пол или на размер этого модального окна(in screen). Подскажите как быть то?
...
поиск в форуме по AsTopLevel должен помочь.

FasterHarder
Код: plaintext
I started in 1983, in 2007 i still on a case!
Подскажите, какое событие происходит у комбобокса в момент, когда он раскрыт и по одному из пунктов сделан щелчок мыши(т е в момент выбора чего либо из комбо)? Подскажите как быть то? Меню Tools->Debuger, там Tools->EventTracking включаешь, делаешь необходимые тебе действия и смотришь в логе какие события в каком порядке отрабатывают
...
Рейтинг: 0 / 0
25.12.2007, 20:10
    #35033782
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!

Astoplevel не помог, а вот событие нашел, interactiveChange:).
...
Рейтинг: 0 / 0
25.12.2007, 20:18
    #35033788
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!
так то реально непонятно как таблицу browserom отобразить на всем экране?
...
Рейтинг: 0 / 0
25.12.2007, 20:35
    #35033803
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
FasterHarder
Код: plaintext
I started in 1983, in 2007 i still on a case!
так то реально непонятно как таблицу browserom отобразить на всем экране?
Форма в окно фокса
Код: plaintext
1.
2.
thisform.windowstate =  2 
thisform.MDIform = .T.
Окно фокса на весь экран:
Код: plaintext
_screen.windowstate =  2 
Окно отдельно от фокса
Код: plaintext
thisform.showwindow =  2 
C последним много ньюансов
...
Рейтинг: 0 / 0
25.12.2007, 20:47
    #35033812
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!

получил ошибку: свойство showWindow только для чтения.
...
Рейтинг: 0 / 0
25.12.2007, 22:30
    #35033919
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!
остался очень важный нерешенный вопрос, связанный с меню. Комбинации с русскими буквами сделал, но не понятно, почему при запуске меню лиса ругается на неизвестную команду:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
DEFINE PAD _29c1c6uka OF _MSYSMENU PROMPT "ФОРМЫ" COLOR SCHEME  3  ;
	KEY CTRL+F, "CTRL+F"
DEFINE PAD _29c1c6ukb OF _MSYSMENU PROMPT "ИНДЕКСИРОВНИЕ" COLOR SCHEME  3  ;
	KEY CTRL+I, "CTRL+I"
DEFINE PAD _29c1c6ukc OF _MSYSMENU PROMPT "ПОИСК" COLOR SCHEME  3  ;
	KEY CTRL+P, "CTRL+P"
DEFINE PAD _29c1c6ukd OF _MSYSMENU PROMPT "ОТЧЕТНОСТЬ" COLOR SCHEME  3  ;
	KEY CTRL+O, "CTRL+O"
DEFINE PAD _29c1c6uke OF _MSYSMENU PROMPT "ЭТИКЕТКИ" COLOR SCHEME  3  ;
	KEY CTRL+E, "CTRL+E"
DEFINE PAD _29c1c6ukf OF _MSYSMENU PROMPT "ВЫХОД" COLOR SCHEME  3  ;
	KEY CTRL+V, "CTRL+V"
ON PAD _29c1c6uka OF _MSYSMENU ACTIVATE POPUP формы
ON SELECTION PAD _29c1c6ukf OF _MSYSMENU qiut

DEFINE POPUP формы MARGIN RELATIVE SHADOW COLOR SCHEME  4 
DEFINE BAR  1  OF формы PROMPT "ОРГАНИЗАЦИИ" ;
	KEY CTRL+O, "CTRL+O"
DEFINE BAR  2  OF формы PROMPT "\-"
DEFINE BAR  3  OF формы PROMPT "УЧАСТНИКИ ОТ ОРГАНИЗАЦИЙ" ;
	KEY CTRL+U, "CTRL+U"
DEFINE BAR  4  OF формы PROMPT "\-"
DEFINE BAR  5  OF формы PROMPT "УЧАСТНИКИ" ;
	KEY CTRL+T, "CTRL+T"
ON SELECTION BAR  1  OF формы do form org.scx
на эту строку:
Код: plaintext
ON PAD _29c1c6uka OF _MSYSMENU ACTIVATE POPUP формы
все уже перепробовал, но так и не понял, как это убрать. Подскажите как быть то?, буду очень благодарен.

P.S. проект готов по частям, а вот с меню неполадки.
...
Рейтинг: 0 / 0
26.12.2007, 00:01
    #35033969
FasterHarder
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
при создании меню как изменить комбинации с русской клавиатуры
Код: plaintext
I started in 1983, in 2007 i still on a case!
полностью поборол проблемы с меню. не хватало read events clear events.
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / при создании меню как изменить комбинации с русской клавиатуры / 18 сообщений из 18, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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