Ntv'nin Döviz kurlarını almak...

Biltes · Mesaj gönderen **Biltes** » 17 Kas 2007 09:20

Arkadaşlar kolay gelsin;

Yazdığım bir projem var burada müşterim programdaki döviz kurlarının ntv'nin sitesinden otomatik olarak alınmasını istiyor. Merkez bankasının var ama onu istemiyorlar. Acaba ntv'den bu kurları nasıl alabiliriz. Bilgisi olan arkadaşlardan konu ile ilgili yardımlarınızı bekliyorum.

Çalışmalarınızda kolaylıklar dilerim.

deltas · Mesaj gönderen **deltas** » 17 Kas 2007 10:03

Kod: Tümünü seç

<td><font color="cc0000">&bull; </font><b>USD</b></td>
        <td align="right">1.1885</td>

        <td align="right">0.7203</td>
        <td>&nbsp;</td>
      </tr>
      <tr>
        <td >&nbsp;</td>
        <td ><font color="cc0000">&bull; </font><b>EURO</b></td>
        <td align="right">1.7392</td>

        <td align="right">0.6997</td>
        <td>&nbsp;</td>
      </tr>
      <!--<tr bgcolor="#CCCCCC">
        <td colspan="5" height="1"></td>
      </tr>-->

herhalde buradaki dolar ve Euro bilgileriniistiyorsun. ben ntvmsnbc'den başka doviz kuru bulamadım. Eğer buraları kullanacaksan parse işlemi ile ile:

Kod: Tümünü seç

<td><font color="cc0000">&bull; </font><b>USD</b></td>

Kod: Tümünü seç

 <td ><font color="cc0000">&bull; </font><b>EURO</b></td>

bu satırları arattır bu satırların numarasına i dersek i+1 değeleri fiyatları verir.
viewtopic.php?t=21663&highlight=
viewtopic.php?t=21314

Biltes · Mesaj gönderen **Biltes** » 19 Kas 2007 08:34

Öncelikle ilginiz için çok tşk ederim hocam;
Evet hocam dediğini gibi ntvmsnbc'nin sitesindeki kurlar doğru yazmışsınız. Buradaki kodları inceledim sanırım dediğiniz yöntem ile yapabilirim hocam. Ama takıldığım bir başka husus var bu konuda da fikirlerinizi almak istiyorum. Şimdi burada kuru bir defa bu kod ile aldık peki gün içinde buradaki kurlar değişirse bunu programa nasıl yansıtabilirim. Yani oradaki kur değiştiği anda programda bu kurları gösterdiğim yerde de aynı anda değişmesi gerekli acaba bunun için nasıl bir yöntem izleyebilirim. Konu ile ilgili önerilerini ve yardımlarınızı bekliyorum.

Şimdiden çok tşk ederim hocam...

barutali · Mesaj gönderen **barutali** » 19 Kas 2007 09:17

bence bir procedure oluştur. Procedur de bu parseleme işlemini gerçekleştir. Formun onCreate inde bu procedure u çalıştır. İlk veriyi açlışta alsın daha sonra timerın değerini 30 dk ya göre ayarla 30 dk da bir procedure ü çalıştırsın.

kolay gelsin...

Biltes · Mesaj gönderen **Biltes** » 19 Kas 2007 11:56

Evet dediğiniz gibi bir yöntem kullanabilirim ama ondan önce şöyle bir sorunum var deltaş hocamın vermiş olduğu örneği birebir çok güzel çalıştırabiliyorum. Oradaki adres bölümüne aşağıdaki kodu yazınca memo1 boş olarak geliyor.

Kod: Tümünü seç

  memo1.Text:=''; 
  memo2.Text:='';
  Browser := TIdHTTP.Create(nil);
  try 
    Memo1.Text :=utf8decode(Browser.Get('http://www.ntv.com.tr/news/default.asp'+edit1.Text));
  finally
    Browser.Free;
  end;

İstediğim adres tam olarak bu. İlginize çok tşk ederim.

barutali · Mesaj gönderen **barutali** » 19 Kas 2007 02:06

@mrmarman hocamın bi function ı vardı onunla yaptım.
aşağıdaki linkten indirip bakabilirsiniz.

http://rapidshare.com/files/70771564/Ye ... r.rar.html

deltas · Mesaj gönderen **deltas** » 19 Kas 2007 10:14

('http://www.ntv.com.tr/news/default.asp'+edit1.Text));
burada +edit1.text'e gerek yok.

Biltes · Mesaj gönderen **Biltes** » 20 Kas 2007 06:52

@mrmarman hocamınızın örneğini verdiğiniz linkten indirdim tam istediğim gibi bir olay hocamın ellerine sağlık. Yalnız burada parse et dedikten sonra kurları bir satır alta ve sağa atıyor sürekli label'ın formdaki yerine yazmıyor bunu eğer bir txt yada ini dosyasına yazdırdığınız zamanda aynısını yapıyor acaba bunun nedeni ne olabilir. Tabi bu şekilde olduğu zamanda bana projede sürekli olarak sıkıntı çıkarıyor. Dün akşamdan beri çözmeye çalışıyorum ama üzgünüm başaramadım. Sizlerinde fikirleriniz almak istedim. Konu ile ilgili görüşleriniz için şimdiden çok tşk ederim.

deltas · Mesaj gönderen **deltas** » 20 Kas 2007 07:10

trim(string) bu sağda ve soldaki boşlukları siler. bu işinizi görür herhalde. bi deneyin.

barutali · Mesaj gönderen **barutali** » 20 Kas 2007 07:12

Bide Şöyle Deneyin ... Alt taraftaki Led comp. u da rar ın içinde mevcut...

Yeni Link

http://rapidshare.com/files/71066822/NT ... a.rar.html

Kolay Gelsin...

danaci · Mesaj gönderen **danaci** » 09 Ara 2007 02:58

lanetli arkadaşımızın Ntv den döviz kurlarını alıp led şeklinde kayan yazı gibi göstermesini sağlayan güzel bir bileşenin ve uygulamanın adresini vermişti.

"Led comp. u da rar ın içinde mevcut...
http://rapidshare.com/files/71066822/NT ... a.rar.html"

bu adresten indirdiğimiz border bileşeni themes.dcu bulunamadı hatası veriyor, kuramadık. Bileşenin başvurduğu diğer *.dcu dosyaları nerden temin edebiliriz.
Bu konuda yardımcı olabilirmisiniz.

barutali · Mesaj gönderen **barutali** » 10 Ara 2007 07:22

o bileşen sadece border.pas ve border.dcu dosyası var
sizin daha önceden kurmaya çalışıpda kurulmayan bi bileşen varsa eger ondan dolayı Derlenemiyor olabilir.

naturelmania · Mesaj gönderen **naturelmania** » 11 Ara 2007 09:51

Arkadaşlar bu component Borland Delphi Studio 2006 da çalışmaz mıı??

Ya da nasıl kuruyoruz? Project olmadığı için Install da yapamıyorum

ikutluay · Mesaj gönderen **ikutluay** » 11 Ara 2007 10:19

component kurulumnda o uniti goster ve hedef olarak in to new package de...

google da instal a component from unit" diye arattır belki resimli örneğide çıkar.

danaci · Mesaj gönderen **danaci** » 12 Ara 2007 03:39

tmm kurdum tşk ler