Have you tried to "bias" the labels in the row and to make them a little bit larger?
lblEAN.SetTopAndBottom(10%y,20%y)
lblEAN.LeftAndRight(4%x,10%x)
After that, try to adjust the remaining labels to the EAN-label:
lbldevicename.Top = lblEAN.Top
lbldevicename.Bottom = lblEAN.Bottom
Try to level all labels in a row, looks better.
You are using different height's.
You don't have to define all the labels in all dimensions.
Advantage: It is somehow selfscaling...