Per ovviare al problema che un socket rimane occupato con una connessione Tcp è possibile ovviare al problema configurando come segue l’istanza di una classe TidTcpclient: per effettuare la connessione:
1 2 3 4 |
IdTCPClient.BoundIP := currentIp; IdTCPClient.Port := 5566; IdTCPClient.Host := <server address>; IdTCPClient.Connect; |
invece nel metodo disconnect : uses …. IdIPWatch,IdStackConsts …. if IdTCPClient.Connected then begin IdTCPClient.Socket.Binding.SetSockOpt(id_sol_socket,id_so_dontlinger,id_so_true); if IdTCPClient.IOHandler nil then try IdTCPClient.IOHandler.InputBuffer.Clear; except end; try IdTCPClient.Disconnect;…
Leggi tutto
to generate uid or GUID with delphi:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
program Guid; {$APPTYPE CONSOLE} uses SysUtils; var Uid: TGuid; Result: HResult; begin Result := CreateGuid(Uid); if Result = S_OK then WriteLn(GuidToString(Uid)); end. |
Come tutti sappiamo, creare un webServer con Delphi è semplicissimo, cosa meno banale è invece decodificare una post che che contiene un multipart/form-data. Quando una paginetta http esegue una http submit da un form in metodo post, magari con un file in upload il browser genera uno stream codificato in UTF8 in cui ci sono…
Leggi tutto
Toad è un buon client per Oracle, e da qualche anno sul sito di Oracle è disponibile una versione molto leggera del client di oracle che si chiama InstantClient. Il pregio di questa versione di driver/clients per Oracle è che non ha una procedura di setup ed è sufficiente decomprimere il pacchetto compresso in una…
Leggi tutto
Very good! http://jeffsebring.com/2010/fixing-broken-permalinks-when-moving-wordpress/