FileOpenDialog Ownerdraw

[EWeiss]

Habe da kleine Probleme mit meinem OwnerDraw FileDialog.

Hintergrund und die Größe des Dialogs habe ich schon verändert. (siehe Anhang)
Meine 1 Frage wäre wie bekomme ich es hin das der Hintergrund der Labels Transparent wird?

Ich verwende die WM_MESSAGE leider ohne erfolg.

Delphi-Quellcode:

    WM_CTLCOLORSTATIC:
      begin
        SetBkMode(wp, TRANSPARENT);
      end;

Zusätzlich habe ich noch versucht über diese Message den Hintergrund einzufärben.
Seltsamer weise wird aber ein anderer Bereich eingefärbt und zwar der von der Toolbox.
Bei beiden setze ich den Backgroundmode auf Transparent .. kein Erfolg.

Delphi-Quellcode:

    WM_CTLCOLORDLG:
      begin
        SkinEngine.SplitColorARGB(SkinEngine.SK_INACTIVECAPTION, Alpha, Red, Green, Blue);
        Color := RGB(Red, Green, Blue);
        SetBkColor(wp, Color);
        SetBkMode(wp, TRANSPARENT);

        if (brush <> 0) then
          DeleteObject(brush);

        brush := CreateSolidBrush(Color);
        SetProp(WinHandle, 'brush', brush);
        result := brush;
        Exit;
      end;

Müsste eigentlich für STATIC Controls wie Labels zuständig sein.

gruss

[EWeiss]

Wirklich niemand eine Idee welche Messagen ich da abfangen könnte um den Text transparent zu machen?

Habe jetzt die Combo eingefärbt und meinen Text draufgezeichnet.
Auch das einfärben des Edit funktioniert soweit.

gruss

[EWeiss]

Wenn ich nerve bescheid sagen

Hab jetzt die Button ersetzt.
Muss nur noch das Tastaturkürzel (Unterstrich) entfernen.

Irgendwann werde ich auch noch das Problem mit der Transparenz lösen.
Wenn mir niemand helfen kann.

gruss

[EWeiss]

OK das mit den Transparenten Static Texten hat sich erledigt.
ein

GetStockObject(NULL_BRUSH);

hat's gebracht.
Ist noch genug zu tun aber zumindest schon eine Anfang.

Delphi-Quellcode:

    WM_CTLCOLORSTATIC:
      begin
        SkinEngine.SplitColorARGB(SkinEngine.SK_INACTIVECAPTION, Alpha, Red, Green, Blue);
        Color := RGB(Red, Green, Blue);

        SetBkMode(wp, TRANSPARENT);
        SetTextColor(wp, Color);
        result := GetStockObject(NULL_BRUSH);
        Exit;
      end;

gruss

[Luckie]

Zitat von EWeiss:

Muss nur noch das Tastaturkürzel (Unterstrich) entfernen.

Warum willst du die Bedienbarkeit wieder künstlich verktüppeln?

[EWeiss]

Zitat von Luckie:

Zitat von EWeiss:

Muss nur noch das Tastaturkürzel (Unterstrich) entfernen.

Warum willst du die Bedienbarkeit wieder künstlich verktüppeln?

Tue ich nicht
Mal schaun ob ich den lassen kann hatte vorher ein Problem das da immer ein "&" angezeigt wurde.
An der Funktionalität hat sich nichts geändert auch wenn man den Strich nicht sieht.

gruss

[EWeiss]

Das ist der letzte Status..
Das SysListView32 ist noch nicht angepasst.
Mal sehn ob ich das auch noch irgendwie schaffe.

Und die Toolbar ist noch nicht fertig.
Links im Panel wird dann der MP3 tag angezeigt.

gruss