Discussion :

[XeGregory]

bonjour à tous,

Après avoir acheté une licence chez han-soft des composants nommé 2D Barcode VCL Components, je suis très déçu !

Les composants peuvent être associer d'avec une TImage, est pour couronner le tout les propriétés (AutoSize, Center, Proportional) ne sont pas prise en charge !

Impossible de récupéré le graphique directement dans une class TPicture ou TGraphic, obligé de passé par la fonction CopyToClipboard() du composant pour récupéré le graphique. C'est magnifique ! à $125.00 la licence, c'est une belle arnaque !

Impossible d'exporter le graphique directement vers une classe TPngImage, TBitmap, etc...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
procedure TForm1.Button1Click(Sender: TObject);
var
  Picture: TPicture;
begin
  Clipboard.Clear;
  Barcode2D_QRCode1.Barcode := Edit1.Text;
  Barcode2D_QRCode1.CopyToClipboard();
 
  if Clipboard.HasFormat(CF_PICTURE) then
  begin
    Picture := TPicture.Create;
    Picture.Assign(Clipboard);
 
    Image1.center := True;
    Image1.Picture.Assign(Picture);
    Picture.Free;
  end;
end;

[ShaiLeTroll]

Surtout que DelphiZXingQRCode est gratuit et l'export se fait sur une matrice boolean, le dessin, c'est à soit de le faire sur n'import quel support Canvas comme une TPaintBox

[XeGregory]

Surtout que DelphiZXingQRCode est gratuit et l'export se fait sur une matrice boolean, le dessin, c'est à soit de le faire sur n'import quel support Canvas comme une TPaintBox

Actuellement, je me sers des API pour générer les QR Code, ça fonctionne bien à condition que le site web soit opérationnel.


J'ai eu l'idée de retirer cette API et d'invertir dans un composant, avec la possibilité d'insérer d'autres types de code-barres, donc j'avais trouvé plusieurs composants avec licence.

https://www.winsoft.sk/barcode.htm
https://www.han-soft.com/barcode2d.php
https://fr.activebarcode.com/howto/delphi4

J'étais confronté à une multitude de choix et j'ai opté pour le mauvais , Il aurait été préférable que je reste sur ma première idée et que j'utilise DelphiZXingQRCode

La moralité de cette histoire réside dans le fait que la licence payante ne garantit pas que le composant sera performant et complet.