Código Delphi [-] procedure TPanel_Click(sender : TObject); var nro : integer; begin nro := TPanel(sender).tag; end;
procedure TPanel_Click(sender : TObject); var nro : integer; begin nro := TPanel(sender).tag; end;