Delphi-Quellcode:
//Ecke links oben
bmp := FSkinManager.GetSkinBmp(FORM_TITLE_EDGE_LEFT);
PaintBmp(TitleDC, 0, 0, bmp.Width, bmp.Height, bmp,hr);
topedgeleft:=bmp.Width;
// SetBkMode(Titledc, clnone);
Folgender Bug:
First chance
exception at $7C81EB33.
Exception class EAccessViolation with message '
Access violation at address 7C928FEA in module 'ntdll.dll'. Write of address 00000010'. Process TolSkinFormDemo.exe (3508)
topedgeleft:=bmp.Width wird dann als Fehlerzeile markiert.
Hier noch ein visual bug:
http://img80.imageshack.us/img80/6941/visualbug2tw.png