Форум: "Начинающим";
Текущий архив: 2009.12.20;
Скачать: [xml.tar.bz2];
ВнизОптимальный метод передачи значения компонента процедуре Найти похожие ветки
← →
kesha (2009-11-01 15:21) [0]К примеру процедура в ней я передаю настройки одного из оконного компонента
procedure TForm1.MyComponent (rect: TRect; AHandle: HWND; ATabOrder: TTabOrder; AEnabled: Boolean);
begin
///
end;
Если передавать конкретный компонент то я обхожусь без лишней писаниныprocedure TForm1.MyComponent (APanel: TPanel);
begin
///
end;
Думаю вопрос простой но ответа на него
Так можно ли передать процедуре любой оконный компонент для дальнейшей обработки приведенных выше свойств этого компонента
← →
Плохиш © (2009-11-01 16:05) [1]Передаваемый параметр описать типом предка всех желаемых компонентов.
← →
Юрий Зотов © (2009-11-01 16:13) [2]То есть:
procedure TForm1.MyComponent(Control: TWinControl);
← →
Фуфик (2009-11-01 16:52) [3]Да я уже нашел как раз перепробовал вот и ищу подходящие для себя
TControl, TWinControl, TCustomControl.
Как то тупа пытался осуществить вот так:type
AComponents = record
AButton: TButton;
APanel: TPanel;
AMemo: TMemo;
End;
procedure TForm1.MyComponent(AComponent: AComponents, X: Integer);
begin
///
end;
← →
Фуфик (2009-11-01 16:55) [4]Знаю нарушил правила
Извините предедушее писал с работы, а шас с дома пишу
← →
Юрий Зотов © (2009-11-01 16:58) [5]> Фуфик (01.11.09 16:52) [3]
> ищу подходящие
Тут не надо искать. Вам нужен хэндл окна - значит, однозначно TWinControl. Это самый "старший" класс оконных компонентов.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2009.12.20;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.004 c