![]() |
Как мне из другой процедуры вызвать
процедуру BitbtnXXXClick? Что писать в скобках вместо Sender: TObject? |
ToX
в хелпах вроде бы было про вызов процедур и функций че за странная процедура? |
Ну т.е. *мне надо из другой процедуры вызвать выполнение процедуры нажатия какой либо кнопки.
[s]Исправлено: ToX, 17:40 27-06-2004[/s] |
ToX
попробуй просто без параметров, или в скобках nil пропиши. На худой конец Label создай в том месте, куда надо вызывать... |
Ругается:
This form of method call only allowed for class methods |
ToX
ну тогда попробуй то, что выполняется при нажатии кнопки, определить как procedure, и вызывай при нажатии на кнопку, и когда еще нужно будет.:gigi: |
ToX
Эта процедура является членом класса. Если кнопка у тебя расположена на форме Form1, а ты вызываешь процедуру нажатия не из процедур-членов TForm, то необходим следующий вызов: Form1.BitbtnXXXClick(...). А вместо Sender подставь Form1.BitbtnXXX :) [s]Исправлено: shurikan, 17:05 28-06-2004[/s] |
... а я в таких случаях вместо sener пишу SELF. Типа сама себя :)
|
Tkz
|
Если я правильно понял то тебе надо нажать на одну кнопку, а вызывалась другая процедура? Если да, то так:
Button10Click(Button11); где Button11 - по которой ты жмешь (ака отправитель) Button10 - Вторая кнопка. Получается хоть по одной хоть по длругой кнопки жмешь, все равно одно и то же :) |
procedure TForm1.Button1Click(Sender: TObject);
begin ShowMessage('нажал'); end; procedure TForm1.Button2Click(Sender: TObject); begin Button1.Click; end; Так не подойдёт? |
Время: 20:53. |
Время: 20:53.
© OSzone.net 2001-