Programmfenster mit scrollbar versehen

[rhodan]

Hallöchen,

hab gerade einen "bug" in meinem programm entdeckt und überlege verzweifelt wie ich den weg bekomme.

mein programm wurde unter einer windows auflösung von 1152x864 gestaltet, als ich es nun einem freund zum testen gab konnte er das untere ende meines programmfenster's nicht sehen, da er eine auflösung von 1024x864 verwendet.

mein ziel ist es jetzt mein hauptprogramm fenster etwas kleiner zu machen und mit einer scrollbar zu versehen, so das man dieses komplett sehen kann indem man scrollt.

hab die "suche" hier benutzt und über 200 einträge zum thema "scrollbar" gefunden.....allerdings meistens zu grids und listboxen :|
nix dabei was ich suche.


wäre jemand so nett und würde mir sagen wie ich das bewerkstelligen kann?



Vielen dank im voraus,


Rhodan

[SirThornberry]

ist eigentlich ganz einfach

Delphi-Quellcode:

ShowScrollBar(handle, SB_BOTH, true);

[rhodan]

hmm, danke erstmal, aber ich denke ich weiss nicht richtig damit umzugehen. habs erstmal im CreatForm script eingefügt und später in der scrollbar selber :roll: .

wie sage ich der scroll box welche grösse mein hauptfenster hat? habs jetzt erstmal so gemacht das ich in der originalgrösse meines fensters meine scrollbar eingefügt hab auf die volle größe, also bis zum unteren rand gezogen habe, und dann mein fenster verkleinert hab,auf die größe wie es später sein soll. allerdings ist dann ja dummerweise das untere ende der scrollbar ebenfalls abgeschnitten :-D nicht gut.

kannst du mir sagen wie ich die in meine form bekomme und wie ich die konfigurieren muss das sie funzt?

danke dir,

grüße, rhodan

[SirThornberry]

du musst keine scrollbars auf dein Form packen. Mit

Delphi-Quellcode:

ShowScrollBar(handle, SB_BOTH, true);

sagst du dem Form das es Scrollpars anzeigen soll. Dein Betriebssystem (Windows) bekommt also damit gesagt des es auf dem Form scrollbars anzeigen soll. Und wie weit zu scrollen ist weiß windows auch automatisch weil du ja auf dem Fenster weitere fenster hast (also controls mit handle) und da kann das betriebssystem berechnen welche Controls außerhalb liegen und wie weit man scrollen muss.

komischer weise muss man den Befehl paar mal absetzen damit nan die wirkung sieht (habs mal probeweise auf ein ButtonClick gelegt)

[Delphi-Freak]

Es gibt auch noch die Möglichkeit TForm1.AutoScroll auf True zu setzen (sollte standardmäßig aber eh der Fall sein)...

LG, ich

Edit: Mein 200. Beitrag :mrgreen:

[SirThornberry]

hmm, das war wohl zu einfach *g* normaler weise werden ja auch scrollbars angezeigt ohne das dieses property auf true steht, aber sobald der borderstyle auf bsnone steht muss man dieses property dann doch auf true setzen um den gewünschten effekt zu bekommen.

[rhodan]

sry, war nicht zu hause die letzten tage.

funzt super, danke für die tipps ! :-D
wieder was dazugelernt.

liebe grüße,


rhodan