Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.032 c
1-1098340108
__dmitry
2004-10-21 10:28
2004.11.07
Run time error 216


1-1098532319
span
2004-10-23 15:51
2004.11.07
Как организовать диалог с внешним устройством


8-1091714055
VaKU
2004-08-05 17:54
2004.11.07
Перемотка в DSPack


4-1094197289
Gluk
2004-09-03 11:41
2004.11.07
Загрузка процессора


6-1093602959
maguk
2004-08-27 14:35
2004.11.07
Перечисление сетевых интерфейсов на локальном компьютере.