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

Вниз

Как проверить папку на наличие файл с определённым именем........   Найти похожие ветки 

 
RedDragon   (2004-10-07 22:37) [0]

Здравствуйте, друзья! Помогите мне с такой проблемой:
- есть строка TEDIT и Кнопка.
При нажатии на кнопку:
- проверяется, есть ли в папке файл под названием, которое введено в строке, если нет, то в этой папке создаётся файл под названием, которое введено в строке.


 
Okcid   (2004-10-07 23:13) [1]

Если в TEdit введено только имя файла, то в какой папке проверять ево существование? А вообще оно(существование) проверяется функцией FileExists(const FileName: String).


 
RedDragon   (2004-10-08 21:16) [2]

Если папка нахождения проекта делфи - это:
c:\delphi\project\
то надо проверять файлы в папке - c:\delphi\project\namecontrol\...

Я хочу сделать так:
в TEdit вводят Фамилию и Имя, нажимают на кнопку.
елс файл с названием этой фамилии и имени существует, то showmessage("Вы уже голосовали"), если такого файла нет, то
label1.visible:=true;    ...

Если можете сказать, как это сделать - напишите, только как - нибудь попонятнее, с комментариями....


 
begin...end ©   (2004-10-08 21:23) [3]

if FileExists(ExtractFilePath(ParamStr(0)) + "namecontrol\" + EditName.Text) then
 ShowMessage("Вы уже голосовали")
else
 Label1.Visible := True;



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

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

Наверх




Память: 0.47 MB
Время: 0.075 c
3-1096027077
sten
2004-09-24 15:57
2004.10.24
экранирование символов


3-1096054995
wxw
2004-09-24 23:43
2004.10.24
Ошибка при работе с TQuickReport


1-1097130757
lightix
2004-10-07 10:32
2004.10.24
Окно приложения по верх всех окон системы


3-1095956864
Abuzer
2004-09-23 20:27
2004.10.24
Случайный выбор записи


14-1096540499
Sergey_F
2004-09-30 14:34
2004.10.24
Как заблокировать клавиатуру в WinXP?