Welcome to the Lounge

CPallini wrote:

You could do that with a virtual function, couldn't you?

raddevus wrote:

I'm not sure. What is a virtual function?

Quote:

Can you create a virtual function in Arduino code?

raddevus wrote:

What do you think?

raddevus wrote:

When I was in QA if a dev ticked me off, I would just test his code, find a critical bug and then post it Friday afternoon.

raddevus wrote:

What do you think?

BillWoodruff wrote:

I am just "blowing smoke"

honey the codewitch wrote:

Template-instance statics

class API
{
public:

    static void DoThing();

private:

    API();

    static API *_This;
};

API *API::_This = NULL;

void API::DoThing()
{
    if (_This == NULL) _This = new API();
}

template<int A> struct foo final {
    static int value;
};
...

...
foo<1>::value = 5;
foo<2>::value = 4;
printf("%d + %d = %d\n",foo<1>::value,foo<2>::value,foo<1>::value+foo<2>::value);
// prints 5 + 4 = 9

template <uint8_t Pin, uint32_t DebounceMS , bool OpenHigh, size_t Events>
int_button<Pin, DebounceMS, OpenHigh, Events>*
int_button<Pin, DebounceMS, OpenHigh, Events>::m_this = nullptr;

Rectangle r(10, 15, 24, 42);

Rectangle r;
r.left(10).top(15).width(24).height(42);

a^=b^=a^=b;

a^=b;
b^=a;
a^=b;

Private Sub Go(myList as list(of String))
     bgw1.RunWorkerAsync(me,myList)
End Sub

Private Sub bgw1_DoWork(sender As Object, e As DoWorkEventArgs) Handles bgw1.DoWork
  'background thread
   Dim myList As List(Of String) = e.Argument
   Dim listCount As Integer = myList.Count
   'long running process
   For i As Integer = 0 To listCount
      Dim resultInteger = DoWork(myList(i))
      bgw1.ReportProgress(resultInteger,myList(i))
   Next
End Sub

Private Sub bgw1_ProgressChanged(sender As Object, e As ProgressChangedEventArgs) Handles bgw1.ProgressChanged
   'main thread
   Dim p As Integer = e.ProgressPercentage
   Dim s As String = CStr(e.UserState)
   Select Case P
     Case 1
       lbl1.Text = s
     Case 2
       lbl2.Text = s
     Case Else
       lbl1.Text = "Invalid Result for " & s
       lbl2.Text = "Invalid Result for " & s
   End Select
End Sub