Ok. Das mit dem Manifest klappt jetzt.
Danke euch.

Wie kann ich feststellen, ob der XP Style im Windows aktiviert ist?

jaenicke hat folgendes geschrieben:

Oh man, du hast ja den klassischen XP-Stil (a la Windows 2000) aktiviert (sieht man auf deinem Screenshot). Dann siehst du halt auch nix von einem eventuellen XP-Style. Den siehst du halt nur wenn du den auf deinem System aktiviert hast. Aber warum fragst du eigentlich nach XP-Style, wenn du den bei dir deaktiviert hast?

*Hust* soweit ich mich erinnere ich diese Art von Fehler immer im klassichen XP-Stil.
Ich habe Delphi 7, den neuen Stil aktiviert und diese Art von Fehlermeldung ist trotzdem im klassichen Stil
Also das liegt nicht daran dass er bei seinem Programm den Stil nicht sieht.

Bei Delphi 7 kannste einfach das Manifest auf das Formular ziehen, ansonsten gibt es die beiden Möglichkeiten die bereits oben beschrieben wurden.

Popov hat folgendes geschrieben:

Hier ein kleines Tool das ich mal programmiert habe. Es erstellt XP Manifeste. Das funktioniert in etwa so: - Man erstellt ein Projekt, programmiert drann, compiliert es. Zum Schluß hat man ein EXE Programm. - Dann startet man mein Tool und über Menü Datei wählt man das EXE Programm. - Jetzt hat man zwei Möglichkeiten: - 1. Auf Datei und dann Manifest speichern klicken und ein XP Manifest Datei erzeugen. Es ist nur eine Textdatei. Das reicht. Sie muß den gleichen Anfangsnamen wie das Programm haben und im gleichen Verzeichnis liegen (das erledigt das tool automatisch). Schon hat man das XP Style. - 2. Auf Datei und dann Ressource erstellen klicken und ein RES Datei erzeugen. Das ist das Manifest als Ressource. Dann einfach irgendwo im Programm die Ressource einbinden, z.B. {$R MeinProgramm_manifest.RES}. Das reicht. Das Manifest wird mir einkompiliert und braucht nicht als Manifest Datei beliegen. Schon hat man das XP Style. Das Tool ist eine Schnellprogrammierung, also nicht zu viel erwarten. Eber es erfüllt sein Zweck. Die Datei liegt auf Rapidshare.com und ist etwa 150kB groß: rapidshare.com/files.../XpManifest.zip.html

Hallo Popov,

leider kommt beim Aufruf: "Die Betaphase ist abgelaufen"! Wie weiter?

Vielleicht ist ja das hier, was Du suchst:
www.shagrouni.com/en...software/xpmenu.html

Hallo

Der Thread ist zwar schon etwas betagt, aber ich wollte nicht unbedingt was Neues anfangen.

Also: XP-Maschine, XP-Style und die WindowsXP.RES eingebunden. Compiliert, gestartet - läuft und sieht gut aus. Bis man eine beliebiges SubMenü aufruft. Dann bricht das blanke Chaos aus. Tausend sich überlagernde Fehlermeldungen-im wesentlichen "Systemressourcen sind erschöpft" oder "Nicht genug Speicher vorhanden" (lol bei 2GB). Der Rechner muß neu gestartet werden, anders bekommt man den nicht wieder in den Griff.
Programm läuft ohne die WindowsXP.RES oder unter W2K bestens. Der Fehler muß also aus der WindowsXP.RES kommen - hat jemand die Erleuchtung dazu?
Besten Dank

Gruß Delphi10

Edit: Hatte da so einen Verdacht. Ich hatte in dem OnPaint der SubForms eine Procedure zum Zeichnen einer BitMap des Form-Hintergrundes eingebunden. Genau das führte zu den Abstürzen. Funktioniert jetzt alles einwandfrei mit XP-Style - allerdings bleibt die Frage, wie kriege ich jetzt ein Background-Pattern auf die Form?

Das ist die fragliche Procedure:

Delphi-Quelltext    ausgeblendet	markieren
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: Procedure TForm3.TileBmp(C: TCanvas; B: Tbitmap); Var X, Y, XAnz, YAnz: Integer; Begin   bmp.LoadFromResourceName(hinstance,'BKGROUND');   XAnz := C.ClipRect.Right div B.Width;   YAnz := C.ClipRect.Bottom div B.Height;   For X := 0 To XAnz Do   For Y := 0 To YAnz Do   C.Draw(X*B.Width, Y*B.Height, B); End;

Kann mir dabei jemand helfen?
Gruß Delphi10

Edit: Ehe sich jemand 'nen Wolf antwortet, das Problem habe ich gelöst.

@kalmi01: TXPMenu von Shagrouni.com ist denke ich nicht das, was er sucht. XPMenu verpasst dem Programm nicht den Stil von Windows XP, sondern von Office XP. Das ist ein Unterschied.

@bbfan: Willst du sowas, wie bei Avira AntiVir (auch wenn es nicht ganz 100%-ig nach WinXP aussieht)?

Du könntest auch mit Images arbeiten und auf MouseDown usw. reagieren. Du könntest vll einen Screenshot von den WinXP-Komponenten machen und den dann per Picture.LoadFromFile laden (ist nicht besonders sauber, aber funktioniert).

@delphi10: Such mal auf mirage228.net, da findest du ein ähnliches Proggi. Probier das mal.

bbfan hat folgendes geschrieben:

Was ich brauche ist auch ein XP Style der aktiv, auch wenn der Benutzer unter XP mit einer Win2000 Design arbeitet. Ich denke, dass geht dann nur mit den entsprechenden Komponenten... Liefert D7 diese XP Style Komponenten?

Es gibt Hersteller von käuflich zu erwerbenden Komponenten.
Namen nenne ich nicht um hier keine Werbung zu machen. (Aber über PN verrate ich ihn)
Die, die wir in der Firma einsetzen übertreffen alles was ich bisher gesehen habe. Damit bekommt man auch Vista-Style unter WinXP hin!