Delphi, как изменить код, что бы после отмены, форма зыкрывалась?

StasDerkach, 286 просмотров

-1

procedure TfrmClothes.btnCancelClick(Sender: TObject);
begin
dmShop.dsrClothes.DataSet.Cancel
end;
end

Примечание:
если прописать кнопке такой код, то закроет, как его (код) туда вставить, что бы ошибок не вылетало

procedure TfrmClothes.btnCancelClick(Sender: TObject);
begin
frmAdd.close
end;
end

Примечание:
после отмены, вы код смотрели?
procedure TfrmClothes.btnCancelClick(Sender: TObject);
begin
dmShop.dsrClothes.DataSet.Cancel
end;
procedure TfrmClothes.btnCancelClick(Sender: TObject);
begin
frmAdd.close;
end;
end.
Это ошибка

Ответы:

Dolgushinlev

что то не понял вопроса, у тебя есть кнопка отмена? вызови процедуру
formX.close(sender);
или как-то так

الشيطان شر

procedure TfrmClothes.btnCancelClick(Sender: TObject);
begin
Application.Terminate;
end;

uncleMaster

procedure TfrmClothes.btnCancelClick(Sender: TObject);
begin
frmAdd.close; // тут надо добавить точку с запятой =)
end;
end

12 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.