Текущий архив: 2004.11.07;
Скачать: CL | DM;
Вниз
FileSize Найти похожие ветки
← →
Constantin (2004-10-19 21:36) [0]Здраствуйте!
Я считываю содержиме документа Ворда:
BegCharRead:=0;
EndCharRead:=100;
block := WordDocument2.Range(BegCharRead,EndCharRead);
в ворде каждый символ я так понимаю - байт памяти. Вопрос: Как узнать размер вордовского файла
и как определить сколько (хоть примерно) в нем инфы не текстовой?
← →
VAmp © (2004-10-22 10:41) [1]Размер можно узнать так (код из моей проги):
var
SearchRec : TSearchRec;
if FindFirst("Путь к файлу"+"\*.*",faAnyFile,SearchRec) = 0 then
begin
if (SearchRec.Name<>".") and (SearchRec.Name<>"..") then
begin
Form1.ListBox1.Items.Add(SearchRec.Name + " " +IntToStr(SearchRec.Size));
Страницы: 1 вся ветка
Текущий архив: 2004.11.07;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.033 c
