Delphiben lehetséges ilyen programot írni?
Figyelt kérdés
Valami nagyon alap böngészőt képzeltem el, az még menne is. A feladat az lenne hogy van 1 link, és abban a végén van 1 szám, azt kellene mindíg növelni 1-el és megnyitni. (az előző helyett) pl www.valami.hu/cuccid=1 utána www.valami.hu/cuccid=2 www.valami.hu/cuccid=3, és így tovább. lehetséges? Mik szükségesek hozzá ? Vagy létezik már erre program ?2010. nov. 21. 23:18
1/4 anonim válasza:
Lehetséges. Szerintem az utolsó számjegynek mindig egy változó értékének kell lennie , aminek mindig megnöveled 1-el az értékét.
2/4 anonim 
válasza:
válasza:Létezik erre már program, letöltésvezérlőnek hívják.
3/4 anonim válasza:
válasza:1. ledobsz egy TWebbrowser komponenst
2. felveszel egy változót, legyen mondjuk I : Longint
innentől két változat van:
- OnCreate eseménynél I:=0
- TTimer komponenssel (legyen mondjuk 1000ms az intervallum) növeled I értékét, majd nyitod sorban a lapokat
tehát:
var I : Integer;
procedure formod.oncreate
begin
...
I:=0;
end;
procedure TTimer.OnTimer(Sender: TObject);
begin
TWebbroser.Navigate(' [link]
Inc(I);
end;
másik verzió:
bedobod a browser OnDocumentComplete eseménybe:
Inc(I);
+ állítsd is le valamikor a folyamatot, pl.
if I = 10000 then
begin
ShowMessage('Kész');
Exit
end;
Az első a praktikusabb, mert akkor növeli I értékét, ha a browser betöltötte a lapot.
4/4 A kérdező kommentje:
zseniális megoldás, köszi szépen :)
2010. nov. 22. 16:56
Kapcsolódó kérdések:
Minden jog fenntartva © 2025, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!