Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - .NET

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

 

  Вопрос: Цвет Добавлено: 23.08.09 18:11  

Автор вопроса:  UnDeAdZak
У меня проблема: мне надо считать из файла определённый цвет, в переменную(типа Color).Но бейсик мне пишет,что невозможно преобразовать переменную типа String в Sustem.Draving.Сolor. Когда я записываю цвет подобной ошибки не происходит. Подскажите, что делать.

Ответить

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

Номер ответа: 1
Автор ответа:
 Дмитрий Юпатов



Вопросов: 4
Ответов: 457
  Web-сайт: cargomaster.at.ua/
 Профиль | | #1 		Добавлено: 23.08.09 18:43
Нихрена не ясно... Это типа цвет чего-то сохраняем в файл (ну типа настройка) а потом надо считать из файла (ка применить настройку при повторном запуске)?

Ответить

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



Вопросов: 80
Ответов: 476
  Профиль | | #2 Добавлено: 23.08.09 18:48
да

Ответить

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



ICQ: 300-70-6пятьЪ 

Вопросов: 62
Ответов: 545
  Web-сайт: iSkywalker.ru
 Профиль | | #3 		Добавлено: 23.08.09 21:48
  1. Dim col As Color = Color.Bisque
  2.         IO.File.WriteAllText("color.txt", col.ToArgb)
  3.         Dim newcol As Color = Color.FromArgb(IO.File.ReadAllText("color.txt"))

Ответить

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



Разработчик

Вопросов: 130
Ответов: 6602
  Профиль | | #4 Добавлено: 24.08.09 00:03
Argb, насколько я помню, это целочисленное Int32. С каких это пор с ним работают как с текстом?

WriteAllText/ReadAllText работают со String'ом

Ответить

Номер ответа: 5
Автор ответа:
 UnDeAdZak



Вопросов: 80
Ответов: 476
  Профиль | | #5 Добавлено: 24.08.09 02:47
Ничего не понимаю! Я делал всё практически так как сказал Skywalker:
  1.  
  2.     Dim Sw As StreamWriter
  3.     Dim Sr As StreamReader
  4.     Dim Col As Color = color.black
  5.     Dim Col1 As Color
  6.         Sw = New StreamWriter(Application.StartupPath & "\Param.Un")
  7.         Sw.WriteLine(Col)
  8.         Sr = New StreamReader(Application.StartupPath & "\Param.Un")
  9.         Col1 = Color.FromArgb(Sr.ReadLine)


но у меня ничего не получилось, между тем указанный пример работает, но я не могу использовать его так как кроме цвета из файла мне надо считать ещщё кучу параметров.=(

Ответить

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



Вопросов: 58
Ответов: 4255
  Профиль | | #6 Добавлено: 24.08.09 08:16
пипец.. дожили..
тогда тебе придется для каждого параметра заводить отдельный файл! :-D ))))

Ответить

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



ICQ: 300-70-6пятьЪ 

Вопросов: 62
Ответов: 545
  Web-сайт: iSkywalker.ru
 Профиль | | #7 		Добавлено: 24.08.09 08:51
  1.  
  2. Public Structure options
  3.         Public param1 As Integer
  4.         Public param2 As String
  5.         Public param3 As Integer
  6.     End Structure
  7.  
  8. Dim options As New options
  9.         options.param1 = Color.Aquamarine.ToArgb
  10.         options.param2 = "Круто, да?"
  11.         options.param3 = 3
  12.         Dim sw As New IO.StreamWriter("options.xml", False, System.Text.Encoding.GetEncoding(1251))
  13.         Dim serializer As New Xml.Serialization.XmlSerializer(GetType(options))
  14.         serializer.Serialize(sw, options)
  15.         sw.Close()
  16.         '''''''''''''''''''''''''''''''''''''''''''''''''''''''
  17.         Dim sr As New IO.StreamReader("options.xml", System.Text.Encoding.GetEncoding(1251))
  18.         Dim readoptions As options = serializer.Deserialize(sr)
  19.         sr.Close()
  20.         Dim col As Color = Color.FromArgb(options.param1)

Ответить

Номер ответа: 8
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | | #8 		Добавлено: 24.08.09 10:08
Надо короче каждый параметр сувать в отдельный файл при выключении проги, а затем все эти файлы сжимать в архив и переиминовыват под xml. А при загрузке распаковывать обратно и брать по параметру :D

Ответить

Номер ответа: 9
Автор ответа:
 Дмитрий Юпатов



Вопросов: 4
Ответов: 457
  Web-сайт: cargomaster.at.ua/
 Профиль | | #9 		Добавлено: 24.08.09 11:35
VβРUηit,это шутка типа?!
Нафига ты человеку голову морочишь?

Ответить

Номер ответа: 10
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
  Web-сайт: смекаешь.рф
 Профиль | | #10 		Добавлено: 24.08.09 11:43
Типа шутка. :)

Ответить

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



Вопросов: 80
Ответов: 476
  Профиль | | #11 Добавлено: 24.08.09 14:46
Кароче, придётся мне 10 разных файлов делать(

Ответить

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



Вопросов: 58
Ответов: 4255
  Профиль | | #12 Добавлено: 24.08.09 14:52
Кароче, придётся мне 10 разных файлов делать(

да чего мелочиться?? делай сразу штук 30.. прозапас так сказать.. а то мало ли.. вдруг понадобиться настройку сохранить а у тебя запасного файлика не окажется!

Ответить

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



Вопросов: 80
Ответов: 476
  Профиль | | #13 Добавлено: 24.08.09 15:13
Ну а что тогда делать, если мне надо 10 цветов сохранить?

Ответить

Номер ответа: 14
Автор ответа:
 Дмитрий Юпатов



Вопросов: 4
Ответов: 457
  Web-сайт: cargomaster.at.ua/
 Профиль | | #14 		Добавлено: 24.08.09 16:44
http://bit.pirit.info/forum/viewtopic.php?t=10876 разбирайся!

Ответить

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



ICQ: 300-70-6пятьЪ 

Вопросов: 62
Ответов: 545
  Web-сайт: iSkywalker.ru
 Профиль | | #15 		Добавлено: 24.08.09 19:16
ты дурак штоле, я для кого примеры-то делаю

Ответить

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

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



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