Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 16.04.2012, 00:38
metra52 metra52 вне форума
Прохожий
 
Регистрация: 04.05.2011
Сообщения: 20
Версия Delphi: Delphi 7 Lite
Репутация: 10
По умолчанию IniFiles

Вобщем такой вопрос, у меня на сервере есть файл записанный как Ini файл, тоесть
Код:
[update]
ver=1.0.1.11
я получаю контент файла через IdHTTP1.Get
как мне реализовать получение значения блока ver
ну вот как я попытался сделать
Код:
try
    Upd:= IdHTTP1.Get('http://funfm.ru/version'); // Upd переменная в которую помеситм содержимое файла с версией
  except
    // Если version недоступен, тогда сообщаем об этом и разъединяемся
    MessageBox(0, 'Сервер недоступен! Попробуйте позже.', 'Ошибка', MB_ICONError);
    IdHTTP1.Disconnect;
    Exit;
  end;
     Updt:=TInifile.Create(Upd);
    Updver:=PAnsiChar(AnsiString(Updt.ReadString('update','ver','')));
  if Updver = vers then
    MessageBox(0, 'У вас последняя версия', 'Информация', MB_ICONInformation)
  else
    MessageBox(0, 'Не получилось', 'Упс', MB_ICONError);
__________________
А это мое скромное радио... ((:FunFM)
Ответить с цитированием
 


Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 09:57.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025