Главная страница
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.041 c
3-1096381802
LamLam
2004-09-28 18:30
2004.10.24
FireBird embedded - ну никак не хочет...


3-1096274444
Bless
2004-09-27 12:40
2004.10.24
Как восстановить удаленную таблицу!


6-1092435813
KILLMAN
2004-08-14 02:23
2004.10.24
Дескриптор сокета


4-1095455747
НовичОк
2004-09-18 01:15
2004.10.24
Иконки на рабочем столе


3-1096365087
MakNik
2004-09-28 13:51
2004.10.24
текст SQL ошибки в приложении