Merhaba butondan labele yazdırabiliyorum ama 2 tane farklı buton koyarak bu butonların internet sitesi üzerinden veri çekip labele yazdırmasını istiyorum mesela
ilk butona bastığımızda bunu getirecek fakat siteden çekecek
Ağzının tadını bilenlerin Delphi forumu
ikinci butona bastığım zaman ise
Delphi Forum
yazısını getirecek bunuda aynı şekilde siteden çekecek delphide yeniyim yardımcı olursanız sevinirim.
Çözüm burada :viewtopic.php?f=2&t=35289
delphi siteden labele nasıl veri çekebilirim ÇÖZDÜK
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
delphi siteden labele nasıl veri çekebilirim ÇÖZDÜK
En son fedora tarafından 23 Oca 2016 02:56 tarihinde düzenlendi, toplamda 1 kere düzenlendi.
Re: delphi siteden labele nasıl veri çekebilirim
yardımcı olacak yok mu TMEMO a çeksemde olur arkadaşlar.
Re: delphi siteden labele nasıl veri çekebilirim
Kod: Tümünü seç
procedure TForm1.YenileClick(Sender: TObject);
var
i: Integer;
begin
for i := 0 to WebBrowser1.OleObject.Document.links.Length - 1 do
begin
ListBox1.Items.Add(WebBrowser1.OleObject.Document.links.Item(i));
end;
end;
Kod: Tümünü seç
procedure TForm1.AnaSayfaClick(Sender: TObject);
var
i: Integer;
begin
for i := 0 to WebBrowser1.OleObject.Document.links.Length - 1 do
begin
// Memo1.Lines.Add(WebBrowser1.OleObject.Document.links.Item(i));
Memo1.Lines.Add(WebBrowser1.OleObject.Document.Frames.item(i).Document.URL);
Memo1.Lines.Add(WebBrowser1.OleObject);
end;
end;
end;
Kod: Tümünü seç
procedure TForm3.WebBrowser1DocumentComplete(ASender: TObject;
const pDisp: IDispatch; const URL: OleVariant);
begin
memo1.Clear;
memo1.Text:=WebBrowser1.OleObject.document.documentElement.innerHTML;
end;
MsHTML;
Sanırım bu kadar örnek araştırma yapmanız için yeterli olur;
Konuyu açalı daha ne kadar olmuş "yardımcı olacak yok mu TMEMO a çeksemde olur arkadaşlar." ????
İşi bilen yardım eder, az bilen akıl verir, bilmeyen eleştirir, yapamayan ise çamur atar...
Re: delphi siteden labele nasıl veri çekebilirim
Hocam fazla bilgim yok yardımcı olursanız sevinirim
2 adet buton olacak
Google butonu koyacaım google a tıkladığım zaman
https://www.google.com/robots.txt
burdaki şeyleri memo ya yazcak
aynı şekilde facebook butonu olacak ona bastıgımda
www.facebook.com/robots.txt
burayı çekecek denemediğim yöntem kalmadı yardımcı olursanız sevinirim.
2 adet buton olacak
Google butonu koyacaım google a tıkladığım zaman
https://www.google.com/robots.txt
burdaki şeyleri memo ya yazcak
aynı şekilde facebook butonu olacak ona bastıgımda
www.facebook.com/robots.txt
burayı çekecek denemediğim yöntem kalmadı yardımcı olursanız sevinirim.