Remarks | Methods | Samples |
ED
|
not used
|
RT
|
avaliable
|
DrawAPI Functions for Drawing within a DynPicture or Element Object. For more details you can also take a look at Microsoft's MSDN.
ArcTo | Draw3dRect | Ellipse |
FillSolidRect | LineTo | MoveTo |
Pie | Rectangle | RoundRect |
SetBkColor | SetBkMode | SetPolyFillMode |
SetROP2 | SetTextColor | TextOut |
'declare picture object Dim WithEvents zPIC As DynPicture Private Sub Project_Active() 'set picture object Set zPIC = thisProject.DynPictures.Item("Picture 0") End Sub Private Sub zPIC_Draw(ByVal hdc As stdole.OLE_HANDLE, ByVal Left As Long, ByVal Top As Long, ByVal Bottom As Long, ByVal Right As Long) 'will draw a blue rectangle into the Picture... zPIC.DrawApi.FillSolidRect hdc, 100, 100, 300, 200, vbBlue End Sub Private Sub Project_Inactive() 'release object Set zPIC = Nothing End Sub