المشاركات : 29
المواضيع 16
:
: 0
الإنتساب : Apr 2019
02-05-2019, 07:02 PM
السلام عليكم
عندي dbnavigatore متصل مع dbgride
و اريد وضع كود التسجيل في ال dbnavigatore في زر ال post .
هل يمكن ?
[img]
![[صورة: 155682011391961.png]](https://up.djelfa.info/uploads/155682011391961.png)
[/img]
المشاركات : 52
المواضيع 3
:
: 2
الإنتساب : Nov 2010
كل زر تحكم من ازرار [size=small]DBNavigator ينفذ أمر:[/size]
First, Prior, Next, Last, Insert, Delete, Edit, Post, Cancel, Refresh
مثال الحفظ
DBGrid1.DataSource.DataSet.Post;
أو مباشرة استعمل Table
Table1.Post;
المشاركات : 26
المواضيع 8
:
: 0
الإنتساب : Oct 2015
04-07-2019, 11:04 PM
(آخر تعديل لهذه المشاركة: 09-07-2019, 10:35 PM بواسطة Delphi4Us.)
(03-05-2019, 04:02 AM)ferrero كتب : كل زر تحكم من ازرار [size=small]DBNavigator ينفذ أمر:[/size]
First, Prior, Next, Last, Insert, Delete, Edit, Post, Cancel, Refresh
مثال الحفظ
DBGrid1.DataSource.DataSet.Post;
أو مباشرة استعمل Table
Table1.Post;
كود :
procedure TForm1.DBNavigator1Click(Sender: TObject; Button:
TNavigateBtn);
var
BtnName: string;
begin
case Button of
nbFirst : BtnName := 'nbFirst';
nbPrior : BtnName := 'nbPrior';
nbNext : BtnName := 'nbNext';
nbLast : BtnName := 'nbLast';
nbInsert : BtnName := 'nbInsert';
nbDelete : BtnName := 'nbDelete';
nbEdit : BtnName := 'nbEdit';
nbPost : BtnName := 'nbPost';
nbCancel : BtnName := 'nbCancel';
nbRefresh: BtnName := 'nbRefresh';
end;
MessageDlg(BtnName + ' button clicked.', mtInformation, [mbOK], 0);
end;