Döv kuru programı

[akineton]

s.a arkadaşlar rpid linkindeki gibi bir döviz kuru programı yapmak istiyoru yardımcı olursanı zseviniirm..

http://rapidshare.com/files/445463447/D ... n_kuru.rar

[orhancc]

Bilgileri merkez bankasından xml olarak çekip eğer localde kayıt edeceksn basit bir veritabanına kayıt edeceksin. Forumda döviz bilgilerinin nasıl çekileceğini gösteren bir kod olması lazım. Ayrıca bu program internete bağlanamıyor sanırım sorunlu.

[akineton]

evet banada öyle geldi internete bağlanmıyor fakat merkez bankasında altın bilgileri yok herhalşd eben göremedim .??

[orhancc]

döviz bilgilerini merkez bankasından altın bilgilerini de herhangi bir siteden alabilirsin. bir kaç site seçersin biri çalışmazsa ötekinden çekersin bilgileri.

[akineton]

yav orhan hocam fitede baya bir araştırdım http://www.tcmb.gov.tr/kurlar/today.xml bu linki delphide Xml data bind yazan yere yaıştırıp bir tane dosya oluşturdu ama ben şimdi butona basınca kurları amak istiyorum bu sayfadan nasıl bir kod yazmalıyım ??*

[akineton]

yav arkadaşlar şunu bilen bir tak kişi yok mu ????

[sabanakman]

Bu xml dosyasını bulunduğunuz yere kayıt edip okuyacaksınız (mesela indy ile bu "idHttp.Get ile" olabilir). "Kayıt edilen xml dosya içerisinden bilgiler nasıl okunur" meselesi için biraz elinizi taşın altına koyarak araştırabilirsiniz. .xml dosya okuma işi için delphi ortamında bir çok yöntem bulunmaktadır.

[akineton]

öncelikle cevabın için tşk ederim şaban baba yine hızır gibi yetiştin.
Şimdi hocam anladığım kadarı ile xml formatında http://www.dovizaltinfiyatlari.net/tcmbxml/ bu blgiyi almak için delphiden file-new-other ve xml binding yazan yere bu linki yapıştırıp bir xml dosya oluşturacaz ve bu doyadan kuru çekecez doğru mu anladım ..???

[orhancc]

2.satıdaki yorumdan dolayı o şekilde onu alamazsın delphi hata döndürüyor onu pc ye çekip o satırı sildirirsen sorun kalmıyor ama.

[akineton]

tamam da hocam bu xml den veri okuma işi nasıl oluyor onu çözemedim ??

[varyemez]

@akineton , önce bu döviz bilgilerini ne yapacağın planla. Yani sadece display olarak mı , yoksa yeri geldiğinde kullanma amaçlı mı. Pekala da bir dbgrid üzerine alarak kullanabilirsin. transform dosyası (.xtr ) hazırlayacaksın. Burada zaten bir dataset oluşacağı için bilgileri istediğin şekilde yönlendirirsin. Örnek gönderirim 1 2 gün içinde..

[varyemez]

http://dl.dropbox.com/u/6776013/doviz.zip

@akineton buradan örneği indirebilirsin. Tabii sadece locale indirilmiş today.xml dosyasından okuyor bilgiyi. Artık sen xml dosyayı locale alma işini kafana göre halledersin. Ya da stream olarak okutup ta yapabilirsin belki..

[akineton]

sağol tşk ederim...

[varyemez]

Oraya bir de button eklersin , tıklayınca adrese bağlanıp xml dosyayı alıp exe nin çalıştığı dizine dosya olarak yazsın.

Kod: Tümünü seç

procedure TForm1.Button1Click(Sender: TObject);
var
xmldata: Tstringstream;
begin
xmldata:=Tstringstream.Create;
idhttp1.HandleRedirects:=true;
idhttp1.Request.ContentType:= 'text/xml';
idhttp1.Get('http://www.tcmb.gov.tr/kurlar/today.xml',xmldata);
clientdataset1.Active:=false;
 xmldata.SaveToFile('today.xml');
 clientdataset1.Active:=true;
end;

gerisi sana kalmış. devexpress varsa güzel de bir görünüm kazandırabilirsin...

[dynamo]

istediğiniz örnek eklendi:

viewtopic.php?f=19&t=23617&p=158991#p158991