Thema: Delphi Im memo ne tabelle

Einzelnen Beitrag anzeigen

marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#4

Re: Im memo ne tabelle

  Alt 1. Nov 2006, 20:30
Hallo Axxus,

setze die Eigenschaft WantTabs deines Memos auf True, Wrap auf False und führe folgenden Code aus:

Delphi-Quellcode:
const
  COLWIDTH = 20;
var
  TabWidth: Integer;
begin
  TabWidth := ColWidth shl 2;
  Memo.Perform(EM_SETTABSTOPS, 1, Integer(@TabWidth));
end;
Jetzt hast du einen horizontalen Tabulator in deinem Memo und kannst Text zweispaltig ausgeben:

Delphi-Quellcode:
begin
  with Memo do
  begin
    Clear;
    Lines.Add('Links'#9'Rechts kommt jetzt');
    Lines.Add(''#9'ein zweizeiliger Text');
  end;
end;
Mit einem Font fester Breite kannst du sogar Semigraphik-Zeichen einsetzen.

Grüße vom marabu
  Mit Zitat antworten Zitat