مشكلة الحفظ في قاعدة البيانات

[فارس المطر]

السلام عليكم

اواجه مشكلة في حفظ البيانات في قاعدة المعطيات

استعمل  Data Module  في برنامجي

البرنامج يعمل تمام  وكل الفورمات متصلة  بـ Data Module تعمل عادي

بعد إظافة  كود لحفظ البيانات ..

تقول رسالة الخطأ أن الفورم3 غير معرف او غير متصل بالقاعدة

مع ان الفورم3 متصل ويعمل عادي 

[size=small];db.ABSTable2.FieldValues['Date_Fin'] :=DateTimePicker1.Date[/size]

[bouh25]

عليك تجنب بعض الاحرف في تسمية حقول قواعد البيانات مثل وخاصة الفراغات é è ....

[لؤي]

السلام عليكم
اعد التحقق من ربطك للفورم ٣ مع datamodule ...

[فارس المطر]

الفورم مربوط مع data module
عندما انزع كود الحفظ المبين اعلاه
البرنامج يعمل عادي في فورم 3

المشكل فقط عند اظافة كود الحفظ

---

[S.FATEH]

السلام عليكم ضع محتوى ملف الـ dpr هنا
delphi : project : view source

[فارس المطر]

وعليكم السلام ورحمة الله

هل تقصد وضع محتوى قاعدة بيانات في المسار Embarcadero\Studio\Projects

---

شكرا لكم جميعا

تم حل المشكل كالتالي

تم تغيير db.ABSTable بــ DataModule.ABSTable

[S.FATEH]

السلام عليكم اخي
انصحك اخي بتعلم اساسيات البرمجة بالدلفي قبل محاولة برمجة قواعد البيانات

الذي قصدته هو ملف المشروع dpr



الملفات الاساسية لمشروع دلفي 

ملف dpr يحتوي على الوحدات مع مكانها في الجهاز

PHP كود :

program Project1;

uses
  Vcl.Forms,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end. 


ملف dfm يحتوي على خصائص الفورم 



محتوى الملف 

PHP كود :

object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'Form1'
  ClientHeight = 202
  ClientWidth = 447
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
end 


ملف pas يحتوي على الكود

PHP كود :

unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs;

type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

end. 


ملف الوحدة pas
يمكن ان يضم اثنين من uses الاولى قبل implementation و الثانية بعد 
في حالة اردت ان تصل الى مكونات كود وحدة اخرى يحب ان تضمن اسم الوحدة في uses

[bouh25]

المشكل انك لم تصرح ب datamodule في هذه الوحدة
uses datamodule

[فارس المطر]

شكرا لكم جميعا
شرح وافي لأخ فاتح سأحاول تدارك ذلك في المستقبل