ايران ويج

ايران ويج > برنامه نویسی > دلفی > باز کردن فایل متنی با برنامه
نسخه‌ی کامل: باز کردن فایل متنی با برنامه
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.

The.Ghost

۲۵-بهمن-۱۳۹۰, ۱۸:۲۲:۵۳
با سلام.Question
چه شکلی میشه کار زیر را انجام داد.SadExclamationAmazeQuestion

یک فایل متنی TEXT را درک کنیم روی فایل اجرایی برنامه ای که نوشتیم بعد برنامه اگزه باز بشه و اطلاعات اون فایل TEXT را در داخل یک Memo در اگزه نمایش دهد.Exclamation
نکته می خواهم برنامه اول بسته باشه. یعنی به محض آن که فایل TEXT درک شد روی فایل اگزه، فایل اگزه باشه و اطلاعات فایل TEXT را در داخل یک Memo که از قبل گذاشتیم نمایش دهد.Exclamation
با تشکر ممنونم میشم اگه کسی کمک کنه.Rolleyes

lord_viper

۲۵-بهمن-۱۳۹۰, ۲۰:۲۵:۱۰
وقتی فایلی رو رو یه بردامه درگ دروپ میکنین اسم اون فایل به صورت پارامتر به اون برنامه ارسال میشه
برای خوندن این پارامتر در لفی از دستورات زیر استفاده میکنیم

کد:
procedure TForm2.FormCreate(Sender: TObject);
var
i:Integer;
str:string;
begin
for i := 1 to ParamCount do
str:=str+ParamStr(i);
if str<>'' then
memo1.Lines.LoadFromFile(str);
end;
ايران ويج > برنامه نویسی > دلفی > باز کردن فایل متنی با برنامه