powered by simpleCommunicator - 2.0.52     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Уроки Программированния FoxPro
3 сообщений из 3, страница 1 из 1
Уроки Программированния FoxPro
    #38486030
Фотография pipos522
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в книге обучения программированию на фоксе есть статейка прикольная
" Немного фантазии и лис выдаст нечто в стиле Математического сюрреализма делаем простейшую форму с двумя полями ввода и двумя кнопками к коде елик одной из кнопки пропишем след код"

DECIA X(400),Y(400)
FOR I = 1 TO 360
FOR K = 1 TO 200
Z = 6.6832*1/360
X(I) = 120+90*SIN(5*z)*cos(thisform.text1.value*Z)
Y(b) = 120+90*cos(5*z)*sin(thisform.text2.value*Z)
thisform.CurrentX=x(I)
thisform.CurrentY=Y(I)
thisform.Print ("((*))")
ENDFOR
ENDFOR

и фокс на DECIA ругается почти матом грешу на опечатку подскажите чем заменить можно
...
Рейтинг: 0 / 0
Уроки Программированния FoxPro
    #38486037
Reese
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DECLA
...
Рейтинг: 0 / 0
Уроки Программированния FoxPro
    #38486039
PaulWist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
pipos522в книге обучения программированию на фоксе есть статейка прикольная
" Немного фантазии и лис выдаст нечто в стиле Математического сюрреализма делаем простейшую форму с двумя полями ввода и двумя кнопками к коде елик одной из кнопки пропишем след код"

DECIA X(400),Y(400)
FOR I = 1 TO 360
FOR K = 1 TO 200
Z = 6.6832*1/360
X(I) = 120+90*SIN(5*z)*cos(thisform.text1.value*Z)
Y(b) = 120+90*cos(5*z)*sin(thisform.text2.value*Z)
thisform.CurrentX=x(I)
thisform.CurrentY=Y(I)
thisform.Print ("((*))")
ENDFOR
ENDFOR

и фокс на DECIA ругается почти матом грешу на опечатку подскажите чем заменить можно

Код: sql
1.
2.
DECLARE ArrayName1 (nRows1 [, nColumns1]) 
   [, ArrayName2 (nRows2 [, nColumns2])] ...
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Уроки Программированния FoxPro
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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