Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 | 2 |

 

  Вопрос: TF (Textual Figures) Добавлено: 10.09.08 15:58  

Автор вопроса:  Harter
Вот написал программку, нет: ПРОГРАММУЛЬКУ...
Хотелось бы комментариев, предложений по модернизации и т. д.
т.к. моя фантазия дремлет с каждой секундой все крепче и крепче...

Ссылки для скачивания файла:
http://ifolder.ru/8064471
http://www.zshare.net/download/18520279c070d151/
http://www.load.to/?d=mJTfMVb6Ei

зы: я ее не тестировал особо, так что Багов там наверно столько же, сколько и кода :)

Ответить

  Ответы Всего ответов: 18  

Номер ответа: 1
Автор ответа:
 Boconon



ICQ: 216390557 

Вопросов: 25
Ответов: 71
 Web-сайт: microsoft.com
 Профиль | | #1
Добавлено: 10.09.08 20:07
Сделай, чтобы курсор был в виде креста только на поле для рисования, а то это мешает, когда в меню или на кнопках курсор крестом, а не стрелочкой :).
А где применять эту программульку? Добавь еще хотя-бы рисование линий и фигур, да и заливка, и кисть не помешают :).

Ответить

Номер ответа: 2
Автор ответа:
 Harter



Вопросов: 32
Ответов: 167
 Профиль | | #2 Добавлено: 10.09.08 23:03
Ну прога ориентирована чисто на рисование текстом, тоесть текст не является одним из инструментов, писал специально для товарища...

А где применять эту программульку?

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

А насчет креста, сейчас сделаю, вот я тут подумал, чего еще не хватает:
1.Ctrl+Z, Ctrl+Y.
3.Возможность не показывать автора.
4.Курсор ввиде текста, или как нибудь поудобнее.
...Дополняем список...

Ответить

Номер ответа: 3
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #3
Добавлено: 10.09.08 23:05
выбор цвета - диалогом
курсор по середине надписи, а не слевасверху
Также не совсем понятен смысл графического редактора с единственным инструментом Штамп=)

Ответить

Номер ответа: 4
Автор ответа:
 Harter



Вопросов: 32
Ответов: 167
 Профиль | | #4 Добавлено: 10.09.08 23:12
Также не совсем понятен смысл графического редактора с единственным инструментом Штамп=)


Ну это для творческих людей, включаем фантазию, и рисуем картинку текстом


Неужели есть подобные программы?
А то я у кого не спрошу, все говорят - за идею 5(за выполнение 3).
А что за Штамп?
Я знаю в PhotoShop'e "Clone Stamp", но это не то...

Ответить

Номер ответа: 5
Автор ответа:
 User Unknown



Вечный Юзер!

ICQ: uu@jabber.cz 

Вопросов: 120
Ответов: 3302
 Профиль | | #5 Добавлено: 10.09.08 23:33
aalib

Ответить

Номер ответа: 6
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #6
Добавлено: 10.09.08 23:43
ну штамп.. в прогах всяких бывает, типа печать ОДОБРЕНО ставится и т.п.

>Еще надо сделать, несколько надписей с возможностью быстрого переключения между ними
>Доковая панель инструментов

Ответить

Номер ответа: 7
Автор ответа:
 Harter



Вопросов: 32
Ответов: 167
 Профиль | | #7 Добавлено: 10.09.08 23:46
>>Доковая панель инструментов


Исходя из этой фразы, ты предлагаешь сделать программку с различными инструментами, правильно я понимаю!?

>Еще надо сделать, несколько надписей с возможностью быстрого переключения между ними


Например!?

Ответить

Номер ответа: 8
Автор ответа:
 Harter



Вопросов: 32
Ответов: 167
 Профиль | | #8 Добавлено: 10.09.08 23:50
А, и еше, убирать hscroll'ы, и ставить вместо них диалог, или оставить?

Ответить

Номер ответа: 9
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #9
Добавлено: 10.09.08 23:58
>Доковая панель инструментов.
Ну короче правую панель сделать приклеивающимся окном. Я брал эту тему из редактора cEdit, когда писал редактор картинок 40х40 пикселей))
>Например!?
Например, я ввожу сразу десяток разных надписей, и по нажатии кнопок 0-9 прога переключается между ними.

Ответить

Номер ответа: 10
Автор ответа:
 Harter



Вопросов: 32
Ответов: 167
 Профиль | | #10 Добавлено: 11.09.08 00:00
:)спасибо что разжевал....
Все ясно, интересная мысля, постараюсь до завтра реализовать все выше сказанное...

Ответить

Номер ответа: 11
Автор ответа:
 Harter



Вопросов: 32
Ответов: 167
 Профиль | | #11 Добавлено: 11.09.08 00:03
Забыл спросить:
Как реализовать Undo?
Вот одна из моих жалких попыток:
  1. Const WM_UNDO = &H304
  2.  
  3. Private Declare Function SendMessage Lib "user32" _
  4. Alias "SendMessageA" (ByVal hWnd As Long, _
  5. ByVal wMsg As Long, ByVal wParam As Long, _
  6. lParam As Any) As Long
  7.  
  8. Private Sub mnuUndo_Click()
  9. SendMessage Picture1.hWnd, WM_UNDO, 0, 0
  10. End Sub

Ответить

Номер ответа: 12
Автор ответа:
 Harter



Вопросов: 32
Ответов: 167
 Профиль | | #12 Добавлено: 11.09.08 00:28
Дико извиняюсь за очень напрягающие вопросы:

Например, я !ввожу! сразу десяток разных надписей


А как именно!?
Вводишь отдельно?
Или нарисовал, и оно заполняет 9 ячеек?

Ответить

Номер ответа: 13
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #13
Добавлено: 11.09.08 00:44
пф, SendMessage'ем ты не отделаешься, венда же не запоминает все состояния пикчербокса

>А как именно!?
Ну сделай хотя_бы несколько текстбоксов, а выбор между ними с помощью optionButton

Ответить

Номер ответа: 14
Автор ответа:
 Harter



Вопросов: 32
Ответов: 167
 Профиль | | #14 Добавлено: 11.09.08 00:49
пф, SendMessage'ем ты не отделаешься, венда же не запоминает все состояния пикчербокса


Что же тогда делать?

Ну сделай хотя_бы несколько текстбоксов, а выбор между ними с помощью optionButton


Ну это ты загнул...
А не легче ли обойтись ListBox'ом!?

Ответить

Номер ответа: 15
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #15
Добавлено: 11.09.08 01:02
легче пожалуй) хотя.. фиг знает

Попробуй что-то типа этого (picture1:autoredraw+drawwidth=10+scalewidth=pixel, Command1-3)
  1. Option Explicit
  2. Dim ip As IPictureDisp
  3.  
  4. 'Рисуем две точки
  5. Private Sub Command1_Click()
  6. Picture1.PSet (30, 40)
  7. Picture1.PSet (50, 60)
  8. End Sub
  9.  
  10. 'Запоминаем рисунок и стираем его
  11. Private Sub Command2_Click()
  12. Set ip = Picture1.Image
  13. Picture1.Cls
  14. End Sub
  15.  
  16. 'Возвращаем рисунок на место
  17. Private Sub Command4_Click()
  18. Picture1.PaintPicture ip, 0, 0
  19. End Sub

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам