كيف يمكن لتطبيقك فتح جدول -table- بارادوكس محمي بكلمة مرور

[مهدي]

يمكن لتطبيقك فتح جدول بارادوكس محمي بكلمة مرور من دون أن يطلب منك إدخالها

كود :

procedure TForm1.FormCreate(Sender: TObject); begin Session.AddPassword('كلمة المرور'); Table1.Open; end;

و ذلك بكتابة الأمر

كود :

Session.AddPassword('كلمة المرور');

قبل الأمر

كود :

Table1.Open;

[محمد عبد العزيز]

بسم الله الرحمن الرحيم

هناك باب خلفي سري ل Paradox يمكن فتحه مهما كانت كلمة السر
PARADOX 7.0 يمكن فتحه بكلمة السر"jIGGAe" او "cupcdvum"

والسلام عليكم ورحمة الله وبركاته

[merouane]

هناك باب خلفي سري ل Paradox يمكن فتحه مهما كانت كلمة السر
PARADOX 7.0 يمكن فتحه بكلمة السر"jIGGAe" او "cupcdvum"

السلام عليكم

كانت على لساني

سبتقني الله يعطيك الخير

تحياتي

[محمد عبد العزيز]

بسم الله الرحمن الرحيم

خيرا اخي مروان المرة المقبلة عليك

اضيف فقط، انه يمكن تشفير البيانات قبل تخزينها في القاعدة
وبهذا عند تخطي كلمة السر تبقى البيانات مشفرة و غير مفهومة


والسلام عليكم ورحمة الله

[مهدي]

بارك الله فيك أخي عزيز
أشكرك على هذه المعلومة
هل لديك أمثلة لطرق التشفير ؟

[merouane]

السلام عليكم

أعذرني سأجيبك بما لدي لعموم الفائدة

كود :

var s: string[255]; c: array[0..255] of Byte absolute s; i: Integer; begin { Crypte le text } s := Edit1.Text; for i := 1 to ord(s[0]) do c[i] := 23 xor c[i]; LabCrype.Caption := s; { Décrypte le text } s := LabCrype.Caption; for i:=1 to Length(s) do s[i] := Char(23 xor ord(s[i])); LabDecrype.Caption := s; end;

انظر في الملفات المرفقات

[مهدي]

بارك الله فيك رضوان
صحيح لا ينال العلم مستكبر و لا مستحي
عندي سؤال آخر إن أمكن
كيف يمكن تشفير الملفات (صور، ملفات صوتية ...) التي توضع في الحقول من نوع Ole ؟ ملفات الجرافيك ؟

[MOHAMED MOI]

شكرا و بارك الله فيك merouan
وجعل هذا العمل في ميزان حسناتك

[deliba]

السلام عليكم
هل يمكنكم مساعدتي في مشكلة وهي اني عملت تطبيق دلفي به bde و sql ويعمل بشكل عادي ثم قمت بعمل له setup عن طريق inno setup عندما ذهبت به الى جهاز اخر ينصب بشكل العادي البرنامج حت bde عادي ولاكن عندما ياتي التنفيذ تأتي رسالة خطا هناك مشكل مع kernel32.dll
هل من ****** من فظلكم