Re: PHP Crypt w Delphi

Article View: pl.comp.lang.delphi

Article #345836

Back to pl.comp.lang.delphi Previous Next

#345836

From: konsul41
Date: Wed, 21 Jun 2017 06:26

20 lines
1705 bytes

Sprawa rozwiązana

link do projektu UDESCryp.pas
http://www.magsys.co.uk/delphi/unixcrypt.asp

działa w moim zastosowaniu

try
                 DESCrypt1 := TDESCrypt.Create (self) ;
                 with DESCrypt1 do
                 begin
                   Input:=AnsiString(password);
                   Salt:=AnsiString('12');
                   if execute then haslo:=String(Output);
                 end;
               finally
                 DESCrypt1.Free;
               end;

Dzięki za podpowiedzi.

Technical Details

Message-ID: <oid3ho$rka$1@portraits.wsisiz.edu.pl>

Path:

mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!wsisiz.edu.pl!.POSTED.jue163.internetdsl.tpnet.pl!not-for-mail

References:

<ohqtp0$q87$1@portraits.wsisiz.edu.pl> <59410167$0$5152$65785112@news.neostrada.pl> <594102f4$0$5152$65785112@news.neostrada.pl> <594114e7$0$660$65785112@news.neostrada.pl> <594120d9$0$5156$65785112@news.neostrada.pl> <5941221e$0$645$65785112@news.neostrada.pl> <5947a83f$0$5154$65785112@news.neostrada.pl>

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!agh.edu.pl!news.agh.edu.pl!newsfeed2.atman.pl!newsfeed.atman.pl!wsisiz.edu.pl!.POSTED.jue163.internetdsl.tpnet.pl!not-for-mail
From: "konsul41@wp.pl" <konsul41@wp.pl>
Newsgroups: pl.comp.lang.delphi
Subject: Re: PHP Crypt w Delphi
Date: Wed, 21 Jun 2017 08:26:00 +0200
Organization: http://www.wit.edu.pl
Message-ID: <oid3ho$rka$1@portraits.wsisiz.edu.pl>
References: <ohqtp0$q87$1@portraits.wsisiz.edu.pl> <59410167$0$5152$65785112@news.neostrada.pl> <594102f4$0$5152$65785112@news.neostrada.pl> <594114e7$0$660$65785112@news.neostrada.pl> <594120d9$0$5156$65785112@news.neostrada.pl> <5941221e$0$645$65785112@news.neostrada.pl> <5947a83f$0$5154$65785112@news.neostrada.pl>
Mime-Version: 1.0
Injection-Date: Wed, 21 Jun 2017 06:26:00 -0000 (UTC)
Injection-Info: portraits.wsisiz.edu.pl; posting-host="jue163.internetdsl.tpnet.pl:95.48.160.163"; logging-data="28298"; mail-complaints-to="abuse@wsisiz.edu.pl"
User-Agent: Mozilla/5.0 (Windows NT 6.1; rv:52.0) Gecko/20100101 Thunderbird/52.1.1
In-Reply-To: <5947a83f$0$5154$65785112@news.neostrada.pl>
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Reply to Parent Message