Zitat von
bitsetter:
Versuche es mal so:
Delphi-Quellcode:
const
BtnIndex= 2;
var
TB: commctrl.TBBUTTONINFO;
begin
ZeroMemory(@TB, SizeOf(TB));
TB.cbSize := sizeof(TB);
TB.dwMask := commctrl.TBIF_COMMAND;
SendMessage(..., TB_GETBUTTONINFO, BtnIndex, Cardinal(@TB));
SendMessage(..., TB_PRESSBUTTON, TB.idCommand, MAKELONG (1, 0));
Hi,
wenn ich das so ausführe um es zu testen, natürlich ersetze ich die '...' du das
handle.
Dann bekomm ich bei der anwendung, die toolbar hat eine Fehlermeldung auf der ich auf "fehlerbericht senden" oder "nicht senden" klicken kann und die anwendung wird beendet.
MfG - Ghost007