Tabulator in JvRichedit in Millimetern

[BrunoT]

Hi DPl'er,

ich möchte gern die Tabulatoren im JvRichedit im Millimetern angeben. Bisher habe ich das so versucht:

Delphi-Quellcode:

var
  dc: HDC;
  MMproPixelX, MMproPixely : single;
  xofs, yofs: Integer;
begin
  dc := GetDC(0);
  MMproPixelX := 25.4 / GetdeviceCaps(dc, LOGPIXELSX);
  MMproPixelY := 25.4 / GetdeviceCaps(dc, LOGPIXELSY);
  JvRe.Lines.Add('');
  jvRe.Paragraph.TabCount := 3;
  jvRe.Paragraph.Tab[0] := Round(1 / MMproPixelX * 10); //10mm
  jvRe.Paragraph.Tab[1] := Round(1 / MMproPixelX * 50); //50mm
  jvRe.Paragraph.Tab[2] := Round(1 / MMproPixelX * 100); //100mm
  JvRe.Lines.Add(^I + IntToStr(jvRe.Paragraph.Tab[0]) + ^I +
    IntToStr(jvRe.Paragraph.Tab[1]) + ^I + IntToStr(jvRe.Paragraph.Tab[2]));

Die Tabulator- Abstände passen aber nicht. Was mache ich falsch?

[Avax2k]

ersetze es doch durch die normale tabulatorfunktion:

Delphi-Quellcode:

var 
  dc: HDC; 
  MMproPixelX, MMproPixely : single; 
  xofs, yofs: Integer; 
begin 
  dc := GetDC(0); 
  MMproPixelX := 25.4 / GetdeviceCaps(dc, LOGPIXELSX); 
  MMproPixelY := 25.4 / GetdeviceCaps(dc, LOGPIXELSY); 
//  JvRe.Lines.Add(''); 
//  jvRe.Paragraph.TabCount := 3; 
//  jvRe.Paragraph.Tab[0] := Round(1 / MMproPixelX * 10); //10mm 
//  jvRe.Paragraph.Tab[1] := Round(1 / MMproPixelX * 50); //50mm 
//  jvRe.Paragraph.Tab[2] := Round(1 / MMproPixelX * 100); //100mm 
    JvRe.Lines.Add(^I + chr(vk_tab) + ^I + chr(vk_tab) + ^I + chr(vk_tab));

sollte immer gehen und wenn der Abstand größer sein soll einfach:

Delphi-Quellcode:

chr(vk_tab)+chr(vk_tab)

dann hast du den eben doppelt und immer gleich :-D

[BrunoT]

Hi Avax2k,

das ist aber nicht das was ich wollte, ich möchte schon angeben können, wo die Tabulatoren sind. Das sollte aber auflösungsunabhängig sein. :freak:

mfg

[BrunoT]

Hi,

Ich habe in dem Beispiel für JvRichedit eine Umrechnungszahl gefunden, mit der es jetzt klappt:

Delphi-Quellcode:

  jvRe.Paragraph.Tab[0] := Round(2.83464567*10);
  jvRe.Paragraph.Tab[1] := Round(2.83464567*50);
  jvRe.Paragraph.Tab[2] := Round(2.83464567*100);

was dies für eine Zahl ist, kann ich allerdings nicht sagen. Ist das auch auflösungsunabhänig?

vieleicht kann das jemand beantworten.

mfg

BrunoT