Гость
Войти | Профиль | Очистить
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Изменить и откомпилировать prg файл, который отвечает за меню после его изменения / 20 сообщений из 20, страница 1 из 1
12.08.2016, 06:01
    #39290713
dmr55
dmr55
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
Имеется файл 2 файла формата prg
DSTAT1prg – файл отвечащие за меню

F14OPER.prg – файл который выбирает данные из базы данных по конкретным условиям
Выходит графическое меню в виде списка выбора, в списке выбирается конкретный пункт, в пункте едет ссылка на prg файл. Т.е. все меню и конкретно это меню записано в файле DSTAT1.prg и в этом файле есть ссылка на F14OPER.


Вместо F14OPER, нужно F14OPER55, когда я меняю его, то выходит ошибка, т.е. нужно сделать путь не к F14OPER, а к F14OPER55(это уже созданный новый файл) и как его (их) откомпилировать чтобы в файле DSTAT1.prg был виден файл F14OPER55


Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
DSTAT1.PRG (несколько строк кода)
…
@ 20, 11 PROMPT ' 123             ;
 14 '
…


…
CASE MEN21=14
            DO F14OPER
            CLOSE ALL
…
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 06:02
    #39290714
dmr55
dmr55
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
Имеется 2 файла файла формата prg
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 08:59
    #39290743
Дед Евгений
Дед Евгений
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
Весь код у вас не виден, но соманда CLOSE ALL закрывает все, в этом и может быть причина.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 10:14
    #39290792
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
dmr55Вместо F14OPER, нужно F14OPER55, когда я меняю его, то выходит ошибка, т.е. нужно сделать путь не к F14OPER, а к F14OPER55(это уже созданный новый файл) и как его (их) откомпилировать чтобы в файле DSTAT1.prg был виден файл F14OPER55
Код: sql
1.
2.
3.
4.
DSTAT1.PRG (несколько строк кода)
…
            DO F14OPER
…


замени DO F14OPER на
Код: sql
1.
DO F14OPER55


и озвучь какая ошибка выходит.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 11:28
    #39290896
dmr55
dmr55
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
в файле DSTAT1.PRG

DO F14OPER заменил на DO F14OPER55

Файл F14OPER55.PRG находится там же в директории программы

Ошибка
File 'F1OPER55.PRG' does not exist.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 11:37
    #39290908
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
Попробуй откомпилировать
Открой F14OPER55 и нажми меню Program - Compile
в итоге появится файл F14OPER55.FXP
Если F14OPER и F14OPER55 в одной папке, то должно работать.


"Программа" это что именно у тебя? Набор PRG или один EXE или APP?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 12:42
    #39290986
asdor
asdor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
dmr55в файле DSTAT1.PRG

DO F14OPER заменил на DO F14OPER55

Файл F14OPER55.PRG находится там же в директории программы

Ошибка
File 'F1OPER55.PRG' does not exist.
На всякий случай.

F14OPER55.PRG!=F1OPER55.PRG
Похоже не то написано в вызове
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 13:36
    #39291047
dmr55
dmr55
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
modify command f14oper5.prg (изменил вместо f14oper55.prg, не открывался)
Program - Compile

Изменил файле в DSTAT1.PRG строчку f14oper.prg на f14oper5.prg
Работает, делает выборку из f14oper5.prg

В файле DSTAT1.PRG заложены менюшки со списками выбора, нужно чтобы в файле DSTAT1.PRG выбирались из f14oper.prg и f14oper5.prg,
а сейчас я просто его переименовал в f14oper5.prg, вообще файлы f14oper.prg и f14oper5.prg это дубликаты, просто в f14oper5.prg есть другая выборка нежели у f14oper.prg
Конечно дублировать и переименовывать(в случае изменения кода нужно и не забыть в его дубликате изменить) файл f14oper.prg

Программа большая там много всяких фалов
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 13:49
    #39291058
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
dmr55Изменил файле в DSTAT1.PRG строчку f14oper.prg на f14oper5.prg
Работает, делает выборку из f14oper5.prg

...
dmr55, опять многа букав. В итоге работает или еще нерешенные проблемы остались?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 13:58
    #39291067
dmr55
dmr55
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
при замене и компиляции работает, но я просто заменил f14oper.prg на f14oper5.prg

Код: sql
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.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
SET COLOR TO R/W,W+/RB,N/N
      @ 19, 23 SAY ' 123 '
      SET COLOR TO N/W,W+/RB,N/N
      CLOSE ALL
      RETURN
   CASE MEN1=1
      DO MTKART1
      CLOSE ALL
      LOOP
   CASE MEN1=2
      DO PERIOD
      DO WHILE .T.
         SAVE SCREEN TO SCR1
         SET COLOR TO N/W,W+/RB,N/N
         @ 1, 0 CLEAR TO 24, 79
         SET COLOR TO R/W,W+/RB,N/N
         @ 2, 11 SAY '              455             ;
   '
         @ 3, 11 SAY '            4454           ;
   '
         @ 5, 11 SAY ' 323      ;
   '
         SET COLOR TO N/BG,W+/RB,N/N
         @ 6, 9 CLEAR TO 25, 64 DOUBLE
         @ 6, 10 TO 25, 63 DOUBLE
         @ 7, 11 PROMPT ' 1;
 1  '
         @ 8, 11 PROMPT ' 2;
 2  '
         @ 9, 11 PROMPT ' 3;
 3  '
         @ 10, 11 PROMPT ' 4;
 4  '
         @ 11, 11 PROMPT ' 5;
 5  '
         @ 12, 11 PROMPT ' 6;
 6  '
         @ 13, 11 PROMPT ' 7;
 7  '
         @ 14, 11 PROMPT ' 8;
 8  '
         @ 15, 11 PROMPT '9;
 9  '
         @ 16, 11 PROMPT ' 10;
 10 '
         @ 17, 11 PROMPT ' 11;
 11 '
         @ 18, 11 PROMPT ' 12;
 12 '
         @ 19, 11 PROMPT '13;
 13 '
         @ 20, 11 PROMPT ' 14;
 14 '
         @ 21, 11 PROMPT ' 15'
         @ 22, 11 prompt ' 16'
         @ 23, 11 PROMPT ' 17' 
         @ 24, 11 prompt ' 18



Мне нужно добавить еще один пункт в списке например
@ 25, 11 prompt ' 19
Который будет ссылать к файлу f14oper5.prg
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 14:18
    #39291089
Dima T
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
Конец цикла покажи, что после этого до ENDDO. Текст надписей можешь звездочками "запикать".

PS И как понимаю это FoxPro 2.6 под DOS. Ты это не забывай упоминать когда новый топик заводишь. В VFP меню совсем по другому делаются. Как в досе было я уже забыл, надо код видеть.

PPS Большие портянки под спойлер прячь, выделяешь, "дополнит." там "spoiler"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.08.2016, 14:30
    #39291104
dmr55
dmr55
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
 
Код: sql
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.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
72.
73.
74.
75.
76.
77.
78.
79.
80.
81.
82.
83.
84.
85.
86.
87.
88.
89.
90.
91.
92.
93.
94.
95.
96.
97.
98.
99.
100.
101.
102.
103.
104.
105.
106.
107.
108.
109.
110.
111.
112.
113.
114.
115.
116.
117.
118.
119.
120.
121.
122.
123.
124.
125.
126.
127.
128.
129.
130.
131.
132.
133.
134.
135.
136.
137.
138.
139.
140.
141.
142.
143.
144.
145.
146.
147.
148.
149.
150.
151.
152.
153.
154.
155.
156.
157.
158.
159.
160.
161.
162.
163.
164.
165.
166.
   MENU TO MEN100
               DO CASE
               CASE MEN100=0
                  CLEAR
                  EXIT
               CASE MEN100=1
                  SAVE SCREEN TO SCRVV
                  DO WHILE .T.
                     RESTORE SCREEN FROM SCRVV
                     DO ZAPRDMKB
                     CLOSE ALL
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=2
                  DO WHILE .T.
                     DO ZAPRDMES
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=3
                  SAVE SCREEN TO SCRVV
                  DO WHILE .T.
                     RESTORE SCREEN FROM SCRVV
                     DO ZAPROPER
                     CLOSE ALL
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=4
                  DO WHILE .T.
                     DO ZAPRKONT
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=5
                  DO WHILE .T.
                     DO ZAPRDAT
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=6
                  DO WHILE .T.
                     DO ZSOPUT12
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=7
                  DO WHILE .T.
                     DO ZAPRPLAN
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=8
                  DO WHILE .T.
                     DO ZAPRPRF1
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=9
                  DO WHILE .T.
                     DO ZAPRPUST
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=10
                  DO WHILE .T.
                     DO ZAPTRAVM
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=11
                  DO WHILE .T.
                     DO ZAPOBEZB
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=12
                  DO WHILE .T.
                     DO ZZWRACH
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=13
                  DO WHILE .T.
                     DO ZAPRBOMG
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=14
                  DO WHILE .T.
                     DO ZPEREW
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=15
                  DO WHILE .T.
                     DO ZPROLBOL
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=16
                  DO WHILE .T.
                     DO ZAPRKDNI
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=17
                  DO WHILE .T.
                     DO ZAPDOSL
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
               CASE MEN100=18
                  DO WHILE .T.
                     DO ZAPRUKL1
                     CLOSE ALL
                     SET COLOR TO N/W,W+/RB,N/N
                     EXIT
                  ENDDO
                  LOOP
                  CLOSE ALL
               ENDCASE
            ENDDO
            LOOP
CASE MEN10=8
            SAVE SCREEN TO SCRVV
            DO WHILE .T.
               RESTORE SCREEN FROM SCRVV
               DO BAZAREZ2
               CLOSE ALL
               EXIT
            ENDDO
            LOOP
         
            CLOSE ALL

...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.08.2016, 14:45
    #39291583
SoftwareBoy
SoftwareBoy
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
Естественно, FPD не видит F14OPER55.PRG, т.к. в имени больше 8 символов - короткое имя файла будет типа F14OPE~1.PRG. И @25,11 в DOS-окне по умолчанию нет, т.к. строк всего 25, а нумерация с 0. Для меню с большим количеством пунктов в FPD есть DEFINE POPUP, DEFINE BAR и т.д. - количество пунктов не ограничено размером экрана, не нужны бесконечные SAVE SCREEN / RESTORE SCREEN.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 05:16
    #39291693
dmr55
dmr55
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
Когда добавляю
Код: sql
1.
@ 25, 11 prompt ' 18



Выдает ошибку
position is off the screen
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 05:57
    #39291694
alextashk
alextashk
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
dmr55,
В dos 24 строки, если не включен особый режим.
Делай список многоколончатый или со скроллингом.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 07:25
    #39291701
dmr55
dmr55
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
Как особый режим включить
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 12:09
    #39291841
alextashk
alextashk
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
dmr55,

SET DISPLAY TO VGA5
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 12:10
    #39291842
alextashk
alextashk
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
dmr55,

Но что Вы будете делать, когда меню превысит 50 пунктов?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 12:17
    #39291846
dmr55
dmr55
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
Мне пока нужно было добавить 25 строчку, но пока я обошелся без исключения, вместо строчки-пробела поставил нужный текст, ну а SET DISPLAY TO VGA5 нужно иметь ввиду, его получается в код нужно вставить
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 18:01
    #39292191
alextashk
alextashk
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Изменить и откомпилировать prg файл, который отвечает за меню после его изменения
dmr55,

SET DISPLAY TO VGA50

ошибся при вводе
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Изменить и откомпилировать prg файл, который отвечает за меню после его изменения / 20 сообщений из 20, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 594ms
Закрыть
start [/forum/topic.php?fid=41&tablet=1&tid=1582073]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 141ms
get topic data:
 14ms
get forum data:
 3ms
get page messages:
 57ms
get tp. blocked users:
 2ms
others: 345ms
total:  594ms
x
x
Закрыть


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