Ivan Revelli - Synaptica srl

Java int datetime to Delphi Date Time

per Ivan Revelli
in Senza categoria
on Marzo 17, 2014

To convert the Java int to Delphi date time :

uses Dateutils;

....

Procedure JavaIntToDateTime(input : Int64) : TDateTime;
 Begin
  Result := DateUtils.UnixToDateTime(input div 1000);
 end;

uses Dateutils;

....

Procedure JavaIntToDateTime(input : Int64) : TDateTime;

Begin

Result := DateUtils.UnixToDateTime(input div 1000);

end;

idTcpClient — address in use 10048 error

per Ivan Revelli
in Senza categoria
on Febbraio 21, 2014

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:

 IdTCPClient.BoundIP := currentIp;
 IdTCPClient.Port := 5566;
 IdTCPClient.Host := <server address>;
 IdTCPClient.Connect;

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

Generate UID with Delphi

per Ivan Revelli
in Delphi, Programmazione
on Gennaio 31, 2014

to generate uid or GUID with delphi:

program Guid;

{$APPTYPE CONSOLE}

uses
SysUtils;

var

Uid: TGuid;
Result: HResult;

begin
Result := CreateGuid(Uid);
if Result = S_OK then
   WriteLn(GuidToString(Uid));
end.

program Guid;

{$APPTYPE CONSOLE}

uses

SysUtils;

var

Uid: TGuid;

Result: HResult;

begin

Result := CreateGuid(Uid);

if Result = S_OK then

WriteLn(GuidToString(Uid));

end.

TidHTTPServer decode content type multipart/form-data

per Ivan Revelli
in Articoli, Articoli, Articoli, Articoli, Articoli, Delphi, Programmazione
on Gennaio 31, 2014

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

Oracle Tip: Configurare TOAD con instantClient

per Ivan Revelli
in Articoli, databases, oracle
on Gennaio 18, 2014

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