Форум: "WinAPI";
Текущий архив: 2005.12.04;
Скачать: [xml.tar.bz2];

Вниз

Ошибка API ф-ии библиотеки RAPI.DLL?   Найти похожие ветки 

← →
XGarik ©   (2005-09-30 12:04) [0]

Доброго времени суток!

Заметил тут недавно странный баг или так и должно быть?

Код 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 байт. И на КПК создается пустой файл. ПОЧЕМУ?

//Этот пост я уже делал, но он был закрыт! Приношу свои извинения модератору, за неправильно сформулированную тему! :)

---

← →
jack128 ©   (2005-09-30 17:02) [1]

GeGetLastError что говорит??

---

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

Форум: "WinAPI";
Текущий архив: 2005.12.04;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.026 c