TStringGrid, wordwrap, 1zeilig sieht es blöd aus

[hoika]

Hallo,

nein, das war ein Versuch.
Geht ja nicht (laut SDK).
Ich habe Posting #5 geändert.

Noch mal:

Delphi-Quellcode:

        if RowHeights[R]<=AGrid.DefaultRowHeight then
        begin
         // hier kommt er rein,
            aber siehe Screenshot
          DrawText(Handle, PChar(S2), length(S2), DrawRect,
                   dt_singleline
                   or iAlign);
        end           
        else
        begin
          DrawText(Handle, PChar(S2), length(S2), DrawRect,
                   dt_wordbreak
                   or dt_vcenter  // klappt nicht, steht auch so im SDK
                   or iAlign);
        end;

Lade doch mal das Projekt runter und klicke auf den rechten Button.



Heiko