VPF::Показать 2ую форму - Форум программистов

neic

Дата 16.12.2009, 11:16 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 839
Регистрация: 28.1.2007

Репутация: нет
Всего: 7

Всю жизнь программировал на VB(6, .NET), а тут для курсовика нужно на Делфи написать.

Решил изучать методом тыка (т.к. с VB6 + Pascal много знаю как всё работает), нужно изучить среду Delphi, вернее как происходит работа между объектами. Всё было хорошо, пока не настало время связать несколько окон. Вот моя проблема:

Нужно из 2ой формы открыть 1ую форму, вот Uses2.pas:

Код


unit Unit2;

interface

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

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

var
  Form2: TForm2;

implementation

uses Unit1;

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);
var
    form1: TForm1;
begin
    form1.Show;
end;

end.

Не ругается, но ни чего не открывает.

Заранее спасибо.

profesiachuvak

Дата 16.12.2009, 11:30 (ссылка)

(голосов:1)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 283
Регистрация: 7.11.2009
Где: Беларусь, Минск

Репутация: 1
Всего: 4

Код


Form1.ShowModal;

--------------------

Закон Мерфи :если есть вероятность того, что какая-нибудь неприятность может случиться, то она обязательно произойдет.

Amphiluke

Дата 16.12.2009, 11:38 (ссылка)

(нет голосов)

Загрузка ...

☽

Профиль
Группа: Завсегдатай
Сообщений: 1253
Регистрация: 26.8.2009

Репутация: 6
Всего: 112

Цитата(neic @ 16.12.2009, 14:16

)

var
form1: TForm1;

Если ваша первая форма создана at design time то объявлять переменную еще раз не нужно. А если форма создается динамически, то она еще и требует инициализации, вызова конструктора.

neic

Дата 17.12.2009, 01:13 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 839
Регистрация: 28.1.2007

Репутация: нет
Всего: 7

Всем спасибо. Разобрался =).

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »