PHP DM Gate v0.9 » VFD <span class="vd">[Delphi]</span>

vss-sgpb © (17.04.11 18:45) [0]

Нужен исходник, функционально аналогичный VFD (Virtual Floppy Drive), или рекмендации по его написанию.

<Цитата>
Thaddy © (18.04.11 21:42) [1]

There is VFD code in C, but it is a device driver. You can not (easily, there are tricks) write a device driver in Delphi, including KOL.
It requires quite some work including linker issues etc etc.
What is possible is to mount a floppy image as a file in a single process. See what I can do.

<Цитата>
Thaddy © (20.04.11 18:59) [2]

Small code example:

var
hCD, HFile:THandle;
lpSector:Pointer;
dwSize:DWORD;

begin
lpSector := AllocMem(SECTOR_SIZE);

SetFilePointer (hCD, 512 * 4, nil, FILE_BEGIN);
if ReadFile (hCD, lpSector^, dwSize, dwNotUsed, nil) then
WriteFile (hFile, lpSector, dwSize, dwNotUsed, nil);
end.

// ...etc.

<Цитата>
vss-sgpb © (22.04.11 11:13) [3]

Thank you for your help.

<Цитата>