DT_TABSTOP in Drawtext setzen

[runningsoft]

Hallo,

wenn ich die Hilfe zur API-Funktion DrawText richtig verstanden habe, kann ich mittels des Flags DT_TABSTOP die Breite der Tabulatoren, die beim ausdrucken gesetzt werden, beeinflussen.

Wie lautet denn nun aber die Syntax, um die Schrittweite des Tabulators auf z.B. 12 einzustellen (Standard sind ja wohl 8 Zeichen).

So etwas wie

Delphi-Quellcode:

const DT_TABSTOP = 12;

funktioniert leider nicht.

Vielen Dank

Steffen

[sx2008]

Zitat:

DT_TABSTOP
Sets tab stops. Bits 8–15, which form the high-order byte of the low-order word, of the uFormat parameter specify the number of characters for each tab. The default number of characters per tab is eight. You cannot use the DT_CALCRECT, DT_EXTERNALLEADING, DT_INTERNAL, DT_NOCLIP, and DT_NOPREFIX values with the DT_TABSTOP value.

Delphi-Quellcode:

var
  uFormat : DWORD;
  Tabweite : integer;
begin
  Tabweite := 3;
  uFormat := DT_TABSTOP or DT_LEFT; // linksbündig mit Tabs
  uFormat := uFormat or (Tabweite shl 8);
  DrawText(..., uFormat);

[runningsoft]

Funktioniert perfekt, Danke für die Hilfe.

Steffen