Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.12.02;
Скачать: CL | DM;

Вниз

Отображение прогресса при LoadFromFile и SaveToFile   Найти похожие ветки 

 
leonidus   (2007-11-06 10:54) [0]

Т.к. в процессе работы программы необходимо загружать и записывать довольно объемные графические файлы, то эти операции могут длится заметное время, в связи с чем вопрос как в ходе записи или загрузки файла отобразить прогресс, ведь например стандартная процедура LoadFromFile выглядит следующим образом:

procedure TGraphic.LoadFromFile(const Filename: string);
var
 Stream: TStream;
begin
 Stream := TFileStream.Create(Filename, fmOpenRead or fmShareDenyWrite);
 try
   LoadFromStream(Stream);
 finally
   Stream.Free;
 end;
end;

никаких циклов тут нет, так к чему же привязать прогресс?


 
Сергей М. ©   (2007-11-06 11:10) [1]


> к чему же привязать прогресс?


К вирт.методу Read, перекрытому в своем наследнике класса TFileStream


 
leonidus   (2007-11-06 12:33) [2]

А можно примерчик?


 
Сергей М. ©   (2007-11-06 12:34) [3]

Что не понятно ?


 
leonidus   (2007-11-06 12:50) [4]

Как перекрывать, я слабо разбираюсь в ООП.


 
clickmaker ©   (2007-11-06 13:05) [5]


> я слабо разбираюсь в ООП

книжку купи.

type
 TMyFileStream = class(TFileStream)
 protected
    function Read(var Buffer; Count: Longint): Longint; override;



Страницы: 1 вся ветка

Текущий архив: 2007.12.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.024 c
15-1194249314
Галинка
2007-11-05 10:55
2007.12.02
Указатель на функцию в Си


4-1177050445
vann
2007-04-20 10:27
2007.12.02
Как программно заменить выделенный текст в окне другого приложени


3-1184763707
tiktak
2007-07-18 17:01
2007.12.02
Преимущества создания баз данных при помощи MS Access и Delphi


15-1193636264
boriskb
2007-10-29 08:37
2007.12.02
Сниму 2-х комнатную в Москве.


5-1163595817
Vladix
2006-11-15 16:03
2007.12.02
Прозрачный компонент (наследник TWinControl)