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

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

Порядок форм [D7, XP]


lewka-serdceed ©   (2008-04-18 17:42:00) 

Подскажите пожалуйста вот в такой ситуации:
Есть две формы Form1 и Form3. первой открывается Form1, а должна первая открываться форма Form3 и при нажатии на ней кнопки должна закрыться и открыться Form1. я не знаю как установить порядок открывания форм. Помогите пожалуйста!!!!


lewka-serdceed   (2008-04-19 15:39:00) [1]

спасибо все получилось


sniknik   (2008-04-19 15:35:00) [2]

> А теперь добавил форму и надо чтобы с этой добавленной формы все начиналось
ну так поставь в проекте создание этой формы первым. с первой все и начинается.


lewka-serdceed   (2008-04-19 14:52:00) [3]

в проект забыл вставить


Оригинал   (2008-04-18 21:24:00) [4]


> я просто забыл вставить форму


Куда ты её забыл вставить?


{RASkov}   (2008-04-18 21:18:00) [5]

> [5] lewka-serdceed   (18.04.08 20:02)

В опциях проекта выставь главную форму.... или в файле проекта *.dpr...


lewka-serdceed   (2008-04-18 20:02:00) [6]

я просто забыл вставить форму. А теперь добавил форму и надо чтобы с этой добавленной формы все начиналось


ZENsan   (2008-04-18 19:27:00) [7]

Удалено модератором


easy   (2008-04-18 19:01:00) [8]

program Project1;

uses
 Forms,
 Unit1 in 'Unit1.pas' {Form1},
 Unit2 in 'Unit2.pas' {Form2},
 Unit3 in 'Unit3.pas' {Form3};

{$R *.res}

begin
 Application.Initialize;
 Application.CreateForm(TForm3, Form3);
 Application.CreateForm(TForm1, Form1);
 Application.CreateForm(TForm2, Form2);
 Application.Run;
end.

unit Unit3;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls;

type
 TForm3 = class(TForm)
   Button1: TButton;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form3: TForm3;

implementation

uses Unit1;

{$R *.dfm}

procedure TForm3.Button1Click(Sender: TObject);
begin
 Form1.Show
end;

end.


Kolan   (2008-04-18 17:56:00) [9]

> я не знаю как установить порядок открывания форм.

Запрограммировать.


> а должна первая открываться форма Form3

Тут ниче не понятно. Почему должна? Если должна, то почему не открывается?

Давайте код с объяснением.


{RASkov}   (2008-04-18 17:49:00) [10]

> [0] lewka-serdceed   (18.04.08 17:42)
> Есть две формы Form1 и Form3. первой открывается Form1,
> а должна первая открываться форма Form3

Ничего непонял... :(
Может у тебя вопрос о главной форме проекта?.... давай яснее


Наверх

Титульная страница Поиск, карта сайта Написать письмо