Startmenü-Problem

[CoDeR_MaCHiNe]

Ich habe in meinem program einen button mit dem ich das startmenü öffnen
kann, jedoch öffnet sich das menü immer unten links.

Wie kann ich das startmenü an einem x-beliebigen punkt 'aufspringen' lassen ?

Ich habe echt keine idee mehr...

[Trouble_Maker]

Hiho ...
meinst du mit Startmenü das Windows Startmenü ?!?
Also das, das du mit der Windows-Taste öffnest ?!?

Wie sollte man das denn an einer anderen Stelle öffnen können ?!?


cu Trouble_Maker

[Luckie]

Zitat:

Zitat von CoDeR_MaCHiNe

Wie kann ich das startmenü an einem x-beliebigen punkt 'aufspringen' lassen ?

Bitte was? Na das wird da aufpoppen, wo der Startbutton ist. Und das finde ich ehrlich gesagt auch gut so.

Was soll denn das für einen Sinn machen?

[CoDeR_MaCHiNe]

jo des windows startmenü...

und warum nicht ? ich würde es gerne an einer anderen stelle haben...
nur weiß ich nicht mehr weiter...

[Luckie]

Du brauchst das Handle von dem Menü, dann kannst du es mit SetWindowPos verschieben.

[Trouble_Maker]

hi
muss Luckie mal recht geben! Ist gut so, dass das Menü dort ist, wo es ist.
Was soll es auch bringen, das Menü wo anders öffnen zu können ?!?

Kannsts aber noch an 3 anderen Stellen öffnen, indem du deine Taskleiste verschiebst ;-)

cu Trouble_Maker

[CoDeR_MaCHiNe]

Zitat:

Du brauchst das Handle von dem Menü, dann kannst du es mit SetWindowPos verschieben.

wie komme ich an das handle ?

[Luckie]

Das Problem hat sich mnir noch nie gestellt, sorry.

[CoDeR_MaCHiNe]

ich habe genau zu dem thema nen link gefunden:
http://www.vbwelt.de/vb_welt/tips/sh...er%E4ndern.xml

nur weiß ich nicht wie ich das auf Delphi übertragen kann.
vllt einer von euch ?

[Luckie]

Zitat:

Richtig eingesetzt kann man mit diesem Handle jetzt eigentlich alles machen...Man kann den Button verschieben, disablen, verstecken oder schließen..und mehr

Ich dachte es ginge um das Starmenü und nicht um den Startbutton?

[CoDeR_MaCHiNe]

ja aber ich habe entdeckt das man wahrscheinlich über den butto gehen muss wenn mann wissen will wo es sich öffnet.
habe gerade etwas interessantes gefunden:

Delphi-Quellcode:

MoveWindow(FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'Button', nil), 300, 0, 80, 22, true);

wenn ich jeze anstatt der 300 bzw. 0 jetzt die koordinaten meines
buttons im fenster nehme müsste es eigentlich gehen. oder ?

[Luckie]

Damit schiebst du den Startbutton durch die Gegend. Ich wäre nicht so begeistert, ihn mitten auif dem Desktop wiederzufinden.

[CoDeR_MaCHiNe]

das würde ich ja dann wieder zurück schieben, wenn ich rausgfunden habe wie des geht...

[Luckie]

Also es ist ja so: Du brauchst das Handle vom Menü, um es verschieben zu können. Aber so lange es das Menü nicht gibt, gibt es auch kein Handle. Das gibt es erst, wenn es aufpoppt und dann ist es zu spät. Desweitern müßtets du ständig kucken, ob jemand auf den Stratbutton geklcikt hat oder die Windows-Taste gedrückt hat. Diese wäre mir für so eien Spielerei zu aufwendig bzw. als Anwender zu Ressourcen fressend. Da mußt du jetzt wohl ohne mich durch.

[CoDeR_MaCHiNe]

mh...
ich schlaf ertsmal ne nacht drüber :)
mal gucken wies morgen aussieht.
aber trotzdem danke erstmal.

[Luckie]

Ich habe die Befürchtung, wenn du morgen aufwachst wird sich an der Situation nichts geändert haben.

[CoDeR_MaCHiNe]

und da hast du leider recht...

ich habe jeze nämlich folgendes problem das
mein start-button nicht mehr aktiviert ist
somit kann ich mein startmenü auch nicht mehr
aufklappen lassen...

[Aya]

Hi,

ich hab gestern Nacht mal ne Funktion gebastelt um das Handle vom StartMenü zu ermitteln.. klappt allerdings nur wenn es bereits sichtbar ist. (SetWindowPos klappt wunderbar um das Menü zu verschieben)

Delphi-Quellcode:

function GetStartMenuHandle: HWND;
var
  h: HWND;
  lpClassName: PChar;
begin
  Result:=0;
  GetMem(lpClassName,256);
  h:=GetWindow(GetDesktopWindow,GW_CHILD);
  while h<>0 do begin
    GetClassName(h,lpClassName,256);
    if lpClassName='BaseBar' then begin
      if GetWindowLong(h,GWL_STYLE) = -1774190592 then
        if GetWindowLong(h,GWL_EXSTYLE) = 392 then begin
          Result:=h;
          Exit;
        end;
    end;
    h:=GetWindow(h,GW_HWNDNEXT);
  end;
  FreeMem(lpClassName);
end;

Au'revoir,
Aya~

[CoDeR_MaCHiNe]

danke dir erstmal ...

aber ich bekomm das trotzdem irgendwie ned hin.
könnteste mir bitte auch die zeilen zeigen mit dem
setwindowpos ?

[Aya]

Hi,

Delphi-Quellcode:

    h:=GetStartMenuHandle;
    SetWindowPos(h,HWND_TOPMOST,Mouse.CursorPos.X,Mouse.CursorPos.Y,0,0,SWP_NOSIZE);

geht natürlich nur wenn das StartMenü sichtbar ist.

Au'revoir,
Aya~

[CoDeR_MaCHiNe]

mh tut mir leid so ähnlich habe ich das ja
auch schon gehabt, aber es geht genauso wenig
wie vorhin...

abeer trotzdem vielen dank :)

[Aya]

Und was klappt nicht???

[CoDeR_MaCHiNe]

das menü wird nicht angezeigt...
weder an dem punkt wo es soll noch da wo es eigentlich war.
also überhaupt nix, obwohl ich die taskbar angezeigt lasse.

[Aya]

Ich denke du weißt bereits wie du das Menü anzeigen kannst??!
Du mußt es anzeigen lassen, dann dir das Handle davon holen, und es dann verschieben...

Au'revoir,
Aya~

[Aya]

Hi nochmal,

hab das gradmal versucht... es klappt auch das StartMenü mit ShowWindow anzuzeigen... allerdings funktionieren dann die unter Menüs nichmehr...

Au'revoir,
Aya~

[CoDeR_MaCHiNe]

schon klar.
theoretisch funktioniert das auch so, hab es ja auch mit nem anderen
programm getestet, da geht es wunderbar...

Nur mit meinem jezigen programm nicht.
btw. mit dem programm wird nen Bild in den hintergrundgeladen
und die taskbar ist auch verschwunden, und wenn ich da
auf nen butto klicke (den ich wahllos positioniert habe)
sollte das gehen(ob taskbar anzeigend oder nicht)

:)