/[lcore]/trunk/dnswin.pas
ViewVC logotype

Diff of /trunk/dnswin.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 93 by zipplet, Tue Feb 16 22:51:30 2010 UTC revision 94 by beware, Mon Feb 21 21:40:05 2011 UTC
# Line 21  Line 21 
21    tdnswinasync=class(tthread)    tdnswinasync=class(tthread)
22    private    private
23      freverse : boolean;      freverse : boolean;
     error : integer;  
24      freewhendone : boolean;      freewhendone : boolean;
25      hadevent : boolean;      hadevent : boolean;
26    protected    protected
# Line 88  Line 87 
87    hostent : phostent;    hostent : phostent;
88    addrlist:^pointer;    addrlist:^pointer;
89  begin  begin
90      output := nil;
91    if hints.ai_family <> af_inet6 then begin    if hints.ai_family <> af_inet6 then begin
92      result := 0;      result := 0;
93    
# Line 264  Line 264 
264      if assigned (dwas.onrequestdone) then dwas.onrequestdone(dwas,awparam);      if assigned (dwas.onrequestdone) then dwas.onrequestdone(dwas,awparam);
265      dwas.hadevent := true;      dwas.hadevent := true;
266      if dwas.freewhendone then dwas.free;      if dwas.freewhendone then dwas.free;
267        result := 0; {added returning 0 when handling --beware}
268    end else begin    end else begin
269      //not passing unknown messages on to defwindowproc will cause window      //not passing unknown messages on to defwindowproc will cause window
270      //creation to fail! --plugwash      //creation to fail! --plugwash

Legend:
Removed from v.93  
changed lines
  Added in v.94

No admin address has been configured">No admin address has been configured
ViewVC Help
Powered by ViewVC 1.1.22