Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.12.2009, 16:20   #1
FaTaL
Участник клуба
 
Аватар для FaTaL
 
Регистрация: 09.11.2007
Сообщений: 1,761
По умолчанию TabControlChanging вызов из другой процедуры

Есть процедура procedure TFormTabControlChanging(Sender: TObject; var AllowChange: Boolean);

Как мне вызвать её из другой процедуры, например по ButtonClick?
Пробывал так:
Form.TabControlChanging (Self; true);
Компилятор говорит: [DCC Error] MainUnit.pas(812): E2033 Types of actual and formal var parameters must be identical.

Заранее благодарен за ответ.
FaTaL вне форума Ответить с цитированием
Старый 24.12.2009, 16:33   #2
Dzmitry Loktseu
Пользователь
 
Регистрация: 17.12.2009
Сообщений: 18
По умолчанию

Код:
procedure TForm4.Button1Click(Sender: TObject);
var
  B: Boolean;
begin
  B := True;
  TabControl1Changing(Self, B);
end;

procedure TForm4.TabControl1Changing(Sender: TObject; var AllowChange: Boolean);
begin
  ShowMessage('');
end;
Dzmitry Loktseu вне форума Ответить с цитированием
Старый 25.12.2009, 14:04   #3
FaTaL
Участник клуба
 
Аватар для FaTaL
 
Регистрация: 09.11.2007
Сообщений: 1,761
По умолчанию

Спасибо, работает. А почему нельзя просто написать true, а только через переменную?
FaTaL вне форума Ответить с цитированием
Старый 25.12.2009, 15:08   #4
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

Код:
var 
значит что на самом деле будет передаватся указатель на переменую, поэтому и нужна переменка.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вызов процедуры. Leo20 Общие вопросы Delphi 11 23.11.2009 16:30
Вызов процедуры Kashp Общие вопросы Delphi 4 31.03.2008 16:22
Вызов процедуры Stanislav Общие вопросы Delphi 9 22.11.2007 19:01
Вызов процедуры Илья Кибель Помощь студентам 7 17.09.2007 19:43
Вызов процедуры Monoflextor Общие вопросы Delphi 2 28.04.2007 17:32