Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Меню в верху формы!!! / 15 сообщений из 15, страница 1 из 1
23.12.2009, 11:21
    #36381634
flashdor
flashdor
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
Как разместить меню на форме!!!! помогите!!! Когда я запускаю свой файл с базой нужно чтобы после активации (введения пароля) появилась пустая форма, а меню было с верху!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.12.2009, 11:26
    #36381652
проходящий.
проходящий.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
flashdorКак разместить меню на форме!!!! помогите!!! Когда я запускаю свой файл с базой нужно чтобы после активации (введения пароля) появилась пустая форма, а меню было с верху!А форма как обычно as top level? Других не признаем?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.12.2009, 11:36
    #36381676
flashdor
flashdor
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
Обыкновенная форма, которая создается стандартно когда делаем проект!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.12.2009, 11:40
    #36381698
проходящий.
проходящий.
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
flashdorОбыкновенная форма, которая создается стандартно когда делаем проект!О каких таких "стандартах" речь? При создании проекта формы не создаются. Вот при создании приложения мастером создаются. Но это стандартом никогда не было. Примеры использования не есть стандарты.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.12.2009, 11:41
    #36381699
flashdor
flashdor
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
Хорошо не так выразилась!:)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.12.2009, 14:40
    #36382262
ВладимирМ
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
Если форма открытвается внутри основного окна _SCREEN, то концепция построения приложения в FoxPro не предполагает размещения на ней меню. Меню создается только и исключительно в основном окне _SCREEN. Один общий "узел управления". Разумеется, "контекстно-зависимый". Т.е. действие по выбранному пункту меню заивисит от того, какой объект (форма) в данный момент активна.

Пересмотрите концепцию организации управления в своем приложении. Не пытайтесь делать "как там". FoxPro предполагает вполне определенный интерфейс создания приложений. Разумеется, можно сделать "как там", но это потребует значительных усилий. Придется много программировать.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.12.2009, 14:52
    #36382305
igorbik
igorbik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
flashdor,

Showwindow формы ставим 2 - as top level form
В ините пишем, например, так
************************
DEFINE MENU _example BAR IN WINDOW (THISFORM.Name) COLOR SCHEME 1

DEFINE PAD p1 OF _example PROMPT "\<File"
ON PAD p1 OF _example ACTIVATE POPUP file

DEFINE POPUP file MARGIN
DEFINE BAR 1 OF file PROMPT "E\<xit"
ON SELECTION BAR 1 OF file _SCREEN.ActiveForm.Release

ACTIVATE MENU _example NOWAIT
****************************
Здесь один пад, в котором один пункт
По образцу доделайте как надо.
У меня работает, надеюсь, у Вас тоже будет.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.12.2009, 15:58
    #36382560
GoshaS
GoshaS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
Послушайтесь ВладимираМ и проблем с приложением будет гораздо меньше.
Если вам просто эстетически кажеться не красивым окно фоксика - то можно вставить свою любимую фотку на задний план и наслаждаться :-)
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
*картинка :-)
_screen.WindowState=  2  
_screen.BackColor=RGB( 206 , 221 , 223 ) 
IF  TYPE('_screen.imgPaper') = 'U'
	_screen.AddObject('imgPaper', 'image')
ENDIF
WITH _screen.imgPaper
	.Stretch= 1 
	cFile=FILETOSTR('"'+FULLPATH("MyPic.jpg")+'"')
	.PictureVal=cFile
	.Move( 0 ,  0 , _screen.Width, _screen.Height)
	.Visible= .T. 
ENDWITH
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.12.2009, 04:12
    #36383526
flashdor
flashdor
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
Т.е. получается что в тексте моей программы нужно изменить только MyPic.jpg?
А как он найдет путь к этой картинке?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.12.2009, 11:48
    #36384077
GoshaS
GoshaS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
создаешь в проекте отдельные папки, где будешь размещать свой проект, у меня созданы:
base - таблицы
pic - картинки
forms - формы
menu - менюшки
prg - программы
reports - очтеты
Shabloni - шаблоны, вордовские, экселевские и пр.
tmp - для временного хранения файлов
tools - сторонние программы, скажем akelpad, обновлялка и пр.

Создаешь файлик config.fpw и ложишь его в свой проект где находится *.PJT и где будет находится твой *.exe
В этом файле прописываешь пути , и пр.
Код: plaintext
1.
2.
3.
4.
CODE PAGE =  1251 
path = base; pic; forms ; menu; prg; reports; Shabloni; tmp; tools
Title = Мой первый проект
RESOURCE = FoxUser.dbf
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.05.2010, 10:59
    #36610432
Marfu6a
Marfu6a
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
igorbik, скажи плиз, а можно ли пункты меню не называть словами, а например вместо слов картинки, т. е. чтобы пункты меню выглядели как кнопки-картинки??? :) Жду ответа!!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.05.2010, 11:22
    #36610500
Dag
Dag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
Marfu6aigorbik, скажи плиз, а можно ли пункты меню не называть словами, а например вместо слов картинки, т. е. чтобы пункты меню выглядели как кнопки-картинки??? :) Жду ответа!!!!
А самому попробовать слабо? Присвой PROMPT нулевое значение типа [], используй опции PICTURES.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.05.2010, 11:28
    #36610521
Marfu6a
Marfu6a
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
Dag, оно то не слабо, но не получается. Пример:
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE POPUP cMenu2 MARGIN
DEFINE BAR 1 OF cMenu2 PROMPT '' PICTURE 'NEW.bmp'

ACTIVATE POPUP cMenu2

Активируется просто пункт пустой, а картинки НЕТ!!! :(
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.05.2010, 12:01
    #36610623
Dag
Dag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
А с использованием норм. PROMPT работает? Верно ли указан путь к картинке?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.05.2010, 12:23
    #36610694
Marfu6a
Marfu6a
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Меню в верху формы!!!
Dag, Картинка размещена в текущем каталоге.

DEFINE BAR 1 OF cMenu2 PICTURE 'NEW.bmp'

получается: в пункт меню имеет название NEW.bmp.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Меню в верху формы!!! / 15 сообщений из 15, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 552ms
Закрыть
start [/forum/topic.php?fid=41&tablet=1&tid=1585330]:
 0ms
get settings:
 9ms
get forum list:
 12ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 109ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 48ms
get tp. blocked users:
 2ms
others: 349ms
total:  552ms
x
x
Закрыть


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