Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Program içinde resim üzerine yazi
#1
Selamlar. 
Bir klasörün içindeki tüm bilgileri PDF-JPG dosya yoluyla birlikte programıma kaydediyorum.Yani;
C:\DOSYALAR\Deneme.jpg  diye bir klasörüm ve içinde resmim var 
ben programımda bu yolu kaydediyorum ve bu resmide image de gösterebiliyorum. Başka bir uzantıyı da ekleyebiliyorum mesela dwg, dxf.. Buraya kadar her şey normal.
Yapmak istediğim şu. 
1. Programım içinde jpgleri gösterdiğim image gibi Dwg ve diğer tüm formatları görebileceğim bir yöntem var mıdır?
2. Diyelim ki eklediğim pdf, jpg veya başka bir dosyayı programım içinde image de gördüm. Bu resmin veya pdf in üzerine yazı yazmak istiyorum ve bundan sonra açtığımda da o yazıyı görmek istiyorum. Bunu nasıl yapabilirim? Component araştırdım ama bulamadım. 

Bu konular hakkında yardımcı olabilir misiniz? Teşekkür Ederim.
Saygılarımla.
Cevapla
#2
Merhaba ,
Var
   Img    : TBitmap;
   Jpg    : TJPEGImage;
Begin
       Try
         Jpg:=TJPEGImage.Create;
         Jpg.LoadFromFile('c:\deneme.jpg');
         Img:=TBitmap.Create;
         Img.Assign(Jpg);
         Img.Canvas.Font:=Form1.Font;
         Img.Canvas.Font.Size:=36;
         Img.Canvas.Font.Color:=clRed;
         Img.Canvas.Brush.Color:=clWhite;
         Img.Canvas.TextOut(0,0,'istediğiniz yazıyı buraya yazın ');
         jpg.Assign(Img);
         Jpg.SaveToFile('C:\deneme1.jpg');
       Finally
           FreeAndNil(Jpg);
           FreeAndNil(Img);
       End;
End;
şeklinde jpg dosya istediğiniz yazıyı istediğiniz gibi yazabilirsiniz.
jpg dosya üzerine yazıyı
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  [ÇÖZÜLDÜ] macos işletim sistemine program yazmak shooterman 5 513 02-02-2024, Saat: 09:54
Son Yorum: shooterman
  dxRichEditControl Resim Kaydı m_ekici 0 222 31-10-2023, Saat: 01:42
Son Yorum: m_ekici
  program exe icon sorunu cvheneburi 9 2.830 19-10-2023, Saat: 15:04
Son Yorum: harunyl
Sad Tabsheet içinde Form Create, Close olayları YILDIRIMBEY 0 248 24-08-2023, Saat: 17:26
Son Yorum: YILDIRIMBEY
  Thread içinde CoInitialize(nil) ve CoUninitialize serdar 6 1.067 22-08-2023, Saat: 09:50
Son Yorum: yhackup



Konuyu Okuyanlar: 1 Ziyaretçi