![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Код:
unit F_Titul; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, jpeg, ExtCtrls, Buttons, F_Menu; type TForm1 = class(TForm) lbl1: TLabel; img1: TImage; btn1: TBitBtn; btn2: TBitBtn; procedure btn1Click(Sender: TObject); procedure btn2Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation uses Unit2; {$R *.dfm} procedure TForm1.btn1Click(Sender: TObject); begin Form1.Close; end; procedure TForm1.btn2Click(Sender: TObject); begin U_Menu.ShowModal; end; end. Последний раз редактировалось Admin, 09.09.2013 в 09:14. |
#2
|
||||
|
||||
![]() удали отсутствующие модули из uses и обращение к несуществующим объектам.
Пишу программы за еду. __________________ |
#3
|
|||
|
|||
![]() все что есть в uses само вышло, не знаю даже что лишнее(
новичок ![]() |
#4
|
||||
|
||||
![]() дык а что за ошибка то?
Поживу - увижу, Доживу - узнаю, Выживу - учту. ![]() [P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
|
#5
|
||||
|
||||
![]() Предположу, что изначально модуль F_Menu имел имя Unit2. Старое подключение не убрали, а новое добавили - вот и конфликты.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |