DrawText - drukowanie w delphi

0

Witam
Mam następujący problem, chciałbym wydrukować tekst w prostokącie o podanych wymiarach i lokalizacji według współrzędnych X1,Y1,X2,Y2 chciałem do tego celu użyć funkcji DrawText jednak nie wiem jak to uczynić. Jeśli ktoś mógłby mi powiedzieć jak narysować taki kwadracik z wyśrodkowanym tekstem na dowolnych współrzędnych był bym wdzięczny.

  
with R do
  begin
    Top := LineHeight;
    Left := 20;
    Right := Printer.PageWidth; 
    Bottom := LineHeight * 2;
  end;
 
  DrawText(Printer.Handle, 
  'Service for programmers [TEKST', -1, R, DT_CENTER);

I przy okazji zapytam czy użycie with do określenia jest konieczne czy istnieje inny sposób. z góry dzięki

0

Printer.Canvas.Handle a nie Printer.Handle. Poza tym na sieci jest od metra jak drukować

0

Owszem jest wszystko z tego większość to śmieci zbędne i nieprzydatne informacje
Jeśli się orientujesz to może mógłbyś mi trochę bardziej to rozjaśnić Printer.Canvas.Handle
Pozwala zdefiniować współrzędne prostokąta? Np. 10,10,20,20 i pozwoli na zachowanie wytycznych zastosowane w powyższym kodzie?
Jeśli możesz to napisz jakiś przykładowy kod niekoniecznie musisz opisywać jakoś sam już dojdę, wszelkie inne ciekawostki też będą mile widziane

1 użytkowników online, w tym zalogowanych: 0, gości: 1