Einzelnen Beitrag anzeigen

venice2
(Gast)

n/a Beiträge
 
#1

Message überschreiben

  Alt 30. Nov 2020, 15:01
In CSharp kann man eine Message überschreiben
bsp.
Code:
 Marshal.WriteInt32(Msg.LParam + 4 * sizeof(int), RowHeight);
wie lässt sich das in Delphi umsetzen?

Ich habe es mal so gemacht.

Delphi-Quellcode:
  
const
  WM_REFLECT = $2000;

    // Overwrite itemHeight, which is the fifth integer in MEASUREITEMSTRUCT
  WM_REFLECT + WM_MEASUREITEM: // wird nie aufgerufen obwohl wie im Beitrag steht (sollte einmal bei LVReport) "Detail view" sich aufrufen.
      begin
        x := (Lp + 4 * sizeof(LPARAM));
        CopyMemory(@lP, @x, 20);
        Result := 1;
        Exit;
      end;
keine Ahnung ob das dem gleich kommt.
Der Sinn der Sache ich möchte mein ListViewItem in der höhe verändern ohne dabei den Font zu verändern!

https://stackoverrun.com/de/q/1650434

Geändert von venice2 (30. Nov 2020 um 15:58 Uhr)
  Mit Zitat antworten Zitat