Сохранение перевернутой картинки в файл - Visual Basic .NET

  1. Доброго времени суток. Такая проблема. Работаю в WPF на vb.net. Открываю jpg файл, поворачиваю картинку на 90 градусов. как мне сохранить картинку в текущем положении обратно в файл, не открывая диалогового окна на сохранение.


textual

Код:

    Private Sub Redo_Click(ByVal sender As Object, ByVal e As RoutedEventArgs) Handles Redo.Click
        Dim bi As New BitmapImage()
 
        If ListBox1.SelectedItem Is Nothing Then Exit Sub
 
        Using stream As New IO.FileStream(ListBox1.SelectedItem, IO.FileMode.Open, IO.FileAccess.Read)
            bi.BeginInit()
            bi.CacheOption = BitmapCacheOption.OnLoad
            bi.StreamSource = stream
            bi.Rotation = Rotation.Rotate90
            bi.EndInit()
            bi.Freeze 
        End Using
 
        Image1.Source = bi
    End Sub


Похожие ответы
  1. Здравствуйте,у меня такая проблема в vb 2010 есть 2е текстовые формы и кнопка,надо чтоб текст по нажатию кнопки вписанный в первую текстовые форму вводился во 2ю,проблема втом чтобы текст имеющийся во 2й текстовые форме остался. Помогите чего то втупил

  1. Как программно можно сохранить ветви с корнями и потом загрузить? Эта тема не подходит Сохранение и загрузка TreeView. Как правильно реализовать действие? Спасибо.vb.net1 TreeView.DataBindings

  1. В общем все облазил, и на форуме и в гугле, делал по разному и никак не получается(( нужно что бы при НАЖАТИИ НА КНОПКУ введенное в TextBox1(Например Имя(Вася)) имя заносилось в DataGrid(Имя моей таблицы), и в TextBox2(Фамилия) так же заносилось в таблицу(DataGrid) и сохранялось там же. TextBox1,2 находятся на Form1 , а DataGrid находятся на Form2) Не ругайтесь сильно)) HELP))

  1. Здравствуйте, уважаемые коллеги! Имеется RichTextBox, в котором происходит колдовство над текстом. Далее текст отправляется в таблицу SQLite. Разумеется, что при чтении из таблицы форматирование (размер шрифта и т.п.) не сохраняется, а очень хочется. Быть может, у кого-то был опыт решения данного вопроса или хотя бы есть идеи, как это организовать наилучшим образом?

  1. Сохраняя изображение из PictureBox в файл мы получаем несжатый битовый образ независимо от того какое расширение файла указываем.vb.net1 2 3         Dim myImg1 As System.Drawing.Bitmap = PictureBox1.Image         Dim myImg2 As New System.Drawing.Bitmap(myImg1, PictureBox1.Size.Width, PictureBox1.Size.Height)         myImg2.Save(Application.StartupPath & "\111.png")(этот пример взят с Сохранить изображение из PictureBox в файл в том разрешении, в каком мы ее видим). Размер загруженного в PictureВox jpeg-файла 100 кбайт, а сохранённого из PictureBox в файл 800 кбайт, причём размер файла не зависит от выбранного расширения. Качество то же самое. Существуют ли в NET способы сохранять картинки в сжатых форматах (png, gif, ...)? Может быть есть какие-то сторонние dll?

  1. Здравствуйте! Подскажите пожалуйста, возможно ли сохранить массив:vb.net1 2 3 Dim МассивЗвуковыхФайлов() As String = {".mp3", ".flac", ".ape",                                           ".ogg", ".waw", ".ac3",                                           ".wma", ".m4a", ".acc"}С помощью My.Settings или записывать в txt файл? У меня при работе с программой можно добавлять новые форматы файлов и чтобы каждый раз не вводить мне нужно, чтобы массив сохранялся с новыми значениями

  1. Доброго времени суток. Приведите, если не сложно, пару примеров работы с excel. Создание, открытие книги/страницы, сохрание в информации в определенную ячейку, сохранение документа.

  1. Загружают rtf файл с текстом в rtbox... Далее нужно программно увеличить шрифт текста, что бьы при этом осталось все форматирование текста - все выделения цветом, подчёркивания, и тд и тп... Стандартный способ rtb.font = new font("...", 20) меняет размер, но всё форматирование документа теряется.. Кто может помочь?

  1. Нахожу ячейку в таблице просто:vb.net1 xlSht.Rows(1).Find("Wordstat").SelectНо далее не знаю. Мне нужно после столбца Wordstat удалить все столбцы, смотреть скрин. Столбцов может быть разное количество. Еще известно:vb.net1 2         '   div всего столбцов в Excel         Dim div As Integer = colIndex

  1. Привет всем. Как сохранит значение CheckBox в таблицу ms access.