Forum: Netzwerke
by Delphi.Narium,
3. Aug 2018
ungefähr sowas:function MyGetUrl(http: tidHTTP; sUrl: string; sl : TStrings; var sMessage: string): Boolean;
begin
Result := false;
try
http.RedirectMaximum := 0; // oder die Anzahl der maximal erwünschten Redirects
http.HandleRedirects := false; // und hier dann true.
http.Response.Clear;
http.Get(sUrl, sl);
http.Disconnect(True);
...
Forum: Netzwerke
by Delphi.Narium,
2. Aug 2018
Delphi 7
Menü "Suchen"
Untermenü: "Laufzeitfehler suchen".
Ins erscheinende Eingabefeld die Adresse rein und Enter.
Es sollte dann die passende Stelle im Quelltext gesucht werden.
Forum: Netzwerke
by Delphi.Narium,
2. Aug 2018
Weiß nicht, welche Indykomponenten alle bei Dir im Einsatz sind, deshalb mal sinngemäß für TIDHttp:
// immer!!!
// nachdem eine Aufgabe erledigt wurde, auch im Fehlerfalle:
idhttp.Disconnect(True);
idhttp.IOHandler.InputBuffer.Clear;
Seit dem ich das so handhabe, hab' ich bei der Nutzung dieser Komponente deutlich weniger Fehlermeldungen (eigentlich fast keine mehr).
Schau bitte...
Forum: Netzwerke
by Delphi.Narium,
2. Aug 2018
Das Programm bei Dir im Debugger starten und nach der Adresse 00403752 suchen. Dann solltest Du ungefähr in der Fehlergegend landen.
Programm mit MAP-Datei erstellen und in der dann nach der Adresse suchen, eventuell kommst Du damit etwas mehr an Info.
Nutzt Du zufällig die JVCL?
Dann den ExceptionDlg.pas aus \jvcl\install\JVCLInstall\Debug einbinden.
(in...