Einzelnen Beitrag anzeigen

Shrek_III

Registriert seit: 15. Dez 2004
Ort: Handewitt
25 Beiträge
 
Delphi XE5 Enterprise
 
#3

AW: GetMenuItems von MenuStrip

  Alt 14. Nov 2012, 23:07
Danke für den Versuch einer Erleuchtung, aber bei mir dämmert es immer noch nicht

Mit diesem Code snippet versuche ich nun die Informationen zum ersten Menupunkt zu bekommen...
Leider steht aber zum Schluss in MenuInfo1 nichts brauchbares drin.

Delphi-Quellcode:
var
  MenuInfo1: TMenuItemInfo;
  Buffer: Array[0..1024] of Char;
  MenuHandle: HMenu;

begin
  MenuInfo1.cbSize := SizeOf(TMenuItemInfo);
  MenuInfo1.fMask := MIIM_TYPE;
  MenuInfo1.fType := MFT_STRING;
  MenuInfo1.cch := SizeOf (Buffer);
  MenuInfo1.dwTypeData := @Buffer;
  MenuHandle := GetMenu (FindWindowEx(Variables.TNTWnd, 0, 'WindowsForms10.Window.8.app.0.2bf8098_r15_ad1', 'menuStrip1'));
  GetMenuItemInfo(MenuHandle,
                  1,
                  True,
                  MenuInfo1);
end;
Hier noch ein screenshot vom Programm...
http://img854.imageshack.us/img854/5026/menuhz.png


Für weitere Hilfestellung wäre ich dankbar.
So long fellas

Shrek_III
  Mit Zitat antworten Zitat