Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2005.12.18;
Скачать: [xml.tar.bz2];

Вниз

Выбор дочерних MDI-окон с помощью набора закладок TabControl. Как   Найти похожие ветки 

 
FShadow   (2005-12-01 12:59) [0]

При выполнении кода...
procedure TformMain.TabControl1Change(Sender: TObject);
begin
   TForm(TabControl1.Tabs.Objects[TabControl1.TabIndex]).Show;
end;

выдается ошибка (дословно)
Project raised exception EAccessViolation with massage "Access violation at address 00458FDA in module... Proces stopped.

Помогите! Что я непарвильно делаю?


 
msguns ©   (2005-12-01 13:13) [1]

>Помогите! Что я непарвильно делаю?

Видимо, все !
А как это: "Выбор дочерних MDI-окон с помощью набора закладок TabControl"

?


 
FShadow   (2005-12-01 13:19) [2]


> Видимо, все !

Очень смешно :(

1. При открытии файла в набор TabControl добавляется новая закладка Tab, а ее заголовок ("caption") устанавливается равным имени открытого файла. Затем форма с помощью команды TabControl.Tabs.AddObject добавляется как объект к TabControl.

При щелчке на TabControl, чтобы иметь доступ к верному файлу, я использую следующий код:
TForm(TabControl1.Tabs.Objects[TabControl1.TabIndex]).Show;

И при выполнении этого кода возникает ошибка.


 
msguns ©   (2005-12-01 13:42) [3]

>FShadow   (01.12.05 13:19) [2]
>Затем форма с помощью команды TabControl.Tabs.AddObject добавляется как объект к TabControl.

Можно отсюда поподробнее ? КАКАЯ ФОРМА ? ОТКУДА ОНА "БЕРЕТСЯ" и т.д.
Лучше всего, конечно, фрагмент кода


 
FShadow   (2005-12-01 14:20) [4]


> КАКАЯ ФОРМА ?

Из главной вызывается

procedure TformMain.ToolButton1Click(Sender: TObject);
begin
  TformKlient.Create(Application);
  TabControl1.TabIndex := TabControl1.Tabs.AddObject("База по клиентам", formKlient)
end;

TabControl1 - находится на главной форме
formKlient - дочерняя форма формы formMain


 
Плохиш ©   (2005-12-01 15:19) [5]

Детский сад право слово :-(

>   formKlient := TformKlient.Create(Application);
>   TabControl1.TabIndex := TabControl1.Tabs.AddObject("База
> по клиентам", formKlient)


 
FShadow   (2005-12-01 15:33) [6]


> Плохиш

Спасибо!
Действительно детский сад:(



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

Форум: "Начинающим";
Текущий архив: 2005.12.18;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.013 c
2-1133178578
alexproger
2005-11-28 14:49
2005.12.18
Проблема с контруктором


8-1121438062
Kerk
2005-07-15 18:34
2005.12.18
Screen Mate


14-1132820924
КаПиБаРа
2005-11-24 11:28
2005.12.18
Изобритаю велосипед


1-1132204080
pAhA
2005-11-17 08:08
2005.12.18
Как можно определить активно ли окно приложения?


14-1133010638
Mike Kouzmine
2005-11-26 16:10
2005.12.18
Японцы посадили спутник на астероид.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский