2009-11-17 12 views
5

Bất cứ ai có bất kỳ tài nguyên nào tốt cho Delphi và Windows Aero trên 7 hoặc Vista?Delphi - Tài nguyên Windows Aero

Chúng tôi sắp thêm Windows 7 vào công ty của chúng tôi và muốn đảm bảo rằng các ứng dụng trong nhà của chúng tôi sử dụng phù hợp nhất có thể.

Sử dụng Delphi 2010 Tôi có thể thêm Khung kính và thanh menu kế thừa giao diện Aero, tuy nhiên thanh TabControls, Lưới và Trạng thái đều bị lỗi thời.

Bất kỳ trợ giúp nào?

+1

Bạn đã bật chủ đề thời gian chạy trong Project/Options/Application chưa? – frogb

+0

Cảm ơn - đó là những gì tôi đang tìm kiếm! –

Trả lời

6

Tôi đồng ý rằng việc sử dụng tùy chọn dự án Bật chủ đề thời gian chạy nên làm cho hầu hết các điều khiển nhận biết chủ đề.

TMS Components luôn được cập nhật để bao gồm các chủ đề mới nhất, bao gồm Windows 7 và Raize Components cho phép bạn sử dụng độ trong suốt, màu gradient và màu chủ đề.

11

Chúng tôi bao gồm tài nguyên tệp kê khai của riêng mình vì, theo như tôi biết, Delphi không bao gồm các phần bổ sung mới cho Windows 7 (và Vista?). Với sự giúp đỡ từ http://msdn.microsoft.com/en-us/library/dd371711(VS.85).aspxherehere:

Tạo một file "mymanifest.rc" với dòng đơn

1 24 "my.manifest" 

và tạo ra một tập tin như dưới đây gọi my.manifest

<?xml version="1.0" encoding="UTF-8" standalone="yes"?> 
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"> 
    <assemblyIdentity type="win32" name="OUR COMPANY NAME" version="3.1.0.0" processorArchitecture="*"/> 
    <dependency> 
    <dependentAssembly> 
     <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version="6.0.0.0" publicKeyToken="6595b64144ccf1df" language="*" processorArchitecture="*"/> 
    </dependentAssembly> 
    </dependency> 
    <trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"> 
    <security> 
     <requestedPrivileges> 
     <requestedExecutionLevel level="requireAdministrator" uiAccess="false"/> 
     </requestedPrivileges> 
    </security> 
    </trustInfo> 
    <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1"> 
    <application> 
     <!--The ID below indicates application support for Windows Vista --> 
     <supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}"/> 
     <!--The ID below indicates application support for Windows 7 --> 
     <supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}"/> 
    </application> 
    </compatibility> 
</assembly> 

Sau đó, thêm mymanifest.rc vào dự án của bạn và tắt tùy chọn 'enable runtime themes' vì điều này cũng tương tự (nhưng ít linh hoạt hơn). Phần 'requestedExecutionLevel' có thể được thay đổi để phù hợp với nhu cầu UAC của ứng dụng.

Làm việc cho chúng tôi.

-2

Chỉ cần thêm đơn vị XPMan vào danh sách Uses.

+0

kéo thành phần xpman vào biểu mẫu chính là cách dễ nhất để có được các điều khiển để tái da. chỉ có các chủ đề cho phép runtimes dường như không đủ để có được ứng dụng "hello world" cơ bản của tôi để cung cấp phong cách aero trông giống như win7. cảm ơn cho mẹo này. – MikeJ

+2

Điều này hiện được coi là "lỗi thời". Đối với các phiên bản cũ của Delphi, nó sẽ hoạt động. "Bật chủ đề thời gian chạy" như được hiển thị ở trên hoặc sử dụng câu trả lời Hiển thị được hiển thị bởi Shunty. –