Question:
How to delete Item From System Menu?

Answer:
procedure TForm1.Button1Click(Sender: TObject);
var
Handle: THandle;
begin
Handle := GetSystemMenu(Self.Handle, False);
RemoveMenu(Handle, 1, MF_BYPOSITION);
RemoveMenu(Handle, 2, MF_BYPOSITION);
end;





4 Responses so far.

Post a Comment

Thank you for your comment.

Any request and idea are welcome.

CLICK TO REGISTER