Missing Unit for Examples\transport\Autodrone

[Jerome.D (BeanzMaster)]

Hi Pavel what there units IdBaseComponent, "IdCoder, IdCoder3to4, IdCoderMIME",? where i can found them ?

Thanks

[Pavel Vassiliev]

Hi Jerome,
This are Indy units from system embarcadero rad studio dir, so they may be not present in lazarus. Try simply to exclude them fromm the project. But there is another problem with this demo in rad tokyo now - I've got assertion failure and then bitmap not valid messages. Yet cannot find why.
PW

[Jerome.D (BeanzMaster)]

Hi Pavel thanks i'v found source of Indy but in Autodrone it's seems to just be a simple Base64 encode/decode or similar. I'll take look in Indy code. For "Bitmap image is not valid" try to change GLFileTGA to TGA unit in uses. GLFileTGA Bug in Lazarus as well TGA unit not. Or just convert the TGA to PNG (because of alpha. I don't check if the texture use transparency) For 1st error it seems to be the result of the wrong loading of the TGA texture.

[Jerome.D (BeanzMaster)]

Hi Pavel, iin fact, it seems, TGLPicFileImage is bugged, under Lazarus surely under Delphi to. But where exactly i didn't search for.

so in autodrone demo

change by this

procedure SetTexImageName(ml: TGLMaterialLibrary;
  const matName, filename: string);
var
  libMat: TGLLibMaterial;
 // img: TGLPicFiletImage;
begin
  libMat := ml.LibMaterialByName(matName);
  //libMat.Material.Texture.ImageClassName := TGLPicFileImage.ClassName;
  //img := TGLPicFileImage(libMat.Material.Texture.Image);
  libMat.Material.Texture.Image.LoadFromFile(filename);
end;