Заметил тут недавно странный баг или так и должно быть?
Код Delphi для копирования файла на КПК (использование библиотеки RAPI.DLL):
procedure TForm1.Button1Click(Sender: TObject);
var
sTemplate:TStringList;
HDes:THandle;
o1:Poverlapped;
BytesWritten:DWORD;
begin
sTemplate:=TStringList.Create;
sTemplate.LoadFromFile('test.xml');
cerapiinit;
HDes := CeCreateFile ('\ipaq file store\test.xml',Generic_Write,File_Share_Write,nil,Create_Always,0,0);
CEWriteFile(HDes,PChar(sTemplate.Text),Length(sTemplate.Text),BytesWritten,@o1);
CECloseHandle(HDes);
CERapiUninit;
showmessage('Скопировано: '+inttostr(BytesWritten) + ' байт');
end;
Обратите внимание на выделенную строку и первый параметр ф-ии CECreateFile... Правильно, это значит создать файл test.xml в ПЗУ.
А теперь попробуем изменить путь так:
HDes := CeCreateFile ('\test.xml',Generic_Write,File_Share_Write,nil,Create_Always,0,0);
Программа выдает сообщение, что скопировано 0 байт. И на КПК создается пустой файл. ПОЧЕМУ?
Спецы подскажите, что за ниппель?
Дело в том, что первая выделенная строка вполне адекватно копирует файл в ПЗУ (файл не пустой), а вот если вместо нее влепить че-нить другое \test1.xml, то прога просто создаст пустой файл т.е. функция CEWriteFile работает только через ПЗУ! Вчера сидел сmokaton писал(а):А ты не думал потому что у тебя как раз и создается пустой файл!?:)
и диву давался, почему прога вдруг не копирует, а просто создает пустышки! В принципе я нашел решение проблемы - копирование в ПЗУ, а затем перемещение ф-ей CEMoveFile куда нужно, но все ровно очень интересно! Спецы просветите!