delphi4arab منتديات دلفي للعرب

السلام عليكم

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

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

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

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

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

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

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

[صورة: 714541161.jpg]

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

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

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

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

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

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

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

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

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

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

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

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

[صورة: attachment.php?aid=3967]

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

ملف 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 يحتوي على خصائص الفورم
[صورة: attachment.php?aid=3968]

محتوى الملف

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

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

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

فارس المطر

bouh25

لؤي

فارس المطر

S.FATEH

فارس المطر

S.FATEH

bouh25

فارس المطر