PDA

View Full Version : سوال: ذخیره کردن اطلاعات دریافتی از کاربر در برنامه



mjzaret
دوشنبه 23 آذر 1394, 20:53 عصر
سلام

من برنامه‌ای نوشتم که دارای قسمت‌های مختلفی هست و اطلاعات رو از کاربر دریافت می‌کنه.

حالا می‌خوام آخرین اطلاعات وارد شده در برنامه در برنامه ذخیره شود و با اجرا مجدد برنامه کاربر نیازی به وارد کردن اطلاعات نباشد.

برنامه شامل رادیوباتن، کمبوباکس، فیلدهای تکست‌باکس هست.

شاد باشید :لبخندساده:

یوسف زالی
سه شنبه 24 آذر 1394, 17:37 عصر
سلام
اگر از دی بی استفاده نمی کنید، یا نمی خواهید یا این که قبل از لاگین دارید این کار رو می کنید برای هر یوزر یک فایل ini بسازید.

mjzaret
چهارشنبه 25 آذر 1394, 08:34 صبح
کاربر برای اولین بار که برنامه رو اجرا می‌کنه همه چیز خام هست.

بعد از ورود اطلاعات مثل نام کاربری و کلمه عبور و ... این اطلاعات با شرط داشتن تیک ذخیره اطلاعات باقی بماند.

و اینکه با مطالعه‌ای که کردم در فایل INI اطلاعات ذخیره خواهند شد و با انتقال برنامه به جای دیگر از اطلاعات کاربر استفاده می‌شود.

فکر کنم بهترین حالت استفاده از رجیستری برای ذخیره‌سازی اطلاعات وارد شده باشد.

البته هنوز نتونستم دستورات و کدهای مناسبی براش پیدا کنم.

اگه راهنمایی کنید ممنون می‌شوم.

شاد باشید :لبخندساده:

ابوالفضل عباسی
چهارشنبه 25 آذر 1394, 09:29 صبح
همون ini بهتره.
موقع ورود اطلاعات وقتی تیک ذخیره رو زد ،یک فایل ini ساخته بشه در مسیر برنامه. و اطلاعات رو وارد اون کنه. این هم کدش:(اول inifiles رو uses کن)

function ReadWriteIni(Section, Ident, Defult: string;make: boolean = false; filename: string = ''): string;var
Inifile: tinifile;
begin
if filename = '' then
filename := ExtractFilePath(application.ExeName) + 'Setting.ini';
if pos('\', filename) = 0 then
filename := ExtractFilePath(application.ExeName) + filename;
Result := '';
Inifile := tinifile.Create(filename);
if make then
begin
Inifile.WriteString(Section, Ident, Defult);
end;
Result := Inifile.ReadString(Section, Ident, Defult);
if make then
begin
Inifile.UpdateFile;
end;
Inifile.free;
end;

بعد برای ذخیره سازی این فرمان:

ReadWriteIni('User','Username',edit1.text,true,'') ;

برای خوندنش:

edit1.text:=ReadWriteIni('User','Username','',fals e,'');
به همین منوال کارباهاش بکن تا دستت راه بیوفته.