Entwickler-Ecke
Internet / Netzwerk - Problem mit IDHTTP.Get (String laden mit Progress)
Delphi2009lover - Di 01.12.09 20:40
Titel: Problem mit IDHTTP.Get (String laden mit Progress)
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
| procedure TMainForm.AddLinkBtnClick(Sender: TObject);
var
Quelltext : WideString;
begin
InfoPB.Visible := True;
Quelltext := HTTPDown.Get(URLEdit.Text);
URLEdit.Text := Quelltext;
end;
procedure TMainForm.HTTPDown_Work(ASender: TObject; AWorkMode: TWorkMode;
AWorkCount: Int64);
begin
InfoPB.Position := AWorkCount;
end;
procedure TMainForm.HTTPDown_WorkBegin(ASender: TObject; AWorkMode: TWorkMode;
AWorkCountMax: Int64);
begin
InfoPB.Min := 0;
InfoPB.Max := AWorkCountMax;
InfoPB.Step := 1;
InfoPB.Position := 50;
end; |
So das ist mein Code. Er soll den Quelltext der Seite, die in das Edit eingegeben wurde auslesen.
1. Er zeigt keinen Status an.Keine Meldun nichts... er macht einfach nichts
2. Der Quelltext wird NICHT geladen!!!
Bestimmt irgendein Leichtsinnsfehler :wink:
Mitmischer 1703 - Di 01.12.09 21:23
Wie, er wird nicht geladen? Nicht ausgeführt :?: Vielleicht hast du die Methoden noch nicht mit den Ereignissen verbunden :)
Delphi2009lover - Di 01.12.09 21:44
Doch^^ ich hab Delphi 2010 da kann man IdHTTP einfach auf die Form ziehen :wink: was soll denn bitte an meinem Code falsch sein???
Xentar - Di 01.12.09 21:47
 Delphi2009lover hat folgendes geschrieben  : |
| Doch^^ ich hab Delphi 2010 da kann man IdHTTP einfach auf die Form ziehen :wink: was soll denn bitte an meinem Code falsch sein??? |
Was hat das damit zu tun, dass du die Komponente aufs Formular ziehst? Trotzdem müssen die unter "Ereignisse" verknüpft sein. Einfach nur den Quellcode in die .pas Datei kopieren bringts nicht.
Delphi2009lover - Di 01.12.09 22:04
Sie sind verknüpft^^
---
Moderiert von Narses: Beiträge zusammengefasst---
Sry für den Doppelpost. Ich hab jetzt ein paar Tests gemacht. Ich hoffe ihr könnt was damit anfangen.
Wenn ich ID_Work, Work_Begin weglasse gehts. Ich hab mal ein paar mal ShowMessage benutzt, um die Werte angezeigt zu bekommen. Das Problem ist nur, dass bei WorkBegin bei fast allen Seiten AWorkCountMax 0 ist. Bei wenigen auch mehr. Die Variablen bei Work sind alle normal (denk ich mal)
EDIT : Also das runterladen geht jetzt, nur kann ich den Status iwie nich in einer Progressbar anzeigen^^
PS: Quelltext : WideString ||| IDE: RAD Studio 2010 Arc vllt hilft das^^
Delphi2009lover - Do 03.12.09 15:37
Also ich wenn ich jetzt den STRING (Quellcode der Seite geladen hab) wird dieser auch angezeigt, nur mit dem Fortschritt klappt das nicht. Kann das daran liegen, weil man bei HTTP.Get einen String laden kann, aber nur OHNE Fortschritt?
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!