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

Вниз

Вопрос по TFileStream.Create   Найти похожие ветки 

 
Dennis S   (2003-01-03 10:01) [0]

При выполнении в Win"98 и WinME
fs := TFileStream.Create(OpenF.FileName, fmOpenRead, fmShareDenyNone); все пучком, а под Win"2К, при открытии начинает исчезать свободное место на диске(на размер выбранного файла)... :(
Кто-нить знает ПОЧЕМУ и как этого избежать?


 
Anatoly Podgoretsky   (2003-01-03 10:05) [1]

У TFileStream.Create всего два параметра


 
Dennis S   (2003-01-03 10:08) [2]

Ты имеешь в виду, что у меня мало или много (параметров)?


 
Anatoly Podgoretsky   (2003-01-03 10:12) [3]

Ну я думаю ты можешь сам посчитать количество приведенных тобой параметров и сделать вывод мало их или много. Но если не справишься, то спрашивай еще.


 
Dennis S   (2003-01-03 10:43) [4]

Ну да, в хелпе вроде только 2...
Поставил
fs := TFileStream.Create(OpenF.FileName, fmOpenRead or fmShareDenyRead);
Вроде работает (но сообщения об ошибках при доступе к файлу изменились)
Хотя, то что писал с начала, было взято с какой-то конфы или FAQ
Не могу сейчас проверить под Win2K...


 
Anatoly Podgoretsky   (2003-01-03 10:47) [5]

Ну нам не видно, какие тебе там ошибки выдает, также и остальная часть кода, зато сейчас приведенная часть правильная.


 
Dennis S   (2003-01-03 11:20) [6]

Тогда такой вопрос:
почему со старым кодом ("неправильным") под Win98 и WinME все "пахало", а под Win2K рос какой-то temp-файл или еще что-то неадекватное...?


 
Anatoly Podgoretsky   (2003-01-03 11:25) [7]

Со старым кодом у тебя и откиомпилороваться бы не смогло


 
Dennis S   (2003-01-03 11:28) [8]

Однако откомпелировалось и работало - ФАКТ!
???


 
Dennis S   (2003-01-03 11:32) [9]

Потому как есть 3 вида c TFileStream.Create
1: (FileName, Mode)
2: (FileName, Mode, Rights)
3: (AHandle)

так-то вот...
Сначало, значит был вариант 2, сейчас - 1...


 
Anatoly Podgoretsky   (2003-01-03 11:36) [10]

Возможно, что в Д6 появились перекрытые функции


 
Dennis S   (2003-01-03 11:55) [11]

Может быть это было из-за этого:
[Warning] main.pas(67): Symbol "fmShareDenyRead" is specific to a platform
???


 
Dennis S   (2003-01-03 11:59) [12]

Это относится к 2: (FileName, Mode, Rights)
fs := TFileStream.Create(OpenF.FileName, fmOpenRead, fmShareDenyRead);

1-ый вариант...
fs := TFileStream.Create(OpenF.FileName, fmOpenRead or fmShareDenyRead);
...проходит без сообщений компилятора



 
Dennis S   (2003-01-03 12:01) [13]

Извиняюсь, сообщение и в том и в другом варианте..... :(



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

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

Наверх




Память: 0.46 MB
Время: 0.008 c
14-37302
Дмитрий К.К.
2002-12-23 14:44
2003.01.13
Формат RTF


3-36989
Fishka
2002-12-18 16:11
2003.01.13
Заполнение Мемо-поля через DBMemo


3-36932
Карелин Артем
2002-12-17 15:57
2003.01.13
Дятел, феникс, интербаза...


1-37183
Armageddon
2002-12-28 15:23
2003.01.13
Тип файла


3-36955
Mr.Hunter
2002-12-18 09:10
2003.01.13
Быть InterBase или не быть, вот в чем вопрос!





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский