Вопрос № 46693: Здравствуйте, многоуважаемые эксперты!!!
На самом деле я только начинаю изучать язык Дельфи.
У меня появилась задумка написать базу данных.
Вопрос:
Как програмно считать каталог диска (CD или DVD), и сохранить этот каталог в виде текс...Вопрос
№ 46779: Доброго времени суток уважаемые эксперты.
Надеюсь что вы мне поможете, сессия гороит!!
В приложении нужно ввести пароль,если пароль 3 раза вводится неправильно, то выводится сообщение "Неправильный папроль.Доступ
запрещен". И вот ка...Вопрос № 46791: Здравствуйте Уважаемые Эксперты!
Возможно-ли в Delphi создать большой динамический массив размером Int64, или нет?
Для создания массивов размера Integer, я использовал процедуру SetLenght(array, int).
Для создания массива int64 она не под...
Вопрос № 46.693
Здравствуйте, многоуважаемые эксперты!!!
На самом деле я только начинаю изучать язык Дельфи.
У меня появилась задумка написать базу данных.
Вопрос:
Как програмно считать каталог диска (CD или DVD), и сохранить этот каталог в виде текстового файла в той же директории, где
находится запускной файл?
Отвечает: Bochvarov NikB
Здравствуйте, Герасименко Алексей Анатольевич/Geer!
Как програмно считать каталог диска : посмотри FindFirst, FindLast.
ExtractFilePath(Application.ExeName) ето "той же директории, где находится запускной файл"
Ответ отправил: Bochvarov NikB (статус:
9-ый класс)
Ответ отправлен: 19.06.2006, 13:45 Оценка за ответ: 4
Отвечает: Gh0stik
Здравствуйте, Герасименко Алексей Анатольевич/Geer!
На сколько я понял Вам нужно в файле сохранить только названия вложеных каталогов и файлов из конкретного каталога (простите
за каламбур).
Тогда на мой взгляд проще воспользоваться командой DIR+перенаправление вывода.
Предлагаю сделать это так:
procedure TForm1.Button1Click(Sender: TObject);
var s:string;
begin
s:=Edit1.Text; //каталог который нужно просмотреть (например f: )
ShellExecute(handle,PChar('open'),PChar('cmd'),PChar('/c dir '+s+' /b /og > '+ExtractFilePath(Application.ExeName)+'folder.txt'),nil,SW_HIDE);
end;
--------- Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии
с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус:
Студент)
Ответ отправлен: 19.06.2006, 15:13 Оценка за ответ: 5 Комментарий
оценки: Для работы вашего примера нужен модуль ShellApi. после его подключения пример почему-то не работает: Куда
сохраняется файл folder.txt?
А насчет ссылки мне тоже не совсем понятно: Что это за модуль FillTreeViewWithFiles?
Отвечает: Устинов Сергей Евгеньевич
Здравствуйте, Герасименко Алексей Анатольевич/Geer!
Работа с директориями в Delphi
http://delphiworld.narod.ru/base/work_with_directories.html
Как получить список файлов и поддиректорий в указанной директории
http://delphiworld.narod.ru/base/get_files_and_subdirectories_list.html
Как скопировать директорию с файлами
http://delphiworld.narod.ru/base/copy_dir_with_files.html
Копирование содержимого директории, вместе с поддиректориями
http://delphiworld.narod.ru/base/copy_dirs.html
Удачи!
--------- Ответы на все вопросы - на сайте www.ya.ru
☺
Ответ отправил: Устинов Сергей Евгеньевич
(статус: Студент)
Ответ отправлен: 19.06.2006, 16:41 Оценка за ответ: 5 Комментарий
оценки: Без коментариев...
Вопрос
№ 46.779
Доброго времени суток уважаемые эксперты.
Надеюсь что вы мне поможете, сессия гороит!!
В приложении нужно ввести пароль,если пароль 3 раза вводится неправильно, то выводится сообщение "Неправильный папроль.Доступ
запрещен". И вот как то надо посчитать колво нажатий на кнопку.Вот.
Приложение:
Отправлен: 20.06.2006, 09:59
Вопрос задал: RS2 (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 2)
Отвечает: Устинов Сергей Евгеньевич
Здравствуйте, RS2!
Если Вы описываете переменную i в обработчике нажатия кнопки, то после того, как пользователь нажимает на кнопку,
создается переменная i, ее значение становится равным нулю, т.е. при каждом нажатии кнопки значение переменной i
будет равным нулю.
Чтобы этого избежать, опишите переменную i как глобальную для Вашей Form2?, т.е. там где написано var
Form2: TForm2;
допишите i: integer=0;
Также удалите в обработчике Button1Click обнуление переменной i, т.к. ее начальному значению уже присвоено 0.
Удачи!
--------- Ответы на все вопросы - на сайте www.ya.ru
☺
Отвечает: PheanixN
Здравствуйте, RS2!
Самый простой вариант это объявить глобальную переменную и в неё записывать количество нажатий.
Например:
Приложение:
Ответ отправил: PheanixN (статус:
1-ый класс)
Ответ отправлен: 20.06.2006, 16:46
Вопрос
№ 46.791
Здравствуйте Уважаемые Эксперты!
Возможно-ли в Delphi создать большой динамический массив размером Int64, или нет?
Для создания массивов размера Integer, я использовал процедуру SetLenght(array, int).
Для создания массива int64 она не подходит.
Отвечает: Сухомлин Кирилл Владимирович
Здравствуйте, Панин Алексей!
В обычной Делфи под 32-битную версию windows у вас это даже если бы и получилось, то не получило бы поддержки со стороны
операционной системы. Потому как 32-битная архитектура подразумевает 32-битную адресацию памяти, а вы хотите 64-битную.
Соответственно, вам надо узнать на сайте Borland или еще где-дь узнать о поддержки 64-битной архитектуры со стороны компилятора.
Скорей всего такой поддержки нет потому, что тогда программа будет несовместима с еще популярной 32-битной архитектурой.
В принципе, такие компиляторы, наверное, уже есть, но точно не языка Pascal/Delphi.
Отвечает: Bochvarov NikB
Здравствуйте, Панин Алексей!
А компутер в какую память будет хранит твой масив?
http://support.microsoft.com/default.aspx?scid=kb;en-us;294418
Ответ отправил: Bochvarov NikB (статус:
9-ый класс)
Ответ отправлен: 20.06.2006, 15:22
