Execute Delphi News

Je viens de découvrir un projet qui m'intéresse beaucoup. Je suis un inconditionnel du langage Pascal, mais avec l'offre mutualisée de OVH il est pratique d'héberger des sites web en PHP/MySQL...ce qui m'amène à faire du développement PHP, ce que je trouve parfois pénible je dois l'avouer.

J'ai essayé à plusieurs reprises de trouver un mode de fonctionnement agréable en PHP, comme avec Pho, mais rien n'y fait, je préfère toujours le Pascal et de façon générale les langages compilés...Un compilateur Pascal pour PHP, voilà qui mérite qu'on s'y intéresse : pas2php !

J'ai longtemps travaillé avec Delphi 6, bien après la sortie de Delphi XE et de ses successeurs.

Ce n'est que récemment que j'ai basculé la grand majorité de mes développements sur les dernières versions de Delphi, aussi quand j'ai écrit l'unité Execute.GDIPBitmap j'ai utilisé les dernières possibilités du langage.

Mais qu'à cela ne tienne, je viens de faire une version pour les anciennes version

Delphi supporte depuis plusieurs versions les formats JPEG et PNG, par contre en standard, il n'est pas possible de lire des images TIFF.

Qu'à cela ne tienne, on s'appuyant sur GDI+, l'unité Execute.GDIPBitmap ajoute une méthode GDIPLoadFromStream à la classe TBitmap.

uses
  Execute.GDIPBitmap;
var
  bitmap: TBitmap;
  stream: TFileStream;
begin
  bitmap := TBitmap.Create;
  stream := TFileStream.Create('SAMPLE.JPG', fmOpenRead or fmShareDenyNone);
  bitmap.GDIPLoadFromStream(stream):
  stream.Free;
end;

GDIPBitmap sur Github

Execute publie régulièrement des codes sources pour Delphi sur son repository Github !

https://github.com/tothpaul