AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

DrawText-Problem

Ein Thema von hansklok · begonnen am 19. Feb 2006 · letzter Beitrag vom 20. Feb 2006
Antwort Antwort
hansklok

Registriert seit: 14. Apr 2004
Ort: Karlsruhe
318 Beiträge
 
Delphi 2010 Architect
 
#1

DrawText-Problem

  Alt 19. Feb 2006, 13:21
Hallo, ich habe ein Problem mit der Textausgabe auf eine Canvas. Ich habe aus dem Buch „Borland Delphi 7 – Grundlagen & Profiwissen“ folgenden Quelltext vollständig übernommen:

Delphi-Quellcode:
Var   r: TRect;
   P: PChar;



… FormCreate(Sender: TObject);
Begin
r:= Bounds(0,0,memo1.clientwidth, memo1.clientheight);
End;
Die Button-Klick Procedure sieht wie folgt aus:


Delphi-Quellcode:
p:= PChar(memo1.Text);
image1.canvas.fillrect(r);
DrawText(image1.canvas.handle, p, length(p),r,dt_left + dt_Expandtabs + dt_wordbreak);



Es wird zwar Text auf der Canvas des Images ausgegeben, jedoch mit einem nicht transparenten Hintergrund – siehe Anhang!

Wo könnte der Fehler liegen?

MfG

hansklok
Miniaturansicht angehängter Grafiken
drawtext_153.jpg  
  Mit Zitat antworten Zitat
100nF

Registriert seit: 7. Nov 2004
639 Beiträge
 
#2

Re: DrawText-Problem

  Alt 19. Feb 2006, 13:24
ich glaube es muss so heissen:

Delphi-Quellcode:
p:= PChar(memo1.Text);
image1.canvas.brush.style := bsclear; // <-- das hat gefehlt
image1.canvas.fillrect(r);
DrawText(image1.canvas.handle, p, length(p),r,dt_left + dt_Expandtabs + dt_wordbreak);
  Mit Zitat antworten Zitat
hansklok

Registriert seit: 14. Apr 2004
Ort: Karlsruhe
318 Beiträge
 
Delphi 2010 Architect
 
#3

Re: DrawText-Problem

  Alt 19. Feb 2006, 13:29
Danke, funktioniert. Kleine Änderung, große Wirkung!

MfG

hansklok
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie
(Moderator)

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#4

Re: DrawText-Problem

  Alt 19. Feb 2006, 20:48
Und mach bitte aus den Plus ein or, da es keine Addition ist, sondern eine logische Verknüpfung mit or.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
pacman1986

Registriert seit: 11. Feb 2005
Ort: Kirchhain
498 Beiträge
 
Delphi 2005 Personal
 
#5

Re: DrawText-Problem

  Alt 20. Feb 2006, 16:58
Danke hab ich auch gesucht
Christian N.
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:26 Uhr.
Powered by vBulletin® Copyright ©2000 - 2022, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf