// Aufruf in der OnPaint-Methode: z.b. maketransparent(Handle, 20); void maketransparent(HWND AHandle, int ABlending) { SetWindowLong(AHandle, GWL_EXSTYLE,GetWindowLong(AHandle, GWL_EXSTYLE) | WS_EX_LAYERED); SetLayeredWindowAttributes(AHandle, 0,(255*ABlending)/100, LWA_ALPHA); BLENDFUNCTION blend; blend.BlendOp = AC_SRC_OVER; blend.BlendFlags = 0; blend.AlphaFormat = 0; blend.SourceConstantAlpha = AC_SRC_ALPHA ; UpdateLayeredWindow(AHandle, NULL, NULL, NULL, NULL, NULL,NULL, &blend, ULW_ALPHA); }
Kategorien
-
Neueste Beiträge
- [RAP] ODATA V4 Service und Fiori Elements App implementieren
- [ABAP] Übernahme von Dokumenteninfosätzen beim Anlegen von Einkaufsbelegen unterdrücken
- [ABAP] OpenSQL: Stringfunktionen
- [ABAP] OpenSQL: NULL-Indicator zum Anzeigen von leeren Rückgabemengen
- [ABAP] OpenSQL: Set-Indicator für das Aktualisieren von Spalten
- [ABAP] Repository-Infosystem: Views zu Objekten
- [ABAP] SALV-Table – Gruppen für Spaltenvorrat im SALV-Layout
- [ABAP] Retourenumlagerungsbestellungen lesen
- [SAP] Fabrikkalender / Feiertagskalender einrichten
- [ABAP] ABAP2XLSX: CSV-Datei schreiben