SubClassed Control

[EWeiss]

Projekt entfernt..

[EWeiss]

Da keiner antwortet tue ich es selbst
Neue Version Oben nun werden die Bitmaps gerendert

gruss

[EWeiss]

Fertig!
HScroll und Sizer addiert..

gruss

[Thom]

Toll! Läuft unter XP ohne Probleme.
Ist auch eine super Idee, den Quelltext im Memo der Exe unterzubringen!

[EWeiss]

Zitat von Thom:

Toll! Läuft unter XP ohne Probleme.
Ist auch eine super Idee, den Quelltext im Memo der Exe unterzubringen!

Jo weil gesubclassed gehen alle originalen funktionen der Memo-ScrollBar direkt an die SkinnedBar.
also MouseWheel usw..

gruss

[lbccaleb]

Wie sieht es aus, mit größenänderung des Hauptfensters? Wenn man das Fenster in der größe ändert, dann bleiben die Bars noch im Ausgangs zustand...

[EWeiss]

Zitat von lbccaleb:

Wie sieht es aus, mit größenänderung des Hauptfensters? Wenn man das Fenster in der größe ändert, dann bleiben die Bars noch im Ausgangs zustand...

Denke habe das schon richtig gemacht
Wenn die Memo sich beim resitz des Fensters vergrößert setzt sich natürlich die Scrollbar
an die richtige position so wie es sein muss

Das habe ich schon abgefangen.

gruss

[Thom]

Email ist angekommen - ich schau's mir gerade an.
Zu Deinen Bemerkungen: Ja - geht alles klar. Da hast Du mein vollstes Verständnis!

[EWeiss]

Zitat von Thom:

Email ist angekommen - ich schau's mir gerade an.
Zu Deinen Bemerkungen: Ja - geht alles klar. Da hast Du mein vollstes Verständnis!

Das ist fein..

gruss

[Thom]

Problem gefunden/gelöst:

Delphi-Quellcode:

function THookedScrollbar.StoreHorizontal(WinHandle: HWND): Boolean;
begin
  //...
  Result:=HScrBar.rgstate[0] and STATE_SYSTEM_INVISIBLE=0; 
end;

function THookedScrollbar.StoreVertical(WinHandle: HWND): Boolean;
begin
  //...
  Result:=VScrBar.rgstate[0] and STATE_SYSTEM_INVISIBLE=0;
end;

Allerdings habe ich noch einen kleinen Fehler gefunden:

Es sieht so aus, als ob die Scrollbar um jeweils einen Pixel nach rechts und unter verschoben wäre. Könnte das sein?

P.S.: Das ist ja ein richtig umfangreiches Projekt und einer Menge Arbeit, die da drin steckt.
Ganz tolle Arbeit!