Zeilenende eines Memos setzen

[himitsu]

Zitat von Coder1990:

Das mit Canvas.TextWidth ist nur möglich wenn die Font eine Fixed-Width-Font ist und die verbrauchen zu viel Platz in meinem Memo.

Wieso?

OK, das Zeilenende kann bis zu einem halben '.' variieren, aber was soll's.

[Coder1990]

Zitat von s.h.a.r.k:

ListView -> ViewStyle auf Report setzen und zwei Columns einführen.

Init:

Delphi-Quellcode:

LV_Actions.Columns.Add();
LV_Actions.Columns.Add();
LV_Actions.Columns.Items[0].Width := 275;
LV_Actions.Columns.Items[1].Width := LV_Actions.Width-LV_Actions.Columns.Items[0].Width-4;

Neuer Eintrag
LV_Actions.AddItem(s,nil); Neues Ergebnis:
//? Und nochmal in Worten: Wie füge ich dann etwas in die zweite Spalte ein?

[DeddyH]

Delphi-Quellcode:

var Item: TListItem;
begin
  Item := ListView.Items.Add;
  Item.Caption := 'Wuppdi';
  Item.SubItems.Add('Blabla');
end;

[Coder1990]

Perfekt, danke schön, nun klappts.