Thema: Delphi Debug-Ausgabe

Einzelnen Beitrag anzeigen

Michael II

Registriert seit: 1. Dez 2012
Ort: CH BE Eriswil
763 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: Debug-Ausgabe

  Alt 1. Okt 2022, 09:55
Windows 11 - Windows 32 Bit - ICS 8.69

Danke nochmals jaenicke für den Debugger Tipp. Ich weiss nun wo aber nicht wieso.

Da himitsu einen Link auf eine "ungelöste" DP Meldung von Angus (ICS) gepostet hat, schreib ich rasch wo...

Die Debugmeldung wird in OverbyteIcsWinsockImpl.Inc Result := Fgethostname(name, len); - genauer nach einem call in WS2_32.gethostname: - ausgegeben.


Delphi-Quellcode:
function Ics_gethostname(name: PAnsiChar; len: Integer): Integer;
begin
    if @Fgethostname = nil then
        @Fgethostname := GetProc('gethostname');
    Result := Fgethostname(name, len);
end;

Beispiel:
Delphi-Quellcode:
uses OverbyteICSWSocket;

  showmessage(localiplist.Count.ToString);
Michael Gasser

Geändert von Michael II ( 1. Okt 2022 um 10:00 Uhr)
  Mit Zitat antworten Zitat