اتصال به بانک اطلاعاتی پارادکس رمزدار [بایگانی]

omid-delphi

سه شنبه 19 فروردین 1382, 11:37 صبح

[b]اینجانب از جداول پارادکس در برنامه خود استفاده کرده‌ام که دارای رمز عبورمی‌باشند و در هنگام باز کردن جداول پنجره در یافت رمز باز می‌شود.میخواهم از داخل برنامه رمز جداول مشخص شود و از کاربر سوال نشود.
لطفا به من کمک کنید. :(

Hidarneh

سه شنبه 19 فروردین 1382, 13:44 عصر

یه Session رو فرمت بذار و SessionName جدول هات رو به اون بده بعد توی روال TSession.OnPassword کد زیر رو بنویس:
[code]procedure TForm1.Password(Sender: TObject; var Continue: Boolean);

var
Passwrd: String;
begin
Passwrd := InputBox('Enter password', 'Password:', '');
Continue := (Passwrd > '');

end;[/code
و به جای استفاده از InputBox خودت مقدار رمز رو بده