Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Text anzeigen lassen, auf dem Formular, ohne Memo (https://www.delphipraxis.net/43412-text-anzeigen-lassen-auf-dem-formular-ohne-memo.html)

Checkitout 3. Apr 2005 17:40


Text anzeigen lassen, auf dem Formular, ohne Memo
 
Also ich habe ein Malprog, wo ich ohne Memo, auf die Formular-Fläche schreiben will. Wie beim Window-Paint-Programm sollte ich auf den Buttom für "texte schreiben" drücken und dann suche ich mir gernau aus, wo ich diesen Text drauf schreiben will. Per kLicken ziehe dann ein Rechteck und iin diesem Rechteck schreiben einen text, wo ich auch die schrift und schriftgröße aussuchen kann. Guckt einfach im Window-Paintprogramm, dann wisst ihr, was ich meine, wenn man eben ein text schreiben will. Ich bin dabei etw. unsicher und würde mch freuen, wenn ich mir helfen könntet. Dankeschön :hi:

s.h.a.r.k 3. Apr 2005 18:32

Re: Text anzeigen lassen, auf dem Formular, ohne Memo
 
Abend!

Also ich hätte da ne Möglichkeit: Und zwar kannst du auf eine Form eine Schrift mit dem folgenden Befehle zeichnen:
für die Form:
Delphi-Quellcode:
Form1.Canvas.TextOut(X, Y: Integer; const Text: WideString);
für ein Bild:
Delphi-Quellcode:
Image1.Canvas.TextOut(X, Y: Integer; const Text: WideString);
Um allerdings nicht einen weißen Hintergrund für die Schirft zu haben musst du:
Delphi-Quellcode:
Form1.Canvas.Brush.Style := bsClear;
setzen. Damit wird der Hintergrund transparent.
Jetzt musch du dich halt nur noch drum kümmern wie du des mit der Eingabe vom Benutzer haben willst! Du kannst es ja auch wie bei PaintShop Pro machen und ein eigenes Fenster öffnen, wo der Benutzer auch ide Textfarbe, Hintergrundfarbe etc. einstellen kann...

Khabarakh 3. Apr 2005 18:53

Re: Text anzeigen lassen, auf dem Formular, ohne Memo
 
Für das Clipping-Rechteck kannst du dir noch Delphi-Referenz durchsuchenDrawText anschauen, RenderText der GR32-Lib beherrscht auch noch Anti-Aliasing.


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:18 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz