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

لديا مشروع مبرمج بدالفي7 يتكون من واجهتين وواجهة خاصة برقم السري
ما الطريقة التي من خلالها اتمكن من خلال واجهة مفتاح سري البلوغ لاحد الوجهات على حسب الطلب
قاعدة معطيات مخزنة في sql server 2000 يعني دالفي مربوط بsal server

استخدم inifiles
http://delphipage.developpez.com/motpasse/
او استخدم الرجستري او يمكنك استخدام قواعد البيانات ايضا

يمكن عمل ذلك بإستخدام قاعدة البيانات

و قد أرفقت مثال على ذلك ( كلمة المرور و اسم المستخدم هي : 1 كما يجب نقل الملف إلى القرص c)

السلام عليكم

كود :
procedure TFPas.Button1Click(Sender: TObject);
begin
ADOConnection1.ConnectionString:='Provider=SQLOLEDB.1;'+
                                    'Persist Security Info=False;'+
                                    'User ID='+Edit1.Text+';Password='+Edit2.Text+
                                    ';Initial Catalog=اسم قاعدة البياناتt;'+
                                    'Data Source=اسم  الخادم';
try
   ADOConnection1.Connected:=true;
        FPri.Show;
     FPas.Hide;
    except on E: Exception do
ShowMessage('نعذر الاتصال');
end;
end;

بالتوفيق

sarah

onexite

مبرمج مبتدأ

تلميذ الحياة