سوال: کامپوننت رمزنگاری IP Works Encrypt [بایگانی]

1072300

سه شنبه 13 مهر 1395, 13:57 عصر

سلام به دوستان و اسایید محترم،
آیا کسی با کامپوننت IP Works Encrypt کار کرده؟
به چه صورت می توانم متن فایل های تکست را داخل خود فایل رمزگداری کنم؟
امنیت این فایل ها برایم حیاتی است.
ایا از این کامپونت بهتر و قدرتمندتر هم در این زمینه وجود دارد؟
سپاس

hp1361

سه شنبه 13 مهر 1395, 15:40 عصر

سلام به دوستان و اسایید محترم،
آیا کسی با کامپوننت IP Works Encrypt کار کرده؟
به چه صورت می توانم متن فایل های تکست را داخل خود فایل رمزگداری کنم؟
امنیت این فایل ها برایم حیاتی است.
ایا از این کامپونت بهتر و قدرتمندتر هم در این زمینه وجود دارد؟
سپاس

سلام

بعد از نصب مجموعه IP Works Encrypt، چندین کامپوننت نصب خواهد شد که هر کدوم با ستفاده از یکی از روش های متداول رمزگذاری، عملیات رمز گذاری رو انجام میده.

برای مثال کامپوننت ipcRSA با استفاده از الگوریتم RSA این کار رو انجام میده. و ...

شما میتونید یک تحقیقی در خصوص الگوریتم های رمزگذاری داشته باشی و کامپوننت مورد نظر رو(با توجه به نوع الگوریتمش) روی فرم قرار بدید

موفق باشیم

1072300

چهارشنبه 14 مهر 1395, 18:04 عصر

سلام، اگر امکان دارد برای روش AES یک نمونه کد با توضیح بفرمایید، سپاس

hp1361

شنبه 17 مهر 1395, 08:30 صبح

سلام، اگر امکان دارد برای روش AES یک نمونه کد با توضیح بفرمایید، سپاس

سلام

در مثال زیر متن ورودی رمزگذاری میگردد:

procedure TForm1.BitBtnEncryptClick(Sender: TObject);
begin
try
ipcAES1.UseHex := True;
ipcAES1.InputMessage := EditInputMessage.Text;
ipcAES1.KeyPassword := EditKeyPassword.Text;
ipcAES1.Encrypt;
EditOutputMessage.Text := ipcAES1.OutputMessage;
except
on E: Exception do
ShowMessage(E.Message);
end;
end;

و در این مثال فایل انتخاب شده رمزگذاری می گردد:

procedure TForm1.BitBtnEncryptFileClick(Sender: TObject);
begin
try
ipcAES1.UseHex := True;
ipcAES1.InputFile := EditInputFileAddress.Text;
ipcAES1.OutputFile := EditOutputFileAddress.Text;
ipcAES1.KeyPassword := EditFileKeyPassword.Text;
ipcAES1.Encrypt;
ShowMessage('فایل با موفقیت رمزگذاری گردید.');
except
on E: Exception do
ShowMessage(E.Message);
end;
end;

برای رمزگشایی هم از متد Decrypt استفاده می شود.(به یاد داشته باشید که برای رمزگشایی متن/فایل ورودی باید متن/فایل رمزشده باشد)

موفق باشیم