merhaba
benim yapmak istediğim şey mesela edit'te http://www.site.com/a.php?sayfa=123 adlı bir site var bunu idhttp ya da inet ile açacağım buraya kadar tamam herşey ama bazı linkleri alırken sorun yaşıyorum mesela linkleri birbirine eklerken bir listbox'ta "asd","bsd","csd" gibi değerler var bunları aralarına virgül veya herhangi bir özel karakter koyarak nasıl birleştirebilirim ??
not : döngüyle tek tek eklemek istiyorum item0 item1 item2 gibi.
1. http://www.site.com/a.php?sayfa=123,asd
2. http://www.site.com/a.php?sayfa=123,asd,bsd
3. http://www.site.com/a.php?sayfa=123,asd,bsd,csd
gibi teşekkürler
linkleri birbirine eklemek
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Re: linkleri birbirine eklemek
yardım edebilecek birisi yokmu
-
- Üye
- Mesajlar: 153
- Kayıt: 14 Tem 2008 12:28
Re: linkleri birbirine eklemek
sendkey fonksiyonu olmazmı?
Re: linkleri birbirine eklemek
sendkey le nasılbir çözüm üretilebilir bilmiyorum ama anladığım kadarıyla
şeklinde olabilir.
yada bir stringlist tanımla ve döngünün her adımında oluşan stringi (linki) stringliste ekle, ekleme işi bittikten sonra da stringlistteki herbir linki idhttpilekullan;
Kod: Tümünü seç
procedure LinkAlKullan;
var
asillink,ayrac:string;
i:integer;
begin
asillink:='http://www.site.com/a.php?sayfa=123';
ayrac:=',';
asillink:=asillink+ayrac; // linke ayracı ekle
for i:=0 to liste.count-1 do
begin
asillink:=asillink+liste.items[i]+ayrac; //listenin her bir elemanını ve ayracı ekle
idhttpIleKullan;
end;
asillink:=copy(asillink,1,length(asillink)-1); // en sondaki ayracı sil
end;
şeklinde olabilir.
yada bir stringlist tanımla ve döngünün her adımında oluşan stringi (linki) stringliste ekle, ekleme işi bittikten sonra da stringlistteki herbir linki idhttpilekullan;
bazen yükselmek için önce dibi görmek gerekir...
forumda soru sormadan önce bakılmalı bence
daha fazlası için...
yürümeyi öğrenmeden koşmaya çalışanlar için, tökezleyip düşmek kaçınılmazdır...

forumda soru sormadan önce bakılmalı bence
daha fazlası için...
yürümeyi öğrenmeden koşmaya çalışanlar için, tökezleyip düşmek kaçınılmazdır...
