PureBasic - форум

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.

Вы здесь » PureBasic - форум » Вопросы по PureBasic » нужна помощь

нужна помощь

Страница: 1

Сообщений 1 страница 17 из 17

1

  • Автор: xenux
  • Новичок
  • Зарегистрирован: 26.08.2012
  • Приглашений: 0
  • Сообщений: 9
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    1 час 42 минуты
  • Последний визит:
    26.08.2012 18:24:12

люди я хочу создать программу.она будет похожа вот на этот сайт http://ru.****.com/ хочу сделать как бы копию

0

2

  • Автор: Пётр
  • Активный участник
  • Зарегистрирован: 14.06.2009
  • Приглашений: 0
  • Сообщений: 2944
  • Уважение: [+96/-5]
  • Позитив: [+1/-0]
  • Пол: Мужской
  • Провел на форуме:
    2 месяца 9 дней
  • Последний визит:
    18.04.2024 17:14:34

Опишите что именно нужно, потому что ничего не понятно.

0

3

  • Автор: ВиниПур
  • Активный участник
  • Зарегистрирован: 11.11.2010
  • Приглашений: 0
  • Сообщений: 271
  • Уважение: [+8/-0]
  • Позитив: [+1/-0]
  • Провел на форуме:
    1 день 22 часа
  • Последний визит:
    12.03.2022 21:07:46

Да всё понятно, тупо реклама сайта :D

0

4

  • Автор: Пётр
  • Активный участник
  • Зарегистрирован: 14.06.2009
  • Приглашений: 0
  • Сообщений: 2944
  • Уважение: [+96/-5]
  • Позитив: [+1/-0]
  • Пол: Мужской
  • Провел на форуме:
    2 месяца 9 дней
  • Последний визит:
    18.04.2024 17:14:34

Тоже были такие мысли.
Если ТС не ответит, то тема окажется в корзине!

0

5

  • Автор: xenux
  • Новичок
  • Зарегистрирован: 26.08.2012
  • Приглашений: 0
  • Сообщений: 9
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    1 час 42 минуты
  • Последний визит:
    26.08.2012 18:24:12

это не реклама сайта хочу сделать как бы подобие сайта в приложении но уже для другой игры
ну в первую очередь надо сделать меню ну и какое нибудь оформление на фон

0

6

  • Автор: xenux
  • Новичок
  • Зарегистрирован: 26.08.2012
  • Приглашений: 0
  • Сообщений: 9
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    1 час 42 минуты
  • Последний визит:
    26.08.2012 18:24:12

фон хотелось бы вот такой http://s1.uploads.ru/t/tIW45.jpg
ещё обязательно нужен полноэкранный режим подскажите возможно ли создать такое творение

0

7

  • Автор: Пётр
  • Активный участник
  • Зарегистрирован: 14.06.2009
  • Приглашений: 0
  • Сообщений: 2944
  • Уважение: [+96/-5]
  • Позитив: [+1/-0]
  • Пол: Мужской
  • Провел на форуме:
    2 месяца 9 дней
  • Последний визит:
    18.04.2024 17:14:34
xenux написал(а):

возможно ли создать такое творение

Возможно.

0

8

  • Автор: xenux
  • Новичок
  • Зарегистрирован: 26.08.2012
  • Приглашений: 0
  • Сообщений: 9
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    1 час 42 минуты
  • Последний визит:
    26.08.2012 18:24:12

подскажите с чего мне начать потому что я в этом деле новичёк максимум что делал так это сайт на чистом HTML но охото сделать именно приложение

0

9

  • Автор: xenux
  • Новичок
  • Зарегистрирован: 26.08.2012
  • Приглашений: 0
  • Сообщений: 9
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    1 час 42 минуты
  • Последний визит:
    26.08.2012 18:24:12

сам файл .exe я создал но что дальше не знаю

0

10

  • Автор: Пётр
  • Активный участник
  • Зарегистрирован: 14.06.2009
  • Приглашений: 0
  • Сообщений: 2944
  • Уважение: [+96/-5]
  • Позитив: [+1/-0]
  • Пол: Мужской
  • Провел на форуме:
    2 месяца 9 дней
  • Последний визит:
    18.04.2024 17:14:34
xenux написал(а):

с чего мне начать

Начать нужно с изучения справки и примеров.
Если нужно полноекранное приложение, то смотри раздел Sprite & Screen.

Держи пример.

Код:
If InitSprite()=0 Or InitKeyboard()=0
  MessageRequester("","Ошибка инициализации")
  End
EndIf

UseJPEGImageDecoder()

If OpenScreen(1280, 1024, 32, "")=0
  MessageRequester("","Ошибка (1280x1024@32)")
Else
  If LoadSprite(0, "Back.jpg")=0
    CloseScreen()
    MessageRequester("","Ошибка загрузки спрайта")
    End
  EndIf
  Repeat
    
    ClearScreen(0)
    DisplaySprite(0, 0, 0)
    FlipBuffers()
    
    ExamineKeyboard()
  Until KeyboardPushed(#PB_Key_Escape) ; Выход - кнопка Esc.
EndIf

http://pure-basic.narod.ru/forum/Screen.zip

0

11

  • Автор: xenux
  • Новичок
  • Зарегистрирован: 26.08.2012
  • Приглашений: 0
  • Сообщений: 9
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    1 час 42 минуты
  • Последний визит:
    26.08.2012 18:24:12

спасибо начну потихоньку изучать

0

12

  • Автор: xenux
  • Новичок
  • Зарегистрирован: 26.08.2012
  • Приглашений: 0
  • Сообщений: 9
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    1 час 42 минуты
  • Последний визит:
    26.08.2012 18:24:12
Код:
If Result = (#PB_Any, 128, 160, 183, 31,"Button1.bmp")
  If LoadImage(0, "Button1.bmp")    ; измените 2-й параметр на путь/имя файла вашего изображения
    ButtonImageGadget(0, 10, 10, 100, 83, ImageID(0))
  EndIf
  Repeat
  Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

не пойму что не так

0

13

  • Автор: xenux
  • Новичок
  • Зарегистрирован: 26.08.2012
  • Приглашений: 0
  • Сообщений: 9
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    1 час 42 минуты
  • Последний визит:
    26.08.2012 18:24:12

как загрузить архив сюда

0

14

  • Автор: Пётр
  • Активный участник
  • Зарегистрирован: 14.06.2009
  • Приглашений: 0
  • Сообщений: 2944
  • Уважение: [+96/-5]
  • Позитив: [+1/-0]
  • Пол: Мужской
  • Провел на форуме:
    2 месяца 9 дней
  • Последний визит:
    18.04.2024 17:14:34
xenux написал(а):

не пойму что не так

xenux написал(а):

If Result = (#PB_Any, 128, 160, 183, 31,"Button1.bmp")

Проблема явно тут.
Как минимум тут две ошибки.

0

15

  • Автор: xenux
  • Новичок
  • Зарегистрирован: 26.08.2012
  • Приглашений: 0
  • Сообщений: 9
  • Уважение: [+0/-0]
  • Позитив: [+0/-0]
  • Провел на форуме:
    1 час 42 минуты
  • Последний визит:
    26.08.2012 18:24:12

и вы хотите сказать я пойму какие

0

16

  • Автор: max
  • Активный участник
  • Зарегистрирован: 24.11.2010
  • Приглашений: 0
  • Сообщений: 571
  • Уважение: [+1/-0]
  • Позитив: [+40/-0]
  • Пол: Мужской
  • Возраст: 39 [1985-03-29]
  • Провел на форуме:
    1 месяц 14 дней
  • Последний визит:
    19.10.2023 06:50:33
xenux написал(а):

не пойму что не так

xenux написал(а):

и вы хотите сказать я пойму какие

А что Вы хотели сделать этим кодом?
Если я правильно понял, то должно было открытся окно с ButtonImageGadget? А где открытие самого окна?

Код:
OpenWindow(0, 0, 0, 190, 100,"ButtonImage", #PB_Window_ScreenCentered)
  If LoadImage(0, "Button1.bmp")    ; измените 2-й параметр на путь/имя файла вашего изображения
    ButtonImageGadget(0, 10, 10, 100, 83, ImageID(0))
  EndIf
  Repeat
  Until WaitWindowEvent() = #PB_Event_CloseWindow

0

17

  • Автор: Тигрёнок
  • Активный участник
  • Откуда: Днепропетровск
  • Зарегистрирован: 31.07.2011
  • Приглашений: 0
  • Сообщений: 61
  • Уважение: [+1/-0]
  • Позитив: [+8/-1]
  • Пол: Мужской
  • Возраст: 31 [1992-11-09]
  • Провел на форуме:
    1 день 15 часов
  • Последний визит:
    14.12.2018 08:33:33

Совершенно не понятно, что же такое "If Result = (#PB_Any, 128, 160, 183, 31,"Button1.bmp")"

Если это всё-таки гаджет, то тут есть два варианта:
С использованием #PB_Any

Код:
LoadImage(0, "Button1.bmp")
Gadget=ButtonImageGadget(#PB_Any, x, y, Width, Height, ImageID(0))
If IsGadget(Gadget)
  ;Условие проверяет корректно ли был создан гаджет
EndIf

И без

Код:
LoadImage(0, "Button1.bmp")
If ButtonImageGadget(0, x, y, Width, Height, ImageID(0))
  ;Аналогично
EndIf

В случае #PB_Any переменная Gadget получает уникальный идентификатор гаджета; во втором случае ButtonImageGadget() возвращает 1 при успешном создании гаджета.

Аналогичную проверку можно сделать и для окна использовав IsWindow().

Отредактировано Тигрёнок (27.08.2012 15:27:11)

0

Страница: 1

Вы здесь » PureBasic - форум » Вопросы по PureBasic » нужна помощь