Chargement d'images au format FITS

Bonjour à tous,

Je dois traiter des images au format FITS ..
A l'aide du composant "Image" (Delphi Vers.6)
J'utilise le code suivant :

 if OpenPictureDialog1.Execute then
  begin
    CurrentFile := OpenPictureDialog1.FileName;
   Image1.Picture.LoadFromFile(CurrentFile);
  end;

Créer Var :

Var
  FileFits : String ;
  FileName, CurrentFile : String ;
et j'ai le msg d'erreur -> "format de ficheir inconnu "
J'ai aussi essayé (sans succés):
//  If OpenDialog1.Execute Then
//  FileFits := FileFits ;
//  Image1.Picture.LoadFromFile(FileFits); // erreur Format (Fits) NON reconnu

Merci d'avance aux spécialistes qui se reconnaîtrons, pour un bon conseil

Faymoipeur

Salut,
il y a aussi ces liens

 
@+
Cirec

---