Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.03;
Скачать: CL | DM;

Вниз

Курс доллара?   Найти похожие ветки 

 
SKing ©   (2002-12-09 08:04) [0]

Мастера может кто делал: как считать курс доллара из инета, что бы дальше смог записать его в свою БД?


 
Reindeer Moss Eater   (2002-12-09 11:06) [1]

Например отсюда это можно сделать
http://www.cbr.ru/currency_base/D_print.asp


 
SKing ©   (2002-12-09 11:49) [2]

Спасибо.
А, как можно считать курс на текущую дату?


 
Reindeer Moss Eater   (2002-12-09 12:14) [3]

const URL = " http://www.cbr.ru/currency_base/D_print.asp?date_req=09/12/2002"
var ContentStr:string;
ContentStr:=idHttp1.Get(URL);


 
SKing ©   (2002-12-09 14:00) [4]

Ни когда не работал из Делфи с инетом.
Подскажи пожалуйста как можно обработать полученную строку,
на обычный текст мало похоже...


 
Reindeer Moss Eater   (2002-12-09 14:27) [5]

С инетом работать и не надо. Надо работать со строкой.
Функции могут быть например такие:
Pos(), Copy(), Delete()


 
Ghost. ©   (2002-12-09 14:30) [6]

Это с интернетом ни как не связано..строка она строка и есть


 
SKing ©   (2002-12-09 14:46) [7]

Да, это-то понятно, но слишком много символов
типа:"<td align="right">16,6510</td>
</tr>
<tr bgcolor="#ffffff">
<td align="right" >208</td>
<td align="left" > DKK</td>
<td align="right" >10</td>"
не пойму где начало и конец, короче откуда резать значение курса?



 
Ghost. ©   (2002-12-09 14:52) [8]

IE:=CreateOleObject("InternetExplorer.Application");
IE.Navigate("about:blank", V, V, V, V);
IE.Visible := false;
while IE.Busy do Application.ProcessMessages;
Doc:=IE.Document;
Bod:=Doc.Body;
Bod.InnerHTML:=s;
s:=Bod.InnerText;


 
Reindeer Moss Eater   (2002-12-09 14:57) [9]

>SKing
Страница же на русском языке.
Если все же совсем трудно читать на нем, то зайди в кладовку.



Страницы: 1 вся ветка

Текущий архив: 2003.02.03;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.015 c
4-5336
Troll
2002-12-18 18:31
2003.02.03
Как применить процедуру....


3-4758
Sectey
2003-01-16 10:30
2003.02.03
Координаты текущей ячейки в Grid-е


1-4880
Kventin
2003-01-24 19:55
2003.02.03
Отображение елементов управления при изменении размеров формы


1-5036
blond
2003-01-24 09:23
2003.02.03
Терминирование потока (thread)


14-5135
Teapot
2003-01-16 16:38
2003.02.03
Компонент DialUp