ملف txt فيه بيانات كيف ممكن اخذها واخزنها في داتا

بسيطة تستطيع فعل ذلك في اكسل،

1. افتح برنامج اكسل

2. اختر "فتح ملف"

3. غير نوع الملف الى txt

4. تظهر شاشة استيراد ملفات اختر كلمة "محدد" ثم اضغط على زر التالي

5. ضع صح على مربع "مسافة" وامسح الصح من بقية المربعات" فستظهر امامك اعمدة البيانات آليا. اضغط التالي

6. حدد نوع كل عمود ثم اضغط انهاء

الان عندك البيانات في اكسل تستطيع حفظها كملف بيانات dbf

السلام عليكم

مسئلة القرآة او الكتابة اخوي aymansoft بسيطة والقرآة سطر سطر مش مشكلة

لكن موضوع الفراغات بين الكلمات هو اللي يحتاج لشوية تفكير .. !

يمكن لازم نقراء النص حرف حرف ونتعامل مع الفراغ بطريقة خاصة .. ؟

لا عليك سوف احاول حلها لك ... وسلي نفسك بهالرابط لما يجيك الحل :

http://www.delphibasics.co.uk/RTL.asp?Name...ndCode1=Yes#Ex1

ان شاء الله يكون هذا ما تريد :

var
  MyFile       : TextFile;
  s1,s2,s3,Line: String;
  l,i          :integer;
begin
    AssignFile(MyFile,'test.txt');
    Reset(MyFile);
  While not SeekEof(MyFile) do
  begin
    Readln(MyFile,Line);

    i:=pos(' ',Line);
    s1:=copy(Line,1,i-1);
    l:=Length(s1);
    Delete(Line,1,l);
    Line:=Trim(Line);

    i:=pos(' ',Line);
    s2:=copy(Line,1,i-1);
    l:=Length(s2);
    Delete(Line,1,l);
    Line:=Trim(Line);

    s3:=Line;

  with ListView1.Items.Add do
  begin
    Caption:=(s1);
    SubItems.Add(s2);
    SubItems.Add(s3);
  end;
  end;
  end;

في الكود السابق ...تم فصل البيانات وتخزينها في ListView

وما يهمك في الموضوع ( s1,s2,s3 ) وتستطيع التعامل معها كما تريد

المثال مرفق

New Folder.rar

معلش المرة دى لا اعرف شئ عن قواعد البيانات لذلك لان اكون هو من ياتى بالحل لك اخى aymansoft

وشكرا

شكرا جزيلا لكم يا اخوتي

وشكرا لك يا 02/11/2004 على الحل الجميل

وشكر خاص لJuStNiCk وان شاء الله تساعدني في مواضيع أخرى

وبارك الله فيكم

شكرا جزيلا لكم يا اخوتي

وشكرا لك يا 02/11/2004 على الحل الجميل

وشكر خاص لJuStNiCk وان شاء الله تساعدني في مواضيع أخرى

وبارك الله فيكم