کار با فایل های متنی در دلفی txt-text

[hassan p.b]

سلام
سوال را عمومی شروع می نمایم
اول باز کردن فایل تویط دلفیچ
دوم فرض نماییذ فایل متنی مل حاوی خرف و اعدا است مانند
x9y-98
x-.098y-56.78
خال می خواهیم از طریق برنامه نویسی این فایل باز شده و x,y ها اتوماتیک خوانده شده و بطور مستقل بفرض ذر جدولی حاوی فیلدهای x-y ریخته شود لطفا همراهی نمایید تا به نتیجه برسیم
اگر مقدور باشد مثال هم اپ نمایید
با تسکر
حسن پوریوسف

[hassan p.b]

مبحث خواندن و نوشتن در سایت ها موجود است ولی خواندن و جداسازی تقریبا جدید است من چیز خاصی که بتوان روی ان انگشت کذاشت ندیدم
دوستان عزیز متن می تواند منظم و یا مانند مثال بالا نامنظم و بهم چسبیده باشد عدد کنار x مقدار x و y مقدارy است
با تشکر

[Felony]

به وسیله کلاس TStringList میتونید یه فایل متنی رو بخونید و به وسیله توابع Copy و Pos میتونید اطلاعات رو تفکیک کنید ، در مورد همه موارد بالا در سایت پست های زیادی هست .

[hassan p.b]

با تشکر ولی اعداد را از حروف چگونه تشخیص بدهیم اعداد هم طول یکسانی ندارنند

[hassan p.b]

موارد ذکر شده بیشتری برای vb هستند

[Felony]

با تشکر ولی اعداد را از حروف چگونه تشخیص بدهیم اعداد هم طول یکسانی ندارنند

موارد ذکر شده بیشتری برای vb هستند

توابع Copy و Pos رو برای همین کار نام بردم !
نمونه ضمیمه رو ببینید .

[hassan p.b]

فایل را روی دلفی در هنگام ران قسمت for...do ایراد می گیرد
با تشکر از همراهیتان

[Felony]

سلام
فایل را روی دلفی در هنگام ران قسمت for...do ایراد می گیرد
با تشکر از همراهیتان

چون تو برنامه از حلقه for ... in استفاده شده و این نوع حلقه از دلفی 2009 به بعد اضافه شده ، اگر از نسخه قدیمی تر از 2009 استفاده میکنید کد رو به صورت زیر تغییر بدید :

var

  StrList: TStringList;

  Temp, TempX, TempY: String;

  I: Integer;

begin

  if OpenDialog1.Execute then

  begin

    StrList:= TStringList.Create;

    try

      StrList.LoadFromFile(OpenDialog1.FileName);

      for I := 0 to StrList.Count - 1 do

      begin

        Temp:= StrList.Strings[i];

        TempX:= Copy(Temp, Pos('x', Temp)+2, Pos('y', Temp)-3);

        TempY:= Copy(Temp, Pos('y', Temp)+2, Length(Temp));

        ListBox1.Items.Add(TempX);

        ListBox2.Items.Add(TempY);

      end;

    finally

      StrList.Free;

    end;

  end;

end;

[hassan p.b]

مرسی و سلام
من از دلفی6 بهره می برم ایا در این کد اعداد ممیز دار هم استخراج می شونند

[Felony]

مرسی و سلام
من از دلفی6 بهره می برم ایا در این کد اعداد ممیز دار هم استخراج می شونند

بله ، فکر نمیکنم تحلیل یا تست کردن این کد اینقدر سخت باشه ، کافی بود چند دقیقه روش وقت بزارید !

[hassan p.b]

با سلام دیگر
من مثال را کسترش دادم ولی بنظرم بایستی کد مستحکم تری بنویسیم تا تحت هر شریطی کار نماید ممکن است مانند متون اضافه شده تفاوت ها ی گوناگون باشند و رفتار برنامه مهم خواهد بود
در مثال زیر و txt های آن این مسئله قابل مشاهده است
با تشکر

[hassan p.b]

لطفا ادامه بدید با تشکر از همراهی دوستان عزیز

[sips65]

سلام...
من با نوشتن فایل متنی به صورت چند خطی مشکل دارم...
تو برنامه یه حلقه دارم که هر بار با دستور writeln() متنی رو توی فابل میریزم و با تکرار بعدی همون فایل رو میخونم با read() و متن جدید رو باز با writeln() بهش اضافه میکنم .ولی تو فایلم فقط اولین و آخرین داده ذخیره میشه.... لطفا راهنمائی کنید...ممنون.

[hassan p.b]

[متاسفانه بعد ارتقاسایت من نوشته هام را سخت می توانم پیدا کنم

[sips65]

دوستان محترم...من که ایراد کار خوردم رو پیدا کردم....ممنون!

[sips65]

دوستان کسی یک کمپوننت ساده و کارا برای باز کردن فایل اکسل تو دلفی میشناسه که بتونیم دقیقا با آدرس دهی مقادیر هر سطر و ستون رو بخونیم؟؟؟

[MohsenB]

سلام

تو کامپوننت های TMS بگردید ، حتما پیدا میکنید .

[hassan p.b]

سلام
مثال ها و فروم جالبی یافتم
لینک:
https://barnamenevis.org/showthread.p...&highlight=POS

[hassan p.b]

دوستان خیلی وقته که اینجا نیامدم و کار نیمه رها شده است لطفا همراهی نمایید
من می خواهم از یک فایل متنی مثلا x و مقدارش را جدا و در یم بطور مثال لیست باکس قرار بدهم این فایل می تواند منفی و اعشار هم باشد این x یا y -z-r-g-m می توانند در هر جایی از متن باشند ولی باید من بتوانم اعداد را کامل جدا نمایم و مهمتر اینکه بدانم کدام x است و کدام y و سایر موارد....
دوستی اینکار را انجام دادند 50 هم ازم گرفتند و سورس را تحویل ندادند 150 هم می خواهند دیگه بکسی نمی شود اطمینان کرد اگه لطف کنید می خواهم خود یاد بگیرم و انجام دهم فایل کار ایشان را ضمیمه می کنم
با تشکر
حسن
www.airship.blogfa.com

[hassan p.b]

راستی مثال بالا بعلت متغییر بودن متن و محل x و سایر پارامترها کارا نیست در ضمیمه های بالا کاملا مشخص است و مثلا مثال نمی تواند اولا x را تشخیص دهد و اگه مثلا بین x و y فاصله باشد و یا در سطر y نباشد دچار مشکل می شود.
با تشکر
حسن

[hassan p.b]

https://barnamenevis.org/showthread.p...07#post2058207