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

السلام عليكم

واجهتني مشكلة في مشروعي الذي يتعامل مع قواعد البيانات بارادوكس في كيفية انشاء قاعدة جديدة Sad

فكرت في دمج قاعدة بيانات فارغة في الملف التنفيذي لان المشروع يجب ان يكون ذا محمولية جيدة Cool

و ذلك عبر طريقة الروسورس ثم استدعائها وجعل الامر يبدوا وكانني انشئتها Big Grin

لكن لا اظن ان هذه الطريق احترافية وهي تزيد من حجم الملف التنفيذي Sad

فهل من طريقة لانشاء قاعدة بيانات في وقت التنفيذ

السلام عليكم
جرب شيء مثل:

PHP كود :
with TTable.create(self) do begin
  DatabaseName := 'C: emp';
  TableName := 'FOO';
  TableType := ttParadox;
  with FieldDefs do Begin
    Add('Age', ftInteger, 0, True);
    Add('Name', ftString, 25, False);
    Add('Weight', ftFloat, 0, False);
  End;
  IndexDefs.Add('MainIndex','IntField', [ixPrimary, ixUnique]);
  CreateTable;
End; 

بارك الله فيك ساجربه باذن الله

I_Tiger

kachwahed

I_Tiger