2016-01-13 253 views
3

您好,我在Delphi XE2 AnimateWindow函數有一個問題,問題是當我使用皮膚提供的XE2在Windows外觀中找到,當使用皮膚任何和AnimateWindow結合時,程序混合正常的窗戶部分與窗戶的窗戶設計,最糟糕的是,窗戶被凍結,不能移動更多。 的代碼只有這個:AnimateWindow與德爾福XE2

procedure TForm1.FormCreate(Sender: TObject); 
begin 
    AnimateWindow(Form1.Handle,200, AW_CENTER); 
end; 

我該如何解決這個問題?

回答

1

這個問題似乎在提供「風格」(XE2 .. X西雅圖),並可以如下容易地被重複所有版本存在:

  • 新的VCL項目
  • 項目選項 - 外觀 - 任何可用的風格

添加代碼的問題

procedure TForm2.FormCreate(Sender: TObject); 
begin 
    AnimateWindow(Form2.Handle,200, AW_CENTER); 
end; 

的運行。該窗口出現在屏幕上,但完全沒有響應。窗口上的控件似乎可以正常工作(到目前爲止只有最少的測試)。

解決方法是將Position屬性設置爲默認的poDefault以外的其他屬性。

恩巴卡德羅質量中央搜索沒有提出任何報告。我會在做更多調查後提交報告。


報道,RSP-13459,窗口的樣式應用上凍結調用AnimateWindow


更新2016年4月24日昨天,我收到了關於RSP-13459的通知:

這問題固定爲10.1柏林,但它不會與 構建版本24.0.22088.5349.1重現。