德爾福firemonkey TButton與左鍵單擊下拉菜單？

當按下鼠標左鍵時，我需要在TButton上有下拉菜單。德爾福firemonkey TButton與左鍵單擊下拉菜單？

我用按鈕的onClick事件下面的代碼：

procedure TForm1.button1Click(Sender: TObject); 
var 
    pt:TPointF; 
begin 
    pt.X:=0; 
    pt.Y:=button1.Height; 
    pt:=button1.LocalToAbsolute(pt); 
    pt:=ClientToScreen(pt); 
    popupmenu1.Popup(pt.X,pt.y); 
end;

這正常工作與Windows作爲目標平臺，它也適用於OSX，但是當我點擊快捷按鈕幾次，它在OSX上崩潰（在Windows上不是這樣，沒有問題）。

我在做什麼錯？

來源

2017-03-22 Softtouch

您正在使用哪個版本的Delphi？究竟是什麼樣的崩潰？請更具體一些。這聽起來像是一個可能的FireMonkey錯誤，你是否[向Embarcadero報告]（http://quality.embarcadero.com）呢？ –

我還沒有報告，因爲我不確定我做錯了什麼，即使我沒有看到我的代碼中有任何錯誤。在Mac上，它會彈出一個訪問衝突訪問地址00000051.我正在使用Delphi 10.1更新2. – Softtouch

AV位於接近0的低地址意味着正在訪問一個零指針。 –

肯定是10.1 Update 2中的一個bug。我剛安裝了Delphi 10.2東京，它的工作原理。

來源

2017-03-23 10:25:39 Softtouch

德爾福firemonkey TButton與左鍵單擊下拉菜單？

回答

相關問題