Здравствуйте! Сегодня: Чт, 29 Окт 2020, Ваш IP: 100.24.125.162 Войти через loginza
 
Вход | Регистрация | Забыли пароль?
Мой Kbyte.Ru
> Список форумов Kbyte.Ru - - Бета-тестирование
+ Создать новую тему Страница: 1
Тема: Открытие и сохранение программы. · +  +  дата добавления: 16.09.2013 / 19:47
Автор темы:
Akiva
Akiva
тем: 95 / ответов: 158 / благодарностей: 3 / репутация: 55
ответов: 158
создал(а) тем: 95


Сделал "велосипедик"-графический редактор.
С ним можно работать,но одно плохо:
При открытие(Open) или сохранение(Save), приходиться дважды щелкать кнопочкой.
тов.Алексей,если найдете несколько минут,посмотрите где я "собаку зарыл".

Уважающий Вас, Akiva
Технологии: Visual Basic .NET

+ WinGraphTest.zip (161,7 Кб)  
Ответ # 1 # · +  +  дата добавления: 16.09.2013 / 19:56
Автор ответа:
Алексей Немиро
Алексей Немиро
тем: 534 / ответов: 5130 / благодарностей: 325 / репутация: 211
Чашка Kbyte.Ru>>
Url: aleksey.nemiro.ru
Icq: 261779681
Skype: alekseynemiro
ответов: 5130
создал(а) тем: 534


OpenFileDialog1.ShowDialog() - показать диалоговое окно в холостую (элемент размещен на форме);
Dim Dlg As New OpenFileDialog - зачем-то создается новое диалоговое окно, динамически;
If Dlg.ShowDialog = Windows.Forms.DialogResult.OK Then - показать диалоговое окно, которое было создано динамически, оно же и используется для работы с файлом.

Изменения могут быть такими:
Private Sub OpenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles OpenToolStripMenuItem.Click
OpenFileDialog1.ShowDialog() : Dim Dlg As New OpenFileDialog
OpenFileDialog1.Filter = "Text|*.*|JPG|*.jpg|GIF|*.gif"
If DlgOpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then 'Открываем файл
image1 = Image.FromFile(DlgOpenFileDialog1.FileName)
pb.Image = image1
End If
End Sub
Красный - удалить;
Зеленый - добавить.
 
Ответ # 2 # · +  +  дата добавления: 16.09.2013 / 21:26
Автор ответа:
Akiva
Akiva
тем: 95 / ответов: 158 / благодарностей: 3 / репутация: 55
ответов: 158
создал(а) тем: 95


Спасибо Вам,Алексей.
 
Страница: 1 + Создать новую тему