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

Вниз

CD-ROM   Найти похожие ветки 

 
SergeyM   (2004-05-07 20:07) [0]

Народ приветик!  
Чето я в тупике, подскажите как, т.е. с помощью каких функций API или может быть других, уже незнаю, мне добраться до CD-ROMa и прочитать содержимое диска. ShellTreeView не подходит, нужно программным путем. Желательно примерчик или ссылку на ресурс с расшифровкой.


 
Jack128 ©   (2004-05-07 20:09) [1]

createfile/readfile/writefile


 
SergeyM   (2004-05-07 20:37) [2]

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


 
Jack128 ©   (2004-05-07 20:53) [3]

лень :-)  Те обязательно на апи? Стандартные паскалевские процедуры не катят?

var
 f: file;
 s: string;
begin
 AssignFile(f, "d:\test.dat");
 reset(f, 1);
 SetLength(s, FileSize(f));
 BlockRead(f, PChar(s)^, Length(s));
 CloseFile(f);
end;


 
SergeyM   (2004-05-07 21:13) [4]

Да мне в принципе всеравно, т.к. я енто еще ни как делать не умею. Т.е. ни разу не пробовал добраться до CD-ROMa


 
Jack128 ©   (2004-05-07 21:30) [5]


> ни разу не пробовал добраться до CD-ROMa

а ты что, считаешь что файлы на сидюке чем то отличаются от файлов на винте???


 
SergeyM   (2004-05-07 21:43) [6]

Да нет,  я как раз щас пробую так:
сначало GetLocgicalDrives
затем в цикле проверяю СДюшник это или нет
потом наверное через SetCurrentDirectory встану на текущий каталог и в цикле считаю все содержимое диска.
Но на диске ведь дофига всякого мусора, как мне отфильтровать нужные расширения например exe, bmp, jpg,mp3 и др.

Так как ты думаешь так прокатит?


 
Jack128 ©   (2004-05-07 22:08) [7]

сделаешь вот это:

> Да нет,  я как раз щас пробую так:
> сначало GetLocgicalDrives
> затем в цикле проверяю СДюшник это или нет

а теперь уже не важно сидюк это или винт, схема одинаковая

> Так как ты думаешь так прокатит?
пока нет реального кода - не знаю ;-)


 
SergeyM   (2004-05-07 22:23) [8]

Слушай чето я не вкурил а как я узнаю конец диска?


 
Jack128 ©   (2004-05-07 22:27) [9]

в faq ищи пример с FindFirst/FindNext


 
SergeyM   (2004-05-07 22:44) [10]

Как раз я только что енто пробовал, но обломался. Пошел в FAQ.


 
Alex Konshin ©   (2004-05-07 23:45) [11]

FindClose не забудь



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

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

Наверх




Память: 0.49 MB
Время: 0.06 c
4-1083753623
faith
2004-05-05 14:40
2004.06.13
Не работает перехват сообщения


14-1085838902
Guddini
2004-05-29 17:55
2004.06.13
Подскажите, как найти все файлы в папке с заданной маской?


1-1086174121
Aleksandr.
2004-06-02 15:02
2004.06.13
Как задать перечисляемому типу нижнюю границу?


4-1084053583
Мыш
2004-05-09 01:59
2004.06.13
получение иконки не работает


3-1085419286
m2003
2004-05-24 21:21
2004.06.13
База vs. Файл