| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

InputQuery и PasswordChar [D6, WinXP]

AndreySoft ©   (2005-01-06 13:00:00) 

В событии OnShow главной формы пишу:
...
InputQuery('Ввод пароля','Введите пароль:',tmppass);
...
Всё происходит так как мне и надо - форма ещё не появилась и выскакивает запрос на ввод пароля.
Всё было бы ничего, да вот TEdit этого InputQuery не имеет свойства PasswordChar:='*'; и толку от этого запроса никакого.
Подскажите, можно ли в процессе программы изменить свойство PasswordChar этому Edit'у из этого InputQuery и как.

если нет, то я попробывал вызывать уже созданную форму кодом
...
FormEnterPassword.ShowModal;
...
Звучит глупо, но почему то не хочет работать, говорит что типа Read of address 00000000.
Странно но раньше когда я пробывал применять этот ShowModal - всё работало.

---

AndreySoft   (2005-01-06 15:01:00) [1]

блин, прикол заключался в том что у главной формы нужно было установить значение Visible в False :-)

---

AndreySoft   (2005-01-06 14:53:00) [2]

хорошо... сделал как Вы предложили.
вот так у меня выглядит код *.dpr
program PDD_Server;

uses
 Forms,
 Unit1 in 'Unit1.pas' {Form1},
 Unit2 in 'Unit2.pas' {FormComps},
 Unit3 in 'Unit3.pas' {FormPassword},
 Unit4 in 'Unit4.pas' {FormEnterPassword};

{$R *.res}

begin
 Application.Initialize;
 Application.ShowMainForm:=False;
 Application.CreateForm(TForm1, Form1);
 Application.CreateForm(TFormComps, FormComps);
 Application.CreateForm(TFormPassword, FormPassword);
 Application.CreateForm(TFormEnterPassword, FormEnterPassword);
 Application.Run;
end.

Надеюсь здесь я указал эту строчку до создания всех процедур?

Всё равно появляетсяглавная форма

---

VMcL   (2005-01-06 14:41:00) [3]

>> AndreySoft  (06.01.05 14:37) [3]

Указанную строку следует написать до создания любой из форм, а не в OnCreate.

---

AndreySoft   (2005-01-06 14:37:00) [4]

Вы не поверите, но когда я написал в OnCreate главной формы:
...
Application.ShowMainForm:=False;
...
как и советовали в ссылке указанной чуть выше,
то программа просто проигнорировала эту строчку и показала мне главную форму.

---

AndreySoft   (2005-01-06 14:29:00) [5]

а с InputQuerry ничего нельзя сделать?

---

Leshiy   (2005-01-06 14:07:00) [6]

http://www.nmarket.ru/program/delphi/lessons-2/les-14.php

---

Наверх