On 2015-11-15 05:30, Gabriele Cappelletto wrote:
> what's the code to decrypt it with DCPCrypt?
Here is one usage example... This is actually the DES3 self-test code
===
procedure test;
const
Key: array[0..23] of byte =
Am 15.11.2015 06:31 schrieb "Gabriele Cappelletto" <
cappellettogabri...@yahoo.it>:
>
>
>
> Il 14/11/2015 18:11, Graeme Geldenhuys ha scritto:
> > On 2015-11-14 09:44, Gabriele Cappelletto wrote:
> >> the .net DESCryptoServiceProvider.
> > Please show how the data was encrypted... The exact code
On Sun, 15 Nov 2015, leledumbo wrote:
How can I check if the file is locked before reading its contents?
Just handle the exception. Doing nothing in the handler is perfectly fine.
It is the only possible option.
Michael.
--
___
Lazarus mailing
After quick look I noticed that
var
Vector : array of Byte;
SetLength(Vector, 8);
Vector[0] := 1;
Vector[1] := 2;
Vector[2] := 3;
Vector[3] := 4;
Vector[4] := 5;
Vector[5] := 6;
Vector[6] := 7;
Vector[7] := 8;
does not match
Dim vector As String =
So why is vector in your code? Including irrelevant parts just makes it harder
for others to help you.
Rewrite your Pascal code to use the same variables as the VB code!
On Sun, 15 Nov 2015 06:56:09 -0500 Gabriele Cappelletto
cappellettogabri...@yahoo.it wrote
But the
I have try with this code but not work, I have test the function
give me the same result:
var
Cipher: TDCP_des;
KeyStr: string;
TextIn, TextOut : String;
Hash: TDCP_sha1;
Digest: array[0..19] of byte;
Vector : array of Byte;
> How can I check if the file is locked before reading its contents?
Just handle the exception. Doing nothing in the handler is perfectly fine.
--
View this message in context:
http://free-pascal-lazarus.989080.n3.nabble.com/Lazarus-File-is-locked-tp4045497p4045501.html
Sent from the Free
But the cipther constructor does not refer to vector, but the
variable IV. Vector is not used in this example
Il 15/11/2015 12:44, DougC ha scritto:
After quick look I noticed that
var
I see another problem: Your pascal implementation sets key badly. I think
it should be 'key'[1]. However as I didn't even use buffer with constant
string so I might be wrong.
You should also try to encrypt longer messages to see if first block is
intact because then it's padding problem.
Leonardo M. Ramé wrote:
Hi, I'm checking the contents of an .ini file every 10 seconds (with a
TTimer), the file is modified by another application and I display its
contents in my program.
The problem is the file is locked while the other program is using it
and aparently TIniFile cannot
On Wed, Nov 11, 2015 at 07:53:33PM +0100, Marco van de Voort wrote:
> > I replaced many endangered with-blocks in the LCL.
> > ToDo: check the rest of the Lazarus sources.
>
> Ok, I plan finalizing and committing the trect stuff in the coming week.
The first batch is committed. Tpoint* is
This mailing list is fully loaded with valuable information for both new
and experienced users. Unfortunately, it is a bit difficult to access
this information. There is an archive of previous mails
(http://lists.lazarus.freepascal.org/pipermail/lazarus/), but it is a
pain to open each mail
In the LazarusMailingListReader, I am decompressing the downloaded gzip
mail archives by using the Abbrevia package. This is working fine in
Windows, but Linux rejects to compile the package due to an "identifier
nl_langinfo not found" error in this procedure of unit AbCharset:
function
Thanks for sharing your project. I'll take a look at it in a few days and
maybe even suggest/make improvements.
--
___
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
14 matches
Mail list logo
