Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
4E4EN
0 / 0 / 2
Регистрация: 13.09.2014
Сообщений: 70
1

Если существует определенный файл, то выполнить заданное действие

19.10.2014, 02:57. Просмотров 474. Ответов 4
Метки нет (Все метки)

Как зделать так чтобы, есть определёный фаил по пути например D:\123.txt
И когда в проекте нажимаеш на кнопку проект ишет фаил, если находит то праисходит нужная команда например
m1.Clear;

плиз помагите буду благодарен
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.10.2014, 02:57
Ответы с готовыми решениями:

Если TMemo не пуст, то выполнить действие
как сделать если текст в мемо 1, то выполнять действие? procedure...

Если значение Label1 = 0, то выполнить определенный код
Мне надо сделать примерно такое если значение label1 - 0 тогда Begin ... end;

Если последний символ в Edit - точка, то выполнить действие
Если в конце строки эдит стоит точка то а:=1; Если нет то а остается какой была.

Нужно проверить существует ли определенный объект, и после этого выполнить действие, если он есть
Доброе время суток! Возникла у меня потребность проверить существует ли объект определенный и...

Если h-файл существует, подключить его, если не существует, проигнорировать
Как это сделать?

4
Пытливый
1472 / 760 / 275
Регистрация: 29.05.2013
Сообщений: 3,572
19.10.2014, 10:06 2
зделать, нажимаеш, фаил, ишет, праисходит, помагите
Если вам действительно 14 лет, то это просто беда.
Собственно вы чего хотите добится-то? Ибо то что вы описали довольно бессмысленно.
Если вопрос в том, как загрузить в мемо текст и затем его там стереть - то так:
Delphi
1
2
Memo1.Lines.LoadFromFile('D:\123.txt');
Memo1.Clear;
Но смысл этой операции от меня ускользает.
1
4E4EN
0 / 0 / 2
Регистрация: 13.09.2014
Сообщений: 70
21.10.2014, 01:54  [ТС] 3
спасибо, мне не нужно просто чтобы memo1 очишал, я это к примеру привёл
0
northener
пофигист широкого профиля
3510 / 2383 / 645
Регистрация: 15.07.2013
Сообщений: 14,252
21.10.2014, 02:00 4
Цитата Сообщение от 4E4EN Посмотреть сообщение
Как зделать
Сделать пишется через "С", а не через "З".
Цитата Сообщение от 4E4EN Посмотреть сообщение
когда в проекте нажимаеш на кнопку проект ишет фаил, если находит то праисходит нужная команда
Delphi
1
if FileExists(D:\123.txt) then //праисходит нужная команда
1
4E4EN
0 / 0 / 2
Регистрация: 13.09.2014
Сообщений: 70
21.10.2014, 02:01  [ТС] 5
а как memo1 очистить это я знаю
0
21.10.2014, 02:01
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.10.2014, 02:01

Удалить файл, если он существует, и создать файл, если он не существует
Помогите, два скрипта по созданию и удалению файла Dim FSO, MyFile Set FSO =...

Действие через определенный промежуток времени, если не было отмены
Как сделать программу через ветвление с таймером, по окончанию действия которого происходило бы...

Как открыть файл на чтение и запись, создав его, если его не существует, и перезаписать, если он существует?
Как открыть файл на чтение и запись, создав его, если его не существует, и перезаписать, если он...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.