Thema: Delphi Auf ein Image schreiben

Einzelnen Beitrag anzeigen

Benutzerbild von Sanchez
Sanchez

Registriert seit: 24. Apr 2003
Ort: Neumarkt Stmk
892 Beiträge
 
Delphi XE6 Enterprise
 
#19

Re: Auf ein Image schreiben

  Alt 11. Mär 2004, 11:31
Hi,

Du meinst vermutlich, dass du die Schriftart auch am Bild dann haben willst, oder?

Delphi-Quellcode:
procedure TForm1.Schriftart1Click(Sender: TObject);
begin
  if FontDialog1.Execute then begin
    edText.Font := FontDialog1.Font;
    Image1.Picture.Bitmap.Canvas.Font := FontDialog1.Font;
  end;
end;
BTW: Würde ich beim anzeigen des Edits auch gleich den Fokus reinsetzen (mit edText.SetFocus

grüße, daniel
Daniel
Testen ist feige!
  Mit Zitat antworten Zitat