Printable View
سلام:5:
در این تاپیک سوال های رایج در مورد دیتابیس های دلفی قرار داده میشه
که دوستان سریع تر به موضوع مورد نظرشون برسن. من خودم
توی هر پست یک فرمان و خاصیتش رو میزارم. اگر چیزی
یادم رفته. لطفآ با پیغام خصوصی بهم اطلاع بدید. تا اضافه بشه.
فعلآ خداحافظ.
سلام
ديتابيسي از نوع SQL وجود نداره .:41:
SQL با بانک اطلاعاتی Sql Server فرق میکنه. که پایین متوجه میشید.
یک زبان پرس و جو از دیتابیس هست و روی خیلی از دیتابیس ها جواب میده.
SQL زبانی که توسط بیشتر پایگاه داده ها Support میشه و زبانی برای کار
با پایگاه داده ها(Access و SQL Server و Oracle و ...) است و تقریبا هر کاری
میشه با پایگاه داده باهاش انجام داد مثل : انتخاب ، حذف ، ویرایش ، Backup و ....
برای اجرای دستورات SQL لازم نیست چیزی نصب بشه و برای استفاده ازش
کافیه که یاد گرفت ازش استفاده کرد.:20:
موفق باشید. خداحافظ
سلام
برای اینکار دو راه وجود داره. اولی Locate هست و بعدی هم Filter
اولي ( Locate ) برای جستجو در بانک اطلاعاتی به کار می ره ...
دومی ( Filter ) برای نمایش رکوردهای خاصی در جدول به کار می رود ...
به یک نکته توجه داشته باشید که Locate فقط رکورد اول رو پیدا میکنه.
اما فیلتر قابلیت پیدا کردن چند رکورد رو داره و میتونید با دستور های خاصی
به رکورد های بعدی که پیدا کرده برید ...
اول فرمان Locate :
حالا هم فرمان Filterکد:TAdoDataset1.Locate('Esme Field','kalamate kelidi ke search kone',[]);
این هم برای فیلتر کردن بر اثاث نوشته های یک Edit.کد:TAdoDataset1.Filtered := True;
TAdoDataset1.Filter := 'esme field'''+'kalamate kelidi ke mikhahi search koni''';
اگر چیزی یادم رفته با پیغام خصوصی بهم اطلاع بدید.:19:کد:TAdoDataset1.Filtered := True;
TAdoDataset1.Filter:= 'esme field='''+Edit1.Text+'''';
موفق و سربلند باشید. :46:
سلام
خوب دستور فیلتر رو یاد گرفتید. اما سوال اینه که وقتی
یک کلمه رو فیلتر کردیم و لیستی از رکورد ها انتخاب شد چطور در اون لیست حرکت کنیم؟
با این کدها میشه در لیست فیتلر شده حرکت کنید.
بعدی
قبلیکد:AdoDataSet1.FindNext;
اولیکد:AdoDataSet1.FindPrior;
آخریکد:AdoDataSet1.FindFirst;
موفق باشید . بایکد:AdoDataSet1.FindLast;
سلام
خوب سوال خیلی ها هست که چطوری به یه رکورد جهش پیدا کنیم ؟
چند راه هست. که کد رو همراه توضیح نوشتم.:31:
رفتن به رکورد بعدی
رفتن به رکورد قبلیکد:AdoDataSet1.Next;
رفتن به رکورد اولکد:AdoDataSet1.Prior;
رفتن به رکورد آخرکد:AdoDataSet1.First;
رفتن به تعداد دلخواه بعدکد:AdoDataSet1.Last;
توجه : برای رفتن به تعداد دلخواه قبل باید قبل از تعداد منفی "-" بزارید. این هم کدکد:AdoDataSet1.MoveBy(تعداد);
رفتن به تعداد دلخواه قبل
فقط به جای "تعداد" عددی بزارید که قبل و بعد برید.:27:کد:AdoDataSet1.MoveBy(-تعداد);
همه این دستور ها برای جهش به رکورد در دیتابیس هستند و ربطی به لیست فیلتر هم نداره.
موفق باشید. خداحافظ:10:
سلام
این هم چندمین پرسش و پاسخ امشب :18:
چرا وقتی رکورد اولی هستیم و دستور میدیم به رکورد قبلی بریم خطای BOF را میگیره ؟
و همچنین آخر باشیم و دستور رکورد بعدی رو بدیم خطای EOF را میگیره؟
خوب BOF مخفف Begin Of File هست ، یعنی در اول هستیم و قبلی وجود نداره
و همچنین EOF هم مخفف End of File هست و در آخر فایل دیتابیس قرار داریم و بعدی وجود نداره
توضیحات کامل تر و بیشتر رو از زبان دوستمان بشنویم.:46:
نقل قول:
چطور میتونیم از این خطاها جلوگیری کنیم؟
قبل از اینکه دستور قبل و بعد رو بدید اول Eof یا Bof را بررسی کنید
بستگی به حرکت داره که کدوم رو بررسی کنید. کد بررسی رو زیر گذاشتم.
یک نمونه برای بررسی Bof
این هم یک نمونه از بررسی Eofکد:if ADODataSet1.Bof = False then
یادتون نره بعد از بررسی باید دستور حرکت رو صادر کنید! (انگاری فرمانده لشکر شدید:21: )کد:if ADODataSet1.Eof = False then
موفق باشید. خداحافظ
سلام.
soldier عنوان تاپیک مطابق نظرت ویرایش شد.
از زحمتی که میکشی ممنونم.
سلام
سولجر عزیز من می خواهم با یک Open dialog آدرس یه بانک اطلاعاتی از نوع اکسس رو به برنامه بدم اگه می شه تنظیماتش رو رام بگید .
کل گیر من در اینه که چطور به برنامه بگم بانک از چه نوعیه ، پراوایدر ش چیه و....
اگه یه نمونه هم بزاری ممنونت میشم
منتظرم
ممنون
سلام پیمان جاننقل قول:
تشکر فراوان.
سلام hp جان. کجا بودی نبودی؟نقل قول:
نوشته شده توسط hp1361
اول از تابع
فراخوانی تابعکد:procedure TForm1.Load(DBSource: String);
begin
ADOConnection1.Connected := False;
ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;'+
'Data Source='+DBSource+';Mode=ReadWrite;Extended Properties="";Persist Security Info=False;'+
'Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";'+
'Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;'+
'Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;'+
'Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don''t Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;'+
'Jet OLEDB:SFP=False';
ADOConnection1.Connected := True;
ADOConnection1.Open;
end;
برای دوستانی که میخواهند یک دیتابیس اکسس رو به صورت داینامیک لود کننکد:if OpenDialog1.Execute then
Load(OpenDialog1.FileName);
برای فراخوانی تابع آدرسی رو میخواهند بدهند.
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] برای لود کردن دیتابیس اکسس به صورت داینامیک(در برنامه اجرا شده)کد:Load(آدرس فایل دیتابیس);
نمونه برای دیگران هم بدرد میخوره. :)
موفق باشید.
سلام
دستت درد نکنه سولجر عزیز کارم رو راه انداختی
انشاا... از این به بعد حضوری مستمر و پررنگتر خواهم داشت
موفق باشید