Форум: "Начинающим";
Текущий архив: 2006.01.08;
Скачать: [xml.tar.bz2];
Вниз
Простой вопрос! Найти похожие ветки
← →
newhite © (2005-12-21 01:20) [0]Это обработчик кнопки ОК в форме входа в систему, где едит1-логин, а едит2-пароль. Что нужно дописать чтобы при неправильном сочетании логин/пароль вылезало сообщение о том что программа будет закрыта?
procedure TVhodForm.Button1Click(Sender: TObject);
begin
if (Edit1.Text="1") and (edit2.Text="1") then
GlavForm.N3.visible:=true;
GlavForm.N6.visible:=true;
VhodForm.Close;
end;
← →
з. танька (2005-12-21 01:25) [1]procedure TVhodForm.Button1Click(Sender: TObject);
begin
if (Edit1.Text="1") and (edit2.Text="1") then
begin
GlavForm.N3.visible:=true;
GlavForm.N6.visible:=true;
VhodForm.Close;
end
else begin
ShowMessage("не знаем такого. гуляйте, гражданин");
Application.Terminate;
end;
end;
← →
newhite © (2005-12-21 01:47) [2]неа :( ругается на Else. выдает ошибку: [Error] Unit4.pas(55): ";" not allowed before "ELSE"
← →
з. танька (2005-12-21 01:56) [3]
> newhite © (21.12.05 01:47) [2]
блин, скопируй текст из мово примера.. копи-пастом. ты там поставила точку с запятой перед else. а перед ним её ставить нельзя. о чем тебе компилятор и сказал.
а вообще, учи английский! полезно бывает, да :)
← →
newhite © (2005-12-21 02:02) [4]спасибо :) просто голова вообче уже не работает.
← →
Германн © (2005-12-21 02:19) [5]2 з. танька
А почему з. ?
Или злобная только к мужикам? :-)
← →
з. танька (2005-12-21 15:51) [6]
> Германн © (21.12.05 02:19) [5]
а гм компутер поменялся пароль забыла!
вот так бывает, да...
← →
Tonich © (2005-12-21 16:38) [7]
> з. танька (21.12.05 01:56) [3]
да лихо ты ее, но насколько я помню сама недавно в начинающих задавала вопросы...
уже научилась хде точку с запятой ставить ?:))
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.01.08;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c
