Форум: "Система";
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];
Внизплиз Найти похожие ветки
← →
Dimanych (2001-10-30 09:29) [7]Ты все-таки чуть-чуть обшибся с терминологией.
Мне кажется, что тебе нужно окно, в котором есть два компонента: TEdit(имя пользователя) и TMaskEdit(пароль). Вместо TEdit можно использовать TDBCombobox. Только нужно узнать как его подключить к Access. Окно делаешь обычным юнитом, а в очереди его ставишь вторым. В своем юните в разделе interface создаешь константу mrError = -20 (любое число меньшее -8). При неправильном ответе на пароль пишешь перед выходом ModalResult := mrError. А дальше в файле .dpr ты пишешь
project My;
uses .......;
begin
Application.Initialize;
...
CreateForm (твое окно);
if ТвоеОкно.ShowModal in [mrCancel, mrError] then
Application.Close;
или
begin
ТвоеОкно.Close;
ГлавноеОкно.Close;
end;
дальнейший текст программы.
end.
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.05 c