Entwickler-Ecke

Windows API - Form anpassen


Joker_07 - So 13.07.08 15:41
Titel: Form anpassen
Moderiert von user profile iconNarses: Bild als Anhang hochgeladen
Wie ihr hier sehen könnt ist ein screenshot von meinem Programm, wie es im moment ist und wie es sein sollte, also links seht ihr mein programm und ein weiteres programm. Mein Programm nimmt etwas platz ein, also wenn ich das andere Programm minimieren möchte muss ich erst mein programm verschieben, und ich möchte das alle anderen fenster sich anpassen und wenn man auf maximieren klickt, das andere programm nicht das ganze bildschirm einnehmen sondern nur bis zu meinem Sidebar... das ist ja auch bei icq zum beispiel der fall...
danke schon im vorraus
mfg joker_07

Moderiert von user profile iconGausi: Topic aus Delphi Language (Object-Pascal) / CLX verschoben am So 13.07.2008 um 15:49


elundril - So 13.07.08 15:47

ich weiß nicht ob das hilft aber ich post mal den Link:
http://www.delphi-library.de/viewtopic.php?t=69398&highlight=desktop


mkinzler - So 13.07.08 15:47

Durch Skinning


elundril - So 13.07.08 15:50

ähhhm... durch skinning wird es auch nicht besser das andere Fenster unter seinem sind würd ich mal raten. ;-)


PeterPain - So 13.07.08 17:07

SystemParametersInfo(SPI_SETWORKAREA, 0, @WhatEverRect, 0);

gruss


Yogu - So 13.07.08 18:41

user profile iconelundril hat folgendes geschrieben:
ich weiß nicht ob das hilft aber ich post mal den Link:
http://www.delphi-library.de/viewtopic.php?t=69398&highlight=desktop

Das war doch schon des Rätsels lösung, nämlich folgende Prozedur:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
procedure ModifyWorkArea(VLeft,VTop,VRight,VBottom:integer);
var
  rcWork: TRect;
begin
  rcWork.Top:=VTop;
  rcWork.Left:=VLeft;
  rcWork.Bottom:=GetSystemMetrics(SM_CYSCREEN)-VBottom;
  rcWork.Right:=GetSystemMetrics(SM_CXSCREEN)-VRight;
  SystemParametersInfo (SPI_SETWORKAREA, 0, @rcWork, SPIF_SENDCHANGE);
end;

Du musst nur noch irgendwie die aktuelle WorkArea herausbekommen, dann kannst du mit dieser Methode den rechten Rand um einges nach links verschieben. Anschließend brauchst du nur noch dein Fenster so wie immer rechts hinkleben, und natürlich das Verschieben verbieten. Sonst hüpft es sofort nach dem Mausdrücken in die WorkArea.


einfach112 - Di 15.07.08 16:47
Titel: WOW
also deine appbar sieht ja vom grafischen 100 % endgeil aus .....

Womit machst du die grafiken ?! (wenn man mal fragen darf ?)
mfg einfach112