Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];

Вниз

Помогите со структурой плиз!   Найти похожие ветки 

 
Дмитрий Д.   (2001-12-04 14:35) [0]

Определяю структуру:
WITH SHFileOpStruct DO
BEGIN
Wnd := 0;
wFunc := FO_DELETE;
pFrom := DirName;
pTo := NIL;

//!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
fFlags := FOF_ALLOWUNDO ;

fAnyOperationsAborted := False;
hNameMappings := NIL;
lpszProgressTitle := NIL;
END;

IF SHFileOperation(SHFileOpStruct) <> 0 THEN....

нужно чтобы у fFlags было еще и значение FOF_NOCONFIRMATION
как это написать подскажите?


 
MBo   (2001-12-04 15:06) [1]

скорее всего
fFlags := FOF_ALLOWUNDO+FOF_NOCONFIRMATION


 
Дмитрий Д.   (2001-12-04 15:25) [2]

спасибо Mbo, заработало.
(я пытался AND сделать, не получалось...)
по ходу возник еще вопрос:
при удалении например с Сидюка, естественно вылезает ошибка
как ее заблокировать ?
о том что операция удаления не отработалась я узнаю по
IF SHFileOperation(SHFileOpStruct) <> 0 THEN...
и мне еще одно сообщение об ошибке не нужно, как от него избавиться ?


 
McSimm   (2001-12-04 17:21) [3]

Есть такой флажок : FOF_NOERRORUI. Он не описан в Win32.hlp, однако есть в MSDN. У меня на w2k использование этого флажка приводит к отсутствию сообщений об ошибках.


 
troits   (2001-12-04 19:32) [4]

Зачем + ? Надо or.
+ не будет работать, если flags уже раньше содержал этот флажок.


 
Дмитрий Д.   (2001-12-05 07:22) [5]

McSimm и troits спасибо за помошь. Очень помогли.


 
Anatoly Podgoretsky   (2001-12-05 21:39) [6]

troits © (04.12.01 19:32)
fFlags := FOF_ALLOWUNDO+FOF_NOCONFIRMATION

Какая разница, что до этого содержал fFlags


 
MBo   (2001-12-06 06:34) [7]

дополню AP
or или and надо использовать в таких случаях
fflags:=fFlags or FOF_NOCONFIRMATION;
и
fflags:=fFlags and (not FOF_NOCONFIRMATION);
т.е. когда нужно модифицировать уже существующий набор




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

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

Наверх





Память: 0.45 MB
Время: 0.004 c
1-99958
Romul
2002-01-12 14:28
2002.01.31
Как удерживать бегунок у ScrollBar внизу?


1-99931
starik
2002-01-12 22:40
2002.01.31
Уменьшить размер пикселя


3-99835
Андрей К.
2001-12-25 09:38
2002.01.31
FreeReport для Delphi 6


7-100073
Serega_2
2001-10-15 11:37
2002.01.31
Помогите плз програмно прибить досувскую программу.


3-99860
Nimnul
2001-12-26 08:49
2002.01.31
Вопром по DBF таблицам...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский