this function that i found on the Net allow your delphi code to access at environment variables of your Windows systems :
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
function GetEnvVarValue(const VarName: string): string; var BufSize: Integer; // buffer size required for value begin // Get required buffer size (inc. terminal #0) BufSize := GetEnvironmentVariable( PChar(VarName), nil, 0); if BufSize > 0 then begin // Read env var value into result string SetLength(Result, BufSize - 1); GetEnvironmentVariable(PChar(VarName), PChar(Result), BufSize); end else // No such environment variable Result := ''; end; |
E’ possibile ottenere l’ip (ip address) del proprio computer utilizzando la classe Indy “idIpWatch” , ad esempio per inserire l’ip nella caption del ns form è sufficiente:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
implementation uses IdIPWatch; ... procedure TfrmMain.FormCreate(Sender: TObject); var ids: TidIpWatch; begin ids := TidIpWatch.Create; Caption := Caption + '(' + ids.LocalIP + ':8888)'; ids.Free; end; |
Se invece ci si volesse complicare un pochino la vita si potrebbe interrogare direttamente il winSock in modo da non dover includere una classe indy nel progetto…
Leggi tutto
After i update my Rad Studio to 64Bit XE2 version on compiling projects i found this error :
|
1 |
[BRCC32 Error] BRCC32(1): Unable to invoke c:\program files (x86)\embarcadero\rad studio\9.0\bin\\rc.exe |
the problem is that CGRC.exe contains bug of missing quotes for spaces in file names, specifically in this example the path contain “c:\program files (x86)” that on shellexceute means “c:\program”. To fix the problem you need…
Leggi tutto
Tramite la struttura dei multipart attchment via HTTP è possibile inviare o ricevere uno o più stream binari tramite una POST http, questa tecnologia è stata indtrodotta sulla scia dei protocolli per la gestione degli allegati multipli alla mail, ovviamente come core di tutto ciò c’è il ns amico TCP/IP, ma con il layer di…
Leggi tutto
In Delphi grazie alle librerie Indy la gastione dell’hashing è molto semplice di seguito due esempi per cifrare in MD5, il primo prende in input una stringa il secondo un file e ritorna , entrambi ritornano l’md5 calcolato. Nel progetto è necessario dichiarare come librerie utilizzate : “IdHashMessageDigest” e “idHash”.
|
1 |
uses IdHashMessageDigest,idHash; |
String to MD5 :…
Leggi tutto
In questi giorni c’è un’eccezionale attività relativa a quest’argomento sulla rete, la mia curiosità di provare questo prodotto non posso negarlo è molta. Parte del mistero relativo a FireMonkey si è risolto da voci ufficiali si tratterebbe dell’acquisto di VGScene/DXScene da parte di Embarcadero. Per quanto mi riguarda rimaneva comuque il desiderio di capire come…
Leggi tutto
