Форум: "Основная";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Вниз
Выполнение программы и TEdit Найти похожие ветки
← →
an-na2002 (2004-04-20 10:49) [0]Я ввожу данные через TEdit, как сделать чтобы программа не выполнялась пока TEdit пуста?
← →
an-na2002 (2004-04-20 10:49) [0]Я ввожу данные через TEdit, как сделать чтобы программа не выполнялась пока TEdit пуста?
← →
ssk © (2004-04-20 10:50) [1]что значит "программа не выполнялась"?
← →
ssk © (2004-04-20 10:50) [1]что значит "программа не выполнялась"?
← →
Остап (2004-04-20 10:51) [2]if Edit1.Text="" then exit;
или я чего-то недопонимаю?
← →
Остап (2004-04-20 10:51) [2]if Edit1.Text="" then exit;
или я чего-то недопонимаю?
← →
Smithson © (2004-04-20 10:51) [3]if Edit1.Text = "" then Программа, Стой!!!
← →
Smithson © (2004-04-20 10:51) [3]if Edit1.Text = "" then Программа, Стой!!!
← →
WondeRu © (2004-04-20 10:51) [4]if Edit1.Text <> "" then
begin
...
end;
Угадал?)))
← →
WondeRu © (2004-04-20 10:51) [4]if Edit1.Text <> "" then
begin
...
end;
Угадал?)))
← →
Романов Р.В. © (2004-04-20 10:52) [5]if Trim(Edit1.Text)="" then Exit;
← →
Романов Р.В. © (2004-04-20 10:52) [5]if Trim(Edit1.Text)="" then Exit;
← →
WondeRu © (2004-04-20 10:53) [6]Почему все выбрали в качестве имени "Edit1"? )))))))
← →
WondeRu © (2004-04-20 10:53) [6]Почему все выбрали в качестве имени "Edit1"? )))))))
← →
an-na2002 (2004-04-20 10:53) [7]Я беру имя файла из TEdit. Затем работаю с TStringList.Create и если TEdit пустое программа выдает ошибку, что файла "" нет.
← →
an-na2002 (2004-04-20 10:53) [7]Я беру имя файла из TEdit. Затем работаю с TStringList.Create и если TEdit пустое программа выдает ошибку, что файла "" нет.
← →
Digitman © (2004-04-20 10:54) [8]никак
с момента запуска и до момента завершения программа выполняется, и повлиять на сей факт ты не вправе и не в силах
а вот направить работу алгоритма программы по "нужному руслу" - это пожалуйста, на то программа и существует .. на то и в Делфи, в конечном итоге, и существуют события компонентов и обработчики этих событий
смотри событие TEdit.OnChange
← →
Digitman © (2004-04-20 10:54) [8]никак
с момента запуска и до момента завершения программа выполняется, и повлиять на сей факт ты не вправе и не в силах
а вот направить работу алгоритма программы по "нужному руслу" - это пожалуйста, на то программа и существует .. на то и в Делфи, в конечном итоге, и существуют события компонентов и обработчики этих событий
смотри событие TEdit.OnChange
← →
Smithson © (2004-04-20 10:54) [9]FileExists
← →
Smithson © (2004-04-20 10:54) [9]FileExists
← →
WondeRu © (2004-04-20 10:55) [10]а-а-а-а-а-а-а-а!
if FileExists(Edit1.Text) then
begin
end;
← →
WondeRu © (2004-04-20 10:55) [10]а-а-а-а-а-а-а-а!
if FileExists(Edit1.Text) then
begin
end;
← →
Digitman © (2004-04-20 10:56) [11]
> программа выдает ошибку
что. сама по себе выдает ? или все же в рез-те реакции на нажатие какого-нибудь батона ?
в событии OnChange просто устанавливай св-во Батон.Enabled := Edit.Text <> ""
← →
Digitman © (2004-04-20 10:56) [11]
> программа выдает ошибку
что. сама по себе выдает ? или все же в рез-те реакции на нажатие какого-нибудь батона ?
в событии OnChange просто устанавливай св-во Батон.Enabled := Edit.Text <> ""
← →
Silver Alex © (2004-04-20 11:12) [12]а еще есть компонент TActionList,на событие OnUpdate можно прописать
Button1.Enabled := Edit.Text <> EmptyStr;
← →
Silver Alex © (2004-04-20 11:12) [12]а еще есть компонент TActionList,на событие OnUpdate можно прописать
Button1.Enabled := Edit.Text <> EmptyStr;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Память: 0.49 MB
Время: 0.038 c
