¿Qué tipo de imagen es?

[Angel.Matilla]

Empezado por ecfisa

Y para no dejar el caso inconcluso, este código muestra en un componente TImage los tipos de imagenes soportados y cuya firma sea evaluada y creada en consecuencia.

Código PHP:

void __fastcall TForm1::DataSource1DataChange(TObject *Sender,
      TField *Field)
{
  unsigned short us;
  TBlobField *blob = static_cast<TBlobField*>(IBDataSet1->FieldByName("IMAGE"));

  CopyMemory(&us, &blob->Value[1], sizeof(us));
  AnsiString st = IntToHex(us, 4);

  TGraphic *gr;
  try {
    if (st == "4D42") gr = new Graphics::TBitmap;
    else if (st == "D8FF") gr = new TJPEGImage;
    else if (st == "0000") gr = new TIcon;
    else if (st == "5089") gr = new TPNGObject;
    // etc, etc, ...
    gr->Assign(blob);
    Image1->Picture = NULL;
    Image1->Picture->Bitmap->Height  = gr->Height;
    Image1->Picture->Bitmap->Width   = gr->Width;
    Image1->Picture->Bitmap->Canvas->Draw(0, 0, gr);
  } __finally {
    delete gr;
  }
} 


Saludos

Interesante código pero, al menos en BCB 6 tengo un probelma: Al compilar me da un error en la línea else if (st == "5089") gr = new TPNGObject; bueno para ser exactos da tres en la misma línea pero es evidente que resuelto, resueltos todos. Son estos:

• [C++ Error] E2303 Type name expected
• [C++ Error] E2034 Cannot convert 'int *' to 'TGraphic *'
• [C++ Error] E2379 Statement missing ;

Está claro que en BCB 6 no sabe como tratar un PNG. Por otra parte, ¿dónde puedo encontrar las firmas de los diferentes tipos de gráfico?

[ecfisa]

Hola.

Empezado por Angel.Matilla

...
Por otra parte, ¿dónde puedo encontrar las firmas de los diferentes tipos de gráfico?

• File signature Database
• List of file signatures

Saludos.

[Angel.Matilla]

Muchas gracias.

[ecfisa]

Hola.

Empezado por Angel.Matilla

...Está claro que en BCB 6 no sabe como tratar un PNG.
...

Intenté con algunas opciones aconsejadas, adaptaciones de bibliotecas para Delphi, sin lograr resultados.

Sin embargo encontré esta que parece prometer algo:

• PNGwriter
• Setting Up PNGWriter for Borland C++ Builder Version 6 on Windows XP

tendrías que probarla ...

Saludos

[Angel.Matilla]

Probareos. Gracfias ecfisa.

[bitbow]

Aqui reviviendo temas resueltos y por si a alguien le es de ayuda.

Tratando un problema similar pero cargando mis imagenes en base 64, al final la cebecera puede o no ir en el binario por lo que no se puede identificar que tipo de archivo es hasta que se intenta representar (jpg, png, bmp), mi mejor opcion fue detectar la extension del archivo (esto no garantiza al 100% que sea el tipo de archivo indicado) y agregar la cabecera a mi cadena base64 (en el problema mencionado aqui seria añadir la extension/tipo de archivo en otro campo), en resumen no hay soluciones infalibles.

Saludos.