خطوات انشاء قاعدة بيانات بمعالج و خطوات انشاء قاعدة بيانات يدويا
3 مشترك
صفحة 1 من اصل 1
خطوات انشاء قاعدة بيانات بمعالج و خطوات انشاء قاعدة بيانات يدويا
خطوات انشاء قاعدة بيانات بمعالج و خطوات انشاء قاعدة بيانات يدويا
الطريقة الاولى
بسم الله الرحمن الرحيم
الصلاة والسلام على رسول الله
انقر هذه القائمة
Base de données
من القائمة انقر هذه
Expert fiche ...
النافذة الاولى
Expert fiche base de données
Quel type de fiche voulez-vous que l'exert crée ?
-Option de fiche---------------------------
| |
| . Créer une fiche simple | <<
| |
| . Créer une fiche maitre/détail |
| |
----------------------------------------
-Options d'ensemble de données(DataSet)-------
| |
| . Créer une fiche avec des objets TTable | <<
| |
| . Créer une fiche avec des objets TQuery |
| |
----------------------------------------
من النافذة انقر هذه
Suite>
النافذة الثانية
Expert fiche base de données
Choisissez une table à utiliser avec la fiche.
Lecteur ou nom d'alias:
من القائمة حدد هذه
DBDEMOS
Nom de table
من القائمة حدد هذه
animale.dbf
انقر هذه
Suite>
النافذة الثالثة
انقر
>>
انقر هذه
Suite>
النافذة الرابعة
انقر هذه
Suite>
النافذة الخامسة
انقر هذه
Terminer
في الاخير ظهور النافذة أو النموذج الذي من اجله قمت بهذه الخطوات.
نفذ البرنامج وشاهد النتيجة
--------------------------------------
الطريقة الثانية
خطوات انشاء قاعذة بيانات يدويا
ضع على الفورم1
Table1
و
DataSource1
و
DBNavigator1
و
DBImage1
و 4
TDBEdit
و 4
TLabel
اكتب هذا الكود
procedure TForm1.FormCreate(Sender: TObject);
begin
Table1.DatabaseName := 'DBDEMOS';
Table1.TableName := 'animals.dbf';
Table1.Active := true;
DataSource1.DataSet := Table1;
DBNavigator1.DataSource := DataSource1;
DBNavigator1.Hints;
DBNavigator1.ShowHint := true;
DBEdit1.DataSource := DataSource1;
DBEdit2.DataSource := DataSource1;
DBEdit3.DataSource := DataSource1;
DBEdit4.DataSource := DataSource1;
DBImage1.DataSource := DataSource1;
DBEdit1.DataField := 'AREA';
DBEdit2.DataField := 'NAME';
DBEdit3.DataField := 'SIZE';
DBEdit4.DataField := 'WEIGHT';
DBImage1.DataField := 'BMP';
Label1.Caption := 'AREA';
Label2.Caption := 'NAME';
Label3.Caption := 'SIZE';
Label4.Caption := 'WEIGHT';
Label5.Caption := 'BMP';
end;
----------------------------------------------
ادعوك الى زيارة هذا المنتدى
delphilo.alamontada.com
الطريقة الاولى
بسم الله الرحمن الرحيم
الصلاة والسلام على رسول الله
انقر هذه القائمة
Base de données
من القائمة انقر هذه
Expert fiche ...
النافذة الاولى
Expert fiche base de données
Quel type de fiche voulez-vous que l'exert crée ?
-Option de fiche---------------------------
| |
| . Créer une fiche simple | <<
| |
| . Créer une fiche maitre/détail |
| |
----------------------------------------
-Options d'ensemble de données(DataSet)-------
| |
| . Créer une fiche avec des objets TTable | <<
| |
| . Créer une fiche avec des objets TQuery |
| |
----------------------------------------
من النافذة انقر هذه
Suite>
النافذة الثانية
Expert fiche base de données
Choisissez une table à utiliser avec la fiche.
Lecteur ou nom d'alias:
من القائمة حدد هذه
DBDEMOS
Nom de table
من القائمة حدد هذه
animale.dbf
انقر هذه
Suite>
النافذة الثالثة
انقر
>>
انقر هذه
Suite>
النافذة الرابعة
انقر هذه
Suite>
النافذة الخامسة
انقر هذه
Terminer
في الاخير ظهور النافذة أو النموذج الذي من اجله قمت بهذه الخطوات.
نفذ البرنامج وشاهد النتيجة
--------------------------------------
الطريقة الثانية
خطوات انشاء قاعذة بيانات يدويا
ضع على الفورم1
Table1
و
DataSource1
و
DBNavigator1
و
DBImage1
و 4
TDBEdit
و 4
TLabel
اكتب هذا الكود
procedure TForm1.FormCreate(Sender: TObject);
begin
Table1.DatabaseName := 'DBDEMOS';
Table1.TableName := 'animals.dbf';
Table1.Active := true;
DataSource1.DataSet := Table1;
DBNavigator1.DataSource := DataSource1;
DBNavigator1.Hints;
DBNavigator1.ShowHint := true;
DBEdit1.DataSource := DataSource1;
DBEdit2.DataSource := DataSource1;
DBEdit3.DataSource := DataSource1;
DBEdit4.DataSource := DataSource1;
DBImage1.DataSource := DataSource1;
DBEdit1.DataField := 'AREA';
DBEdit2.DataField := 'NAME';
DBEdit3.DataField := 'SIZE';
DBEdit4.DataField := 'WEIGHT';
DBImage1.DataField := 'BMP';
Label1.Caption := 'AREA';
Label2.Caption := 'NAME';
Label3.Caption := 'SIZE';
Label4.Caption := 'WEIGHT';
Label5.Caption := 'BMP';
end;
----------------------------------------------
ادعوك الى زيارة هذا المنتدى
delphilo.alamontada.com
رد: خطوات انشاء قاعدة بيانات بمعالج و خطوات انشاء قاعدة بيانات يدويا
مشكـــــور على الموضـــــوع.................
sad13- مبرمج
- عدد المساهمات : 53
تاريخ التسجيل : 04/01/2014
sdk11- مبرمج مجتهد
- عدد المساهمات : 108
تاريخ التسجيل : 19/09/2014
مواضيع مماثلة
» انشاء قاعدة بيانات بـ Visual C++ كاملة 11
» انشاء قاعدة بيانات بـ Visual C++ كاملة 10
» انشاء قاعدة بيانات بـ Visual C++ كاملة 9
» كيفية انشاء قاعدة بيانات في دلفي
» انشاء قاعدة بيانات بـ Visual C++ كاملة 8
» انشاء قاعدة بيانات بـ Visual C++ كاملة 10
» انشاء قاعدة بيانات بـ Visual C++ كاملة 9
» كيفية انشاء قاعدة بيانات في دلفي
» انشاء قاعدة بيانات بـ Visual C++ كاملة 8
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى