procedure TMyForm.MyPanelClick(Sender: TObject);
begin
if Sender is TPanel then
TPanel(Sender).Caption = 'tttt';
end;
и не забыть назначить MyPanelClick всем панелям на OnClick
... << RSDN@Home 1.1 beta 2 >>
— сколько программистов надо чтобы заменить сгоревшую лампочку?
— сколько не бери, а лампочку не поменять — проблема аппаратная, программным путем не решается...
