Важная информация
Показано с 1 по 9 из 9

Тема: Small Paint

  1. #1 Small Paint 
    Модератор Аватар для pingvin
    Регистрация
    11.02.2011
    Сообщений
    389
    Сказал(а) спасибо
    80
    Поблагодарили 75 раз(а) в 48 сообщениях
    Пишу небольшую рисовалку. Уже отлажена функция сохранения и открытия картинок, но только файл "0.bmp" который лежит в директории с программой. Это и есть большой последний недостаток, до выпуска полной первой версии пейнта. Я не хочу придумывать медленный "велосипед", который называется OpenFileDialog и SaveFileDialog. Вот тут та же история, что и с SavePicture, не могу найти как его "кушать". Кто может, помогите!

    [Ссылки могут видеть только зарегистрированные пользователи. ]
    Последний раз редактировалось pingvin; 22.11.2011 в 21:44.
    На этом месте могло быть Ваше "Спасибо"
    Ответить с цитированием  
     

  2. #2  
    Профи Аватар для Кертис
    Регистрация
    17.11.2011
    Сообщений
    105
    Сказал(а) спасибо
    1
    Поблагодарили 9 раз(а) в 9 сообщениях
    Как-то так:
    Код :
    OpenFileDialog1.Filter = "Bitmap (*.bmp)|*.bmp"
            OpenFileDialog1.ShowDialog()
            MsgBox(OpenFileDialog1.FileName)
    и так:
    Код :
            SaveFileDialog1.Filter = "Bitmap (*.bmp)|*.bmp"
            SaveFileDialog1.ShowDialog()
            MsgBox(SaveFileDialog1.FileName)
    Открой для себя MSDN, много вопросов сразу отпадет.

    По сабжу: выглядит очень слабенько. Если хочешь, могу поискать у себя на компьютере рисовалку, которую я писал будучи школьником. Правда она на 7 делфях, но суть та же.
    Ответить с цитированием  
     

  3. #3  
    Супер модератор Аватар для Kakos_nonos
    Регистрация
    07.01.2011
    Адрес
    Кубань
    Сообщений
    1,531
    Сказал(а) спасибо
    126
    Поблагодарили 428 раз(а) в 291 сообщениях
    Записей в блоге
    6
    Я тоже такую делал. Только на Делфи.
    Туда ещё можно добавить функцию заливки, будет намного интереней.
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    Ответить с цитированием  
     

  4. #4  
    Модератор Аватар для pingvin
    Регистрация
    11.02.2011
    Сообщений
    389
    Сказал(а) спасибо
    80
    Поблагодарили 75 раз(а) в 48 сообщениях
    Не работает Мне очень интересно, выкладывайте свою рисовалку!
    На этом месте могло быть Ваше "Спасибо"
    Ответить с цитированием  
     

  5. #5  
    Супер модератор Аватар для Kakos_nonos
    Регистрация
    07.01.2011
    Адрес
    Кубань
    Сообщений
    1,531
    Сказал(а) спасибо
    126
    Поблагодарили 428 раз(а) в 291 сообщениях
    Записей в блоге
    6
    Постараюсь найти.
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    Ответить с цитированием  
     

  6. #6  
    Модератор Аватар для pingvin
    Регистрация
    11.02.2011
    Сообщений
    389
    Сказал(а) спасибо
    80
    Поблагодарили 75 раз(а) в 48 сообщениях
    Так, всё заработало. Фишка в том что AutoDedraw должен быть равен true. И ещё, вот что решил учить Pascal. Вроде вспомнил, подучил. Хочу переходить Delphi. Кто-нибудь знает надёжный ресурс, откуда можно скачать его (Borland Delphi)?
    На этом месте могло быть Ваше "Спасибо"
    Ответить с цитированием  
     

  7. #7  
    Профи
    Регистрация
    31.10.2011
    Адрес
    Планета Земля
    Сообщений
    117
    Сказал(а) спасибо
    7
    Поблагодарили 9 раз(а) в 8 сообщениях
    [Ссылки могут видеть только зарегистрированные пользователи. ] - Delphi 7.
    Весит 90 МБ.
    Ответить с цитированием  
     

  8. Пользователь сказал cпасибо:

    pingvin (19.12.2011)

  9. #8  
    Модератор Аватар для pingvin
    Регистрация
    11.02.2011
    Сообщений
    389
    Сказал(а) спасибо
    80
    Поблагодарили 75 раз(а) в 48 сообщениях
    Наконец-то разобрался, во многом был не прав, и наконец внёс очень значительные изменения:
    1. Теперь при открытии и сохранении выводится окно, где можно выбрать директорию для сохранения и расширение изображения.
    2. Вместо 10-ти цветов имеется палитра со всеми цветами. Для вызова палитры надо щёлкнуть по большому серому квадрату в левом нижнем углу.
    3. Добавился новый инструмент: линия.

    Пока что всё, но надеюсь этот проект не заглохнет)
    exe-шник и исходник во вложенном фале: [Ссылки могут видеть только зарегистрированные пользователи. ]
    Последний раз редактировалось pingvin; 10.03.2012 в 08:22.
    На этом месте могло быть Ваше "Спасибо"
    Ответить с цитированием  
     

  10. 3 пользователя(ей) сказали cпасибо:

    >Quiet Snow< (15.01.2013), Doomer_ (19.03.2012), Абадябер (09.03.2012)

  11. #9  
    Супер модератор Аватар для >Quiet Snow<
    Регистрация
    11.04.2011
    Адрес
    Планета земля
    Сообщений
    3,822
    Сказал(а) спасибо
    1,808
    Поблагодарили 933 раз(а) в 795 сообщениях
    Записей в блоге
    1
    Прошу прощения, но выдаётся ошибка:
    Component MSCOMCTL.OCX or one of it's dependencies not correctly registered: a file is missing or invalid

    Есть ли возможность включить в архив этот файл? Ставить VB ради проверки проги не охота,
    т.к. просто не хочется засорять комп. Если не ошибаюсь, в VB есть опция компиляции, позволяющая
    создавать EXE без вспомогательных файлов.
    Обучение прикладному программированию(по skype), качественно, недорого, 18+, вопросы в личку.
    «Если вы ничего не сделаете, я уверяю вас, ничего и не произойдёт» © Жак Фреско
    Ограниченно модерирую.
    Ответить с цитированием  
     

Информация о теме
Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •