Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Ошибка при вызове процедуры, Объявляю процедуру и не могу её вызвать 
V
    Опции темы
kulikoff
Дата 15.1.2007, 12:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 334
Регистрация: 5.11.2005
Где: Киев

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



Объявляю процедуру ClickFind
Код

  private
    { Private declarations }
  public
    { Public declarations }
    procedure ClickFind(Sender: TObject);


Тело процедуры:
Код

procedure TForm15.ClickFind(Sender: TObject);
begin
  sRadioButton1.Visible:=false;
  sRadioButton2.Visible:=false;
end;


При вызове 
Код

procedure TForm15.sBitBtn2Click(Sender: TObject);
begin
  if (not sRadioButton1.Checked) and (not sRadioButton2.Checked) and (not sRadioButton3.Checked) then
    ShowMessage('Оберіть режим вибору!');
  if sRadioButton1.Checked then
    begin
      Form15.ClickFind;
    end;


Выдает ошибку 
Код

Not enough actual parametrs

Как актуальных параметров ему не хватает? Помогите, плиз!!!
PM MAIL WWW ICQ Skype   Вверх
Nicholas_S
Дата 15.1.2007, 12:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


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

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



дык, тебе ж компилятор русским английским языком написал.

Хотя бы так:
Код

if sRadioButton1.Checked then
    begin
      Form15.ClickFind(nil);



--------------------
...все в мире относительно
PM   Вверх
kulikoff
Дата 15.1.2007, 12:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 334
Регистрация: 5.11.2005
Где: Киев

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



Работает))) Спасибо. А можно пояснить, на фиг ему этот nil? Откуда он взялся?
PM MAIL WWW ICQ Skype   Вверх
Yanis
Дата 15.1.2007, 12:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2937
Регистрация: 9.2.2004
Где: Москва

Репутация: 72
Всего: 111



Цитата(kulikoff @  15.1.2007,  13:38 Найти цитируемый пост)
А можно пояснить, на фиг ему этот nil?

Потому что ты сделал такое объявление процедуры smile
Сделал бы просто:
Код
  private
    { Private declarations }
  public
    { Public declarations }
    procedure ClickFind;


А nil, это типа мы передаём в процедуру ссылку на объект который эту процедуру вызвал. Вообще то чаще всего это НЕ nil smile


--------------------
user posted image *щёлк*
PM MAIL WWW ICQ   Вверх
MetalFan
Дата 15.1.2007, 13:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Аццкий Сотона
****


Профиль
Группа: Комодератор
Сообщений: 3815
Регистрация: 2.10.2006
Где: Moscow

Репутация: 62
Всего: 128



+ ко всему вышесказанному.
некрасиво напрямую вызывать обработчики событий.


--------------------
There are always someone smarter than you...
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

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


 




[ Время генерации скрипта: 0.0527 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.