Message überschreiben

[venice2]

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

[TomyN]

Wieso dieser Offset? Bekommst Du die WM_MEASURE Message?

[venice2]

Zitat:

Wieso dieser Offset?

Da muss man den Coder fragen.

Zitat von TomyN:

Bekommst Du die WM_MEASURE Message?

Ja.
Aber beim Aufruf stürzt die Anwendung ab.

[himitsu]

sizeof(int) ist aber nicht sizeof(LPARAM)
Ich bin mir fast sicher, dass Letzeres in Win64 eine andere Größe hat.

Zitat:

CopyMemory(@lP, @x, 20);

Bist du sicher, dass du die Adressen der Variablen zum Kopieren nutzen willst?
Ich hätte ja eher vermutet, dass du die Adressen haben willst, die in den Variablen stehen und nicht die Variablen selber, also ohne @.

Außerdem kommt es mir bissl komisch vor, was du da machst.
-> 20 Byte in sich selbst kopieren (auch noch mit den falschen Adressen der Variablen, was einen geilen Bufferoverflow ergibt)

Spontan würde ich Marshal.WriteInt32(k_Msg.LParam + 4 * sizeof(int), ms32_RowHeight);
als PInteger(LParam + 4 * SizeOf(Integer))^ := ms32_RowHeight; übersetzen.
-> 4 Byte von Variable/Konstante in den Record/Buffer kopieren

[venice2]

Zitat von himitsu:

sizeof(int) ist aber nicht sizeof(LPARAM)
Ich bin mir fast sicher, dass Letzeres in Win64 eine andere Größe hat.

Zitat:

CopyMemory(@lP, @x, 20);

Bist du sicher, dass du die Adressen der Variablen zum Kopieren nutzen willst?
Ich hätte ja eher vermutet, dass du die Adressen haben willst, die in den Variablen stehen und nicht die Variablen selber, also ohne @.

D2010 also 32Bit.
Ich sagte ja

Zitat:

keine Ahnung ob das dem gleich kommt.

CopyMemory erwartet pointer ohne @ lässt es sich nicht kopieren.
Ich will LParam verändern "so habe ich es verstanden" also den aktuellen wert von LP siehe x (Berechnung) in LP kopieren.

Werde es mal versuchen Danke.

[himitsu]

Zitat:

CopyMemory erwartet pointer ohne @ lässt es sich nicht kopieren

Und warum sind dann lP und x keine Pointer?


Ach ja, anstatt so wild rumzupointern,
wäre ein Cast in den richtigen Recordtypen und dann zuweisen an das gewünschte Feld wohl sowieso besser.

pMEASUREITEMSTRUCT(LParam).itemHeight := ms32_RowHeight;

https://docs.microsoft.com/en-us/win...sureitemstruct

Zitat:

D2010 also 32Bit

In 20 Jahren willst das dann mal als 64 Bit kompilieren und es knallt wieder .......

Tja, hättest du mal gleich die richtigen Typen verwendet.
(PS: falsche Typen waren auch der Grund, warum es 2009 bei Vielen so schön beim Unicode geknallt hat)