Страница: 1 |
вот такая загвоздка, есть INI -файл в нем данные представленны в виде цифр(текста нет) но вот такая вот загвоздка я их читаю из файла использую апи-функцию GetPrivateProfileString, обьявляются ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long, но вот такая вот загвоздка прочитанные данные мне нужны для вычислений типа +,-,* я то беру цифровые данные через функцию VAL(), а она мне гадость такая возвращает если там в ини-файле 0.5 просто НОЛЬ, но мне надо данные после запятой для вычислений, что ДЕЛАТЬ. функция для использования АПИ: Function sGetIni(sINIFile As String, sSection As String, sKey As String, sDefault As String) Dim sTemp As String Dim nLength As Integer sTemp = Space$(256) nLength = GetPrivateProfileString(sSection, sKey, sDefault, sTemp, 255, sINIFile) sGetIni = Left$(sTemp, nLength) где ошибка??? ПЛИЗ!!??
Что-то ты намудрил очень сильно, имхо.. Короче, я мало понял на фига все эти апи, но если проблема только в конвертации, то дело исключительно в объявлении переменных.. Вот, посмотри: Private Sub Form_Load() Dim a As String a = "0.5" MsgBox b End Тебе обязательно нужно хранить настройки в ini файле? Это осмысленно лишь когда есть необходимость редактировать их в ручную, что бывает очень редко. Ежели такой необходимости нет - используй реестр или храни настройки в двоичном файле в виде фиксированного массива. У меня есть класс inifile Copyright © 2000 Козырев Дмитрий мылю. jaz@bigmir.net Попробуй использовать FSO, если INI файл большой (FSO быстрей) Кстати, можно воспользоваться функцией GetProfileInt... Страница: 1 |
Вопрос: загрузка из ини файла
Добавлено: 04.03.04 03:02
Автор вопроса: jazzikus
Ответы
Всего ответов: 6
Номер ответа: 1
Автор ответа:
Scuder
ICQ: 143518458
Вопросов: 12
Ответов: 37
Профиль | | #1
Добавлено: 04.03.04 12:21
Dim b As Double
b = Val
End Sub
Номер ответа: 2
Автор ответа:
LamerOnLine
ICQ: 334781088
Вопросов: 108
Ответов: 2822
Профиль | | #2
Добавлено: 04.03.04 14:31
Номер ответа: 3
Автор ответа:
crackoff
ICQ: 156165990
Вопросов: 12
Ответов: 229
Профиль | | #3
Добавлено: 04.03.04 16:15
Номер ответа: 4
Автор ответа:
jazzikus
Вопросов: 2
Ответов: 2
Профиль | | #4
Добавлено: 06.03.04 04:07
Номер ответа: 5
Автор ответа:
manj18
ICQ: 344833913
Вопросов: 12
Ответов: 21
Профиль | | #5
Добавлено: 12.03.04 01:50
Номер ответа: 6
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #6
Добавлено: 12.03.04 15:21