Konuyu Paylaş : facebook gplus twitter

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
QR kodu ve barkod entegere etme
#1
Merhaba;

Barkod ve qr kodu bir arada olan bir sistem yapmaya çalışıyorum, github'dan (Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol) indirdiğim Qrcode ve barkod editörü yok.
Bende kedin editörümü yapmaya çalışıyorum qrcode oluşturduğum imege barkod sitemine entegre etmeye çalıştığımda,

Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol

Görseldeki hatayı alıyorum bu sorunda çözemedim, bu hata neden kaynaklanıyor olabilir?



Qr ve barkod linkleri
Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol  Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol
Hayat bazen güzel olabiliyor.
Cevapla
#2
Merhaba,
Hataya bakılırsa; .png dosyası doğru bir şekilde oluşturulamamış. (Dosya header'ı png formatına uygun değil) 
Image oluşturma yönteminizi gözden geçirin. Png formatı şart değilse, bitmap kullanın.
While true do; Hayat döngüsü, kısır değildir! Yapılan bir yanlış, o döngünün dışına çıkmanızı sağlayacaktır.
WWW
Cevapla
#3
(01-07-2017, Saat: 15:02)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Giriş yap veya Üye OlMerhaba,
Hataya bakılırsa; .png dosyası doğru bir şekilde oluşturulamamış. (Dosya header'ı png formatına uygun değil) 
Image oluşturma yönteminizi gözden geçirin. Png formatı şart değilse, bitmap kullanın.

Resim sorununu çözdüm, fakat Linkleri Görebilmeniz İçin Giriş yap veya Üye Ol indirdiğim Qrcodeyi bir türlü kendi projeme entegre edemedim, VCL ye sadece Qrcodeyi nasıl entegere edebilirim? çıkamadım işin içinden yardımcı olabilirimsiniz.

procedure TForm2.Button1Click(Sender: TObject);
var
 Bitmap: TBitmap;
 Source: TRect;
 Dest: TRect;
begin
  Bitmap := TBitmap.Create;
   try
     with Bitmap do
     begin
       Width := 160;
       Height := 160;
       Dest := Rect(0, 0, Width, Height);
     end;
     with PaintBox1 do
     begin
       Source := Rect(0, 0, Width, Height);
       Bitmap.Canvas.CopyRect(Dest, PaintBox1.Canvas, Source);
       Bitmap.SaveToFile('C:\Users\Dost\Desktop\'QR.bmp');
     end;
   finally
     Bitmap.Free;
   end;
 end;
end;
Hayat bazen güzel olabiliyor.
Cevapla

Konuyu Paylaş : facebook gplus twitter



Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  İki Application Clasından iki Farklı Form Create Etme witalihakko 2 174 01-06-2018, Saat: 12:17
Son Yorum: Tuğrul HELVACI
  Sqllite barkod stok takibi Lord_Ares 6 277 17-05-2018, Saat: 13:58
Son Yorum: Lord_Ares
  WiFi Ağlarını Tespit Etme dilo 1 247 06-04-2018, Saat: 10:17
Son Yorum: SimaWB
  Çalışma anında program kodu yazıp çalıştırmak boreas 9 741 30-10-2017, Saat: 11:17
Son Yorum: engerex
  barkod hido 8 833 22-06-2017, Saat: 12:07
Son Yorum: dilo



Konuyu Okuyanlar: 1 Ziyaretçi