كيف اتخطى اعتراض bitmap image is not valid

[jeanjamil]

السلام عليكم
كيف اتخطى اعتراض
bitmap image is not valid
عندادخال صورة غير   bitmap
اclientdataset

[Agmcz]

وعليكم السلام
بالإعتماد على 2 بايت في أول الملف "BM"
يمكنك التحقق من ملفات *.bmp مبدئيا
مصدر الكود
h__p://hiderin.air-nifty.com/delphi/ado/index.html

PHP كود :

// Bitmapかどうかを判定します。
  function IsBitmap(var Stream: TStream): Boolean;
  var
    Bmfh: TBitmapFileHeader;
  begin
    Stream.ReadBuffer(Bmfh, sizeof(Bmfh));
    Result := (Bmfh.bfType = $4D42);
    Stream.Position := 0; // 先頭に戻しておきます。
  end;