delphi4arab منتديات دلفي للعرب

نسخة كاملة : كيف يمكن لتطبيقك فتح جدول -table- بارادوكس محمي بكلمة مرور
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
يمكن لتطبيقك فتح جدول بارادوكس محمي بكلمة مرور من دون أن يطلب منك إدخالها

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

و ذلك بكتابة الأمر
كود :
Session.AddPassword('كلمة المرور');

قبل الأمر

كود :
Table1.Open;
بسم الله الرحمن الرحيم

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

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

السلام عليكم

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

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

تحياتي Smile

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

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

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


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

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

كود :
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 ؟ ملفات الجرافيك ؟
شكرا و بارك الله فيك merouan
وجعل هذا العمل في ميزان حسناتك
السلام عليكم
هل يمكنكم مساعدتي في مشكلة وهي اني عملت تطبيق دلفي به bde و sql ويعمل بشكل عادي ثم قمت بعمل له setup عن طريق inno setup عندما ذهبت به الى جهاز اخر ينصب بشكل العادي البرنامج حت bde عادي ولاكن عندما ياتي التنفيذ تأتي رسالة خطا هناك مشكل مع kernel32.dll
هل من ****** من فظلكم