|
Example (in Delphi):=0D
=0D
===============cur.dpr================0D
program cur;=0D
{$APPTYPE CONSOLE}=0D
const=0D
FileName='file.cur';=0D
Len=6;=0D
Buf=#$00#$00#$01#$00#$00#$00;=0D
var=0D
F:File;=0D
begin=0D
AssignFile(F,FileName);=0D
Rewrite(F,1);=0D
BlockWrite(F,Buf,Len);=0D
CloseFile(F);=0D
end.=0D
===============cur.dpr================0D
=0D
1) Compile and Run "cur.dpr" with Delphi=0D
2) Open "file.cur" with InfanView