Главная форма

[cashmail]

как сдлелать что бы можно было переназначить главную форму.

Использовал код

Application.MainForm:=Tform2;

а так же

Application.MainForm:=Tform2;
Form2.Show;
Form1.Free;

выдавало ошибку что нельзя изменить значение токо для чтения

[Shinnok91]

только хотел задатьэтот же вопрос. такая же проблема возникла.
14:19
я пробовал что-то менять на юните с названием проекта (то есть типа главном), ничего не получилось.
14:25
но думаю копать надо в ту сторону.то есть изменить значение свойства токо для чтения.
и там уже в коде в нужном месте переназначить форму (ну у кого в каком месте требуется)

Еще раз предупреждаю о необходимости прочтения и соблюдения правил раздела
http://programmersforum.ru/announcement.php?f=2
Прекращайте флудить !

[evg_m]

главная форма, та которая была ПЕРВОЙ создана с помощью
Application.Createform(.....); и менять ее не не надо.
если надо показать форму с паролем
то можно так

if TformPass.GetPass then begin
  application.Createform();
  application.Run;
end;

TformPass =class(TForm)
public
class procedure GetPas: boolean;
end;

class procedure TformPass.GetPass: boolean;
var
  f: TFormPass;
begin
 f:=TformPass.Create(nil);
 if f.showmoadal =mrok then begin
   result:=pass='';
 end
 else 
    result:=false;
 f.free;
end;

[cashmail]

На form2 сделал

procedure TForm2.FormCreate(Sender: TObject);
begin
form2.Visible:=false;
form1.Visible:=false;
end;

Пишет ошибку при чем не синтаксическую!

access violation at adress 0058DAC6 in module 'vcl70.bpl' что то такое! Помогите!!
Мне надо чтобы главная было form2, это я сделал! И чтобы при запуске проекта открывалась form1!

[Человек_Борща]

evg_m, думаю

if TformPass.GetPass then begin

это отламывается за 5 минут.

[cashmail]

ну что не кто не может помочь?

[cashmail]

если надо показать форму с паролем

Мне требуется показывать первую форму поверх второй. просто показывать форму с паролем в данном случае нецелесообразно поскольку в ней выполняется еще несколько процедур необходимых для правильного функционирования программы. так же у первой формы дизайн свой.

[Shinnok91]

Сообщение от cashmail

Пишет ошибку при чем не синтаксическую!
access violation at adress 0058DAC6 in module 'vcl70.bpl' что то такое!

Модуль не может найти, который с именем vcl70.bpl. возможно файл попал в сбойный сектор и не читается. либо случайно стерт хотя это маловероятно.

[lux16]

Хм, переназначит форму можно в опциях проекта Project -> Options, и там перетащить нужную форму на самый верх. Или же в Project -> View Source, и там перетащить создание своей формы на самый верх. Ну или же если не получается, то в onCreate главное форму показать форму ввода пароля, и там уже решать что делать с формой

[evg_m]

procedure TForm2.FormCreate(Sender: TObject);
begin
form2.Visible:=false;//формирование формы еще не закончено => в переменной form2 мусор => AV.
self.visible:=false; // а так сработает
form1.Visible:=false; // а есть уверенность что переменная form1 заполнена т.е. к этому моменту .
выполнено application.crateForm(Tform1, form1);
или form1:=Tform1.Create(...);
end;

Мне надо чтобы главная было form2, это я сделал!

следовательно form1 еще нет. =>мусор =>AV

Мне требуется показывать первую форму поверх второй.

перенесите ваш код из Oncreate в Onshow