Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.12.04;
Скачать: CL | DM;

Вниз

Ошибка 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 вся ветка

Текущий архив: 2005.12.04;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.055 c
2-1132047340
NFM
2005-11-15 12:35
2005.12.04
indy10


2-1131952549
alexus
2005-11-14 10:15
2005.12.04
Проблемы с установкой


2-1132479584
Mak55
2005-11-20 12:39
2005.12.04
формуа Arccos в Делфи


14-1131694407
MBo
2005-11-11 10:33
2005.12.04
Немножко пятничных задачек ;)


2-1132322989
tq
2005-11-18 17:09
2005.12.04
Screensaver