Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Основна";
Поточний архів: 2004.12.12;
Завантажити: [xml.tar.bz2];

Вниз

Як визначити розмір textfile? Знайти схожі гілки


Ньюбик   (2004-11-29 18:15) [0]

Може бути це популярне питання, але відповіді на нього не знайшов.
Мені цікаво, як знайти розмір текстового файлу. Filesize не підходить (в хелпе так і сказано: "FileSize can" t be used on a text file. "). І як бути?

Допоможіть будь ласка написати процедуру визначення розміру файлу.



Smithson   (2004-11-29 18:17) [1]

так само, як і будь-якого іншого. FileSize + F1.



Gero ©   (2004-11-29 18:19) [2]

А ніхто не знає, текстовий у тебе файл чи ні.
Як ти скажеш так і буде.
Так що FileSize підходить цілком.
Крім цього, ще є GetFileSize.



Ньюбик   (2004-11-29 18:21) [3]

2 Gero
"Крім цього, ще є GetFileSize."
Підкажіть будь ласка, як за допомогою GetFileSize визначити розмір файлу? Тільки детальніше якщо можна. Я ньюбік.

2 Smithson
"Так само, як і будь-якого іншого. FileSize + F1."
FileSize не підходить для textfile (є такий тип). Можна звичайно зробити file of char ... Тільки ось уже чимало коду написано для textfile (всякі оператори readln і т.п.) - не хотілося б все переробляти.



jack128 ©   (2004-11-29 18:26) [4]

Ньюбік (29.11.04 18: 21) [3]
Я ньюбік.

Ні-і. Це ти в онлайн іграх ньюбік, а тут ти чайник ;-)

було
f: TextFile;
починати
...
Result: = GetFileSize (TTextRec (f) .Handle, nil);
...
end;



Ньюбик   (2004-11-29 18:30) [5]

2 jack128
> Це ти в онлайн іграх ньюбік
Не знаю, в онлайн-ігри не граю (крім як в UT іноді). Ньюбікамі часто на форумах називають людей, у яких мало постів.
>, А тут ти чайник ;-)
хто б сперечався, я не буду :)

> Result: = GetFileSize (TTextRec (f) .Handle, nil);
Merci Beaucoup very mach! :) Власне це мені і треба було (зараз перевірив, все працює). Ще раз дякую.



сторінки: 1 вся гілка

Форум: "Основна";
Поточний архів: 2004.12.12;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.57 MB
Час: 0.053 c
4-1098688328
VZup
2004-10-25 11:12
2004.12.12
SetWindowText - не надсилається в Edit


1-1101886141
маркерів
2004-12-01 10:29
2004.12.12
База даних


1-1101732165
Bobby Digital
2004-11-29 15:42
2004.12.12
перезапуск


3-1100604655
Stass
2004-11-16 14:30
2004.12.12
Композитний звіт (QR)


14-1100881470
Дефектний
2004-11-19 19:24
2004.12.12
Як позбутися від порносайтів ?!





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська