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

Вниз

Парочка вопросов   Найти похожие ветки 

 
AMQ   (2002-05-01 16:04) [0]

1) Допустим я хочу проверить, есть ли в какой-либо папке JPG. Задаю: FileSearch("*.jpg","FolderName"). А если в этой папке есть ещё папка, а там ещё и т.д. как матрёшка, как искать jpg в них. (при условии, что известно только имя исходной папки).
2)Как узнать сколько на компе винчестеров и под какими они именами?
3)Имеется ListBox1 и Button1. Как по нажатию Button1 в ListBox1 вывести список всех приложений (заголовки), которые сейчас запущены в Windows, включая те, которые сидят в System Tray"e?


 
PaRL ©   (2002-05-01 18:30) [1]

2) Честно говоря я не знаю как это определить программно, но можно поместить DriveComboBox и у него через Items.
PS Страница Win3.1


 
~Sergius   (2002-05-01 19:15) [2]

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


 
Song ©   (2002-05-01 19:58) [3]

1. TSearchRec
3. EnumWindows()


 
Almaz ©   (2002-05-02 00:00) [4]


>AMQ (01.05.02 16:04)
> 2)Как узнать сколько на компе винчестеров и под какими они
> именами?


Следующая функция определяет сколько логических жестких дисков на компьютере.

function HowManyHardDrives: Integer;
var
Ch: Char;
begin
Result := 0;
for Ch := "A" to "Z" do
if GetDriveType(PChar(Ch + ":\")) = DRIVE_FIXED then
Inc(Result);
end;


Удачи.



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

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

Наверх




Память: 0.47 MB
Время: 0.008 c
3-49864
PepperLover
2002-04-19 11:50
2002.05.16
ADO - выбор стратегии


4-50161
Vlad_NOJB
2002-03-14 19:38
2002.05.16
Как определить virtual-key code?


3-49826
ao1973
2002-04-18 11:55
2002.05.16
Друзья как найти нормальную! документацию по АДО


1-50044
altukhov_denis
2002-05-02 10:20
2002.05.16
Создание hlp файла


1-50057
turonix
2002-05-02 15:33
2002.05.16
Как в подпрограмму передать динамический двумерный массив и вичис