Вниз
Скачать: CL | DM;

Как определить размер пошаренного файла в памяти ...   Найти похожие ветки 

← →
ai   (2002-09-16 07:53) [0]

Как определить размер пошаренного файла в памяти, созданного другой прогой с помощью CreateFileMapping в pagefile? GetFileSize и FileSeek как я понял не могут здесь применяться :(


← →
ai   (2002-09-16 10:07) [1]

Ну че,никто не знает или невозможно???


← →
ai   (2002-09-17 12:06) [2]

Обидно. Обидно, что никто не обратил внимания :(


← →
paul_shmakov ©   (2002-09-18 18:31) [3]

если размер меньше 4Gb, то вот я пример набросал.

//
// mmfsize.dpr
// paul_shmakov
// obtain memory mapped file size
//
program mmfsize;

{$APPTYPE CONSOLE}

uses Windows, Sysutils;

function GetMMFSize(const MMFName: string): DWord;
var
MMFHandle: THandle;
Map: Pointer;
Mbi: MEMORY_BASIC_INFORMATION;
begin
Result := 0;
MMFHandle := OpenFileMapping(FILE_MAP_ALL_ACCESS, false, PChar(MMFName));
if MMFHandle <> 0 then
begin
Map := MapViewOfFile(MMFHandle, FILE_MAP_ALL_ACCESS, 0, 0, 0);
if Assigned(Map) then
begin
VirtualQuery(Map, Mbi, SizeOf(Mbi));
Result := Mbi.RegionSize;
UnmapViewOfFile(Map);
end;
CloseHandle(MMFHandle);
end;
end;

const
MMFName = "MY_MMF";
var
MMFHandle: THandle;
Si: SYSTEM_INFO;
begin
MMFHandle := CreateFileMapping(THandle($FFFFFFFF), nil, PAGE_READWRITE,
0, 1242048, PChar(MMFName));

if MMFHandle <> 0 then
begin
GetSystemInfo(Si);
WriteLn("MMF size aligned to " + IntToStr(Si.dwPageSize) +
" boundary is " + IntToStr(GetMMFSize(MMFName)));
// An output should be 1245184 that"s 1242048 aligned to 4096.
CloseHandle(MMFHandle);
end;
end.


← →
ai   (2002-09-19 09:33) [4]

2paul_shmakov :
Большое спасибо! Я просто был уверен, что это возможно :)) Я думаю, если я скопирую в буфер блок этого размера, то никаких исключений не произойдет.


← →
paul_shmakov ©   (2002-09-19 11:39) [5]

я не уверен, что это будет работать везде, потому как этот способ просто в голову вчера пришел, а не из msdn вычитан.
тестировал только под w2k. нужно еще и под другими версиями проверить.
кстати, чтобы у Вас не было "никаких исключений" всегда создавайте mmf (если, конечно Вы их создаете) с размером, кратным размеру страницы.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c
7-101536
QymL
2002-08-21 20:53
2002.10.31
Не вызывается DLLProc(DLL_PROCESS_DETACH)


1-101281
DeMoN-777
2002-10-17 22:57
2002.10.31
Thread


1-101333
brestmarket
2002-10-20 16:35
2002.10.31
Как записать программу на CD, чтобы ее нельзя было скопировать?


1-101374
3asys
2002-10-21 12:04
2002.10.31
Моделирование design-time в run-time


1-101249
AndreyAG
2002-10-22 10:44
2002.10.31
Чтение с CD




   Наверх