Скачать: CL | DM;

InputQuery и PasswordChar   Найти похожие ветки 

← →
AndreySoft   (2005-01-06 13:00) [0]

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

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

---

← →
Leshiy ©   (2005-01-06 14:07) [1]

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

---

← →
AndreySoft   (2005-01-06 14:29) [2]

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

---

← →
AndreySoft   (2005-01-06 14:37) [3]

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

---

← →
VMcL ©   (2005-01-06 14:41) [4]

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

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

---

← →
AndreySoft   (2005-01-06 14:53) [5]

хорошо... сделал как Вы предложили.
вот так у меня выглядит код *.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.

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

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

---

← →
AndreySoft   (2005-01-06 15:01) [6]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.025 c