Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 02.11.2008, 17:06   #1
Sanek777
Заблокирован
Пользователь
 
Регистрация: 31.07.2008
Сообщений: 90
Восклицание Информер погоды

Здравствуйте, я хочу написать программу-информер погоды для своего поселка, чтобы вот например каждый житель запускал комп и она запускалась и показывала погоду с сайта:

http://www.gismeteo.ru/towns/34743.htm

Мне вот нужно именно эти цифры данные погоды вытащить оттуды и вписать в программе в лейблы! Можете подсказать как это реализовать?
Sanek777 вне форума Ответить с цитированием
Старый 02.11.2008, 20:06   #2
Somebody
Участник клуба
 
Регистрация: 08.10.2007
Сообщений: 1,185
По умолчанию

Надо получать прогноз в формате xml.
Somebody вне форума Ответить с цитированием
Старый 02.11.2008, 20:12   #3
Sanek777
Заблокирован
Пользователь
 
Регистрация: 31.07.2008
Сообщений: 90
По умолчанию а каким образом

можете плиззз описать?
Sanek777 вне форума Ответить с цитированием
Старый 02.11.2008, 20:24   #4
Viteef
stopfake.org
Участник клуба
 
Регистрация: 03.05.2007
Сообщений: 1,927
По умолчанию

Почитай о формате xml, и по этим ссылкам походи.
Viteef вне форума Ответить с цитированием
Старый 02.11.2008, 20:25   #5
Роман Радер
Форумчанин
 
Аватар для Роман Радер
 
Регистрация: 16.12.2006
Сообщений: 859
По умолчанию

http://informer.gismeteo.ru/rss/34743.xml
и разбирать
Роман Радер вне форума Ответить с цитированием
Старый 02.11.2008, 20:30   #6
Sanek777
Заблокирован
Пользователь
 
Регистрация: 31.07.2008
Сообщений: 90
По умолчанию

а можете как -нить показать как именно выдрать вот эти строки

Зимовники: Вечер 2 ноя, Вс
ясно, без осадков, температура +7..+9 С, давление 758..760 мм рт.ст., ветер Южный, 2 м/с
Зимовники: Ночь 3 ноя, Пн
ясно, без осадков, температура +5..+7 С, давление 758..760 мм рт.ст., ветер Юго-Западный, 1 м/с
Зимовники: Утро 3 ноя, Пн
ясно, без осадков, температура +10..+12 С, давление 758..760 мм рт.ст., ветер Западный, 1 м/с
Зимовники: День 3 ноя, Пн
облачно, без осадков, температура +15..+17 С, давление 758..760 мм рт.ст., ветер Западный, 2 м/с


и вписать в Memo????
ПЛИЗЗЗЗЗ Я ПОКА НОВИЧОК НЕ МОГУ А НУЖНО ОЧЕНЬ!!!!!
Sanek777 вне форума Ответить с цитированием
Старый 02.11.2008, 20:32   #7
Viteef
stopfake.org
Участник клуба
 
Регистрация: 03.05.2007
Сообщений: 1,927
По умолчанию

Это xml файл. Смотри википедию и блог.

Код:
<?xml version="1.0" encoding="windows-1251"?>
<rss xmlns:gismeteo="http://www.gismeteo.ru" version="2.0">
 <channel>
  <title>GISMETEO.RU: Погода от ФОБОС и Мэп Мейкер</title>
  <link>http://www.gismeteo.ru</link>
  <description>Прогноз погоды по 4500+ городам России и Мира</description>
  <ttl>60</ttl>
  <image>
   <title>GISMETEO.RU: Погода от ФОБОС и Мэп Мейкер</title> 
   <width>142</width> 
   <height>18</height> 
   <link>http://www.gismeteo.ru</link> 
   <url>http://img.gismeteo.ru/images/gismeteo2.gif</url> 
  </image>
  <item>
   <title>Зимовники: Вечер 2 ноя, Вс</title>
   <link>http://www.gismeteo.ru/towns/34743.htm?1088142</link>
   <description>ясно, без осадков, температура +7..+9 С, давление 758..760 мм рт.ст., ветер Южный, 2 м/с</description>
   <category>Погода</category>
   <enclosure url="http://img.gismeteo.ru/images/moon.gif" length="2000" type="image/gif" />
   <source url="http://informer.gismeteo.ru/rss/34743.xml">GISMETEO.RU: Погода в г. Зимовники</source>
   <guid>1078432</guid>
  </item>
  <item>
   <title>Зимовники: Ночь 3 ноя, Пн</title>
   <link>http://www.gismeteo.ru/towns/34743.htm?1077079</link>
   <description>ясно, без осадков, температура +5..+7 С, давление 758..760 мм рт.ст., ветер Юго-Западный, 1 м/с</description>
   <category>Погода</category>
   <enclosure url="http://img.gismeteo.ru/images/moon.gif" length="2000" type="image/gif" />
   <source url="http://informer.gismeteo.ru/rss/34743.xml">GISMETEO.RU: Погода в г. Зимовники</source>
   <guid>1055657</guid>
  </item>
  <item>
   <title>Зимовники: Утро 3 ноя, Пн</title>
   <link>http://www.gismeteo.ru/towns/34743.htm?1046960</link>
   <description>ясно, без осадков, температура +10..+12 С, давление 758..760 мм рт.ст., ветер Западный, 1 м/с</description>
   <category>Погода</category>
   <enclosure url="http://img.gismeteo.ru/images/sun.gif" length="2000" type="image/gif" />
   <source url="http://informer.gismeteo.ru/rss/34743.xml">GISMETEO.RU: Погода в г. Зимовники</source>
   <guid>1079049</guid>
  </item>
  <item>
   <title>Зимовники: День 3 ноя, Пн</title>
   <link>http://www.gismeteo.ru/towns/34743.htm?1059990</link>
   <description>облачно, без осадков, температура +15..+17 С, давление 758..760 мм рт.ст., ветер Западный, 2 м/с</description>
   <category>Погода</category>
   <enclosure url="http://img.gismeteo.ru/images/suncl.gif" length="2000" type="image/gif" />
   <source url="http://informer.gismeteo.ru/rss/34743.xml">GISMETEO.RU: Погода в г. Зимовники</source>
   <guid>1005170</guid>
  </item>
 </channel>
</rss>
Viteef вне форума Ответить с цитированием
Старый 02.11.2008, 21:15   #8
Sanek777
Заблокирован
Пользователь
 
Регистрация: 31.07.2008
Сообщений: 90
По умолчанию

Спасибо, но а можно сделать программно чтобы код этот скачался с сайта ну хотя бы в текстовый файл и програмкой я бы сам его потом потрашил?
Sanek777 вне форума Ответить с цитированием
Старый 03.11.2008, 21:59   #9
Somebody
Участник клуба
 
Регистрация: 08.10.2007
Сообщений: 1,185
По умолчанию

Ещё в другом виде есть:
http://informer.gismeteo.ru/xml/34743_1.xml
В любом случае это xml.
Скачивание файла:
Код:
{$APPTYPE CONSOLE}
program Download;
uses
  Windows, WinInet;
var
  hInet, hConnection, hRequest: hInternet;
  s: String;
  Len: Cardinal;
  f: Text;
begin
  hInet := InternetOpen('rbl :)', INTERNET_OPEN_TYPE_DIRECT, nil, nil, 0);
  hConnection := InternetConnect(hInet, 'informer.gismeteo.ru', 80,
    nil, nil, INTERNET_SERVICE_HTTP, 0, 0);
  hRequest := HttpOpenRequest(hConnection, 'GET', '/xml/34743_1.xml',
    nil, nil, nil, 0, 0);
  HttpSendRequest(hRequest, nil, 0, nil, 0);
  SetLength(s, $4000);
  InternetReadFile(hRequest, PPointer(@s)^, $4000, Len);
  SetLength(s, Len);
  InternetCloseHandle(hRequest);
  InternetCloseHandle(hConnection);
  InternetCloseHandle(hInet);
  Assign(f, 'Forecast.xml');
  Rewrite(f);
  Write(f, s);
  Close(f);
end.

Последний раз редактировалось Somebody; 03.11.2008 в 22:02.
Somebody вне форума Ответить с цитированием
Старый 29.01.2014, 20:48   #10
verhayzen
Новичок
Джуниор
 
Регистрация: 29.01.2014
Сообщений: 1
По умолчанию

http://weather-24.com/ru/widgets-gallery/ посмотри тут
verhayzen вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

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

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Прогноз погоды (курсовой) WhitePoint Помощь студентам 21 10.06.2010 17:56
Информер погоды Stanislav Общие вопросы Delphi 3 20.07.2008 13:34
Прогноз погоды VarVara PHP 3 06.05.2007 23:34