Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

Ѓлокируем папку! 


Art   (2001-12-20 16:32) [0]

S1:="D:\test";
H := Integer(CreateFile(PChar(S1), GENERIC_READ, 0 , nil, OPEN_EXISTING, FILE_FLAG_BACKUP_SEMANTICS, 0));
label1.Caption:=inttostr(H);

ќтот код хорошо работает под Ќ’ или •ђ,но не работает в Њ…, как его доработать,чтоб в Њ… работал???



Art   (2001-12-20 16:50) [1]

Извините за кодировку! Этот код хорошо работает под NT или ХР, но не работает в МЕ,как сделать ,чтоб работал в МЕ???




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх






Память: 0.74 MB
Время: 0.021 c
1-22138           Serg5                 2001-12-20 09:22  2002.01.08  
Люди, скажите, а как очистить Image1, функции Clear что то не нашёл...


1-22103           ProfiUgl              2001-12-19 17:15  2002.01.08  
Событие формы


6-22277           prosof                2001-10-02 10:21  2002.01.08  
Определение траффика каждого корреспондента сети по IP.


3-21943           Oleon                 2001-12-05 10:54  2002.01.08  
Как использовать TableLevel?


1-22091           Mikhalyov Dmitry      2001-12-19 16:02  2002.01.08  
вопрос из Pascal