Ahoj, nevíte jak bych mohl nastavit styl čar ve Visual Basicu 6, kterou bych mohl zařadit přímo do procedury? Zkoušel jsem něco takového: 'Nastavení kreslícího pera Dim hPen As Long Dim hTmpPen As Long 'Vytvoření nového pera hPen = CreatePen(PS_DASHDOT, 1, RGB(255, 255, 255)) 'Přiřazení vytvořeného pera formuláři hTmpPen = SelectObject(pctGrafR, hPen) 'Nastvení původního pera a uvolnění paměti SelectObject pctGrafR, hTmpPen DeleteOject hPen ale nefunguje to pořád mu něco chybí. Nevíte kde dělám chybu?
|