Страница: 1 |
Вопрос: Помогите!!!!!!!!! | Добавлено: 26.05.08 23:55 |
Автор вопроса: ![]() |
У меня есть процэдура которая сохраняет растровое изображения, мне нужно переделать этод код по векторному принцыпу с помощю DXF файла. Напимер у нас есть линия, эта процэдура должна запоминать только толщину этой линии,точки начала и конца.А потом с помощю процэдуры открытия должно считывать эти даные и отображать рисунок.Ниже написаный код на Visual Basic.
Спасибо наперед! Private Sub SaveAsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveAsToolStripMenuItem.Click With SaveFileDialog1 .Filter = "Все файлы рисунков |*.*|(*.bmp)|*.bmp|(*.JPEG)|*.JPEG|(*.jpg)|*.jpg" If .ShowDialog() = Windows.Forms.DialogResult.OK Then F.MdiParent = Me F.FName = .FileName F.Text = F.FName F.picBox.Image.Save(.FileName) F.IsSaved = True SaveToolStripMenuItem.Enabled = True End If End With End Sub Private Sub OpenToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OpenToolStripMenuItem.Click, OpenToolStripButton.Click F = New frmPaint F.MdiParent = Me With OpenFileDialog1 If .ShowDialog() = Windows.Forms.DialogResult.OK Then .Filter = "Все файлы рисунков |*.*|(*.bmp)|*.bmp|(*.JPEG)|*.JPEG|(*.jpg)|*.jpg" F.Show() F.picBox.Load(.FileName) F.FName = .FileName F.Text = F.FName F.IsSaved = True SaveToolStripMenuItem.Enabled = True End If End With End Sub |
Ответы | Всего ответов: 2 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ![]() Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | Цитата | #1 | Добавлено: 27.05.08 20:19 |
Процэдура развэ может что-то запоминат? Товарищьы обисните пожалуста о чьём вопрос |
Номер ответа: 2 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ICQ: 366698887 Вопросов: 2 Ответов: 5 |
Профиль | Цитата | #2 | Добавлено: 28.05.08 08:24 |
Ну тогда пусть эти процэдуры остаются.Нужно добавить код которий мог бы сохранить изображения в DXF файл, а потом считать из него.
По такому принцыпу работает AutoCAD. |
Страница: 1 |
|