shTrees wandeln zu Delphi 2010 / Fehler

[HJay]

Ich versuche gerade, ein Delphi-6-Projekt nach Delphi-2010 zu wandeln. Ich verwende die fremde Unit "ShTrees" und leider gibt es ein Problem mit dem Char-Format, das ich nicht lösen kann.

Delphi-Quellcode:

CmdID := Integer(TrackPopupMenu(Popup,
                     TPM_LEFTALIGN or TPM_RETURNCMD or TPM_RIGHTBUTTON,
                     Where.X, Where.Y, 0, Handle, nil));
          if CmdID <> 0 then
          begin
            with CommandInfo do
            begin
              cbSize := SizeOf(CommandInfo);
              fMask := 0;
              hwnd := 0;
              lpVerb := MakeIntResource(CmdID - 1); // >>>> ERROR
              lpParameters := nil;
              lpDirectory := nil;
              nShow := SW_SHOWNORMAL;
              dwHotKey := 0;
              hIcon := 0;
            end;
            Result := Succeeded(ContextMenu.InvokeCommand(CommandInfo));
          end;

In D6 ist Windows.MakeIntResource: PChar während es in Delphi-2010 PWideChar ist.

Wie kann man den Konflikt lösen?

[DeddyH]

Klappt es mit MakeIntResourceA?

[HJay]

Leider nicht. Es kompiliert dann, aber stürzt ab.

[Klaus01]

.. genau an der Stelle?
Gibt es eine sinnvolle Fehlermeldung?

Grüße
Klaus

[shmia]

Zitat von HJay:

ein Delphi-6-Projekt nach Delphi-2010 zu wandeln

Ist das ein Non-VCL Projekt oder weshalb wird hier (unnötigerweise) auf Ebene der Windows API programmiert?

[HJay]

Zitat von shmia:

Ist das ein Non-VCL Projekt oder weshalb wird hier (unnötigerweise) auf Ebene der Windows API programmiert?

Die Unit "shTrees" stellt so eine Art Windows Explorer / Shell Ansicht zur Verfügung, siehe Anhang.

Wäre schade, wenn die Weiterverwendung dran scheiterte, denn diese Stelle ist die einzige Compilermeldung beim Konvertieren.

Notfalls msuss ich mir eine modernere Shell-Komponente suchen...die muss dann aber auch noch mit meinem Code halbwegs kompatibel sein. *seufz*

Irgendjemand Ideen, woran das liegen kann?

[DeddyH]

Nenn uns doch erst einmal die Fehlermeldungen, dann kann man evtl. besser helfen.

[HJay]

Na ja, direkt nach dem Konvertieren ist es einfach eine Compilermeldung, dass die Typen nicht stimmen:

[DCC Fehler] ShTrees.pas(739): E2010 Inkompatible Typen: 'Char' und 'AnsiChar'

Da es nicht compiliert, gibt es auch keine weiteren Fehlermeldungen. Ich durchschaue nicht im Ansatz, wie ich diese Typverletzung umgehen kann, weil ich shTrees ja nicht selbst geschrieben habe, sondern die Shell-Komponente nur nutze.

Vielen Dank für Eure Hilfe. Hoffentlich gibt es eine Lösung!

[Klaus01]

.. was passiert, wenn Du MakeIntResource() nach PAnsiChar castest?

Grüße
Klaus

[DeddyH]

Die ShellIDs.pas fehlt noch.

[edit] Erledigt, hier gefunden: http://rvelthuis.de/components.html[/edit]