Hola,
¿como?
He probado con esto:
Var
bmp:TBitMap;
ico:TIcon;
Begin
bmp:=TBitMap.Create(Self);
ico:=TIcon.Create(Self);
bmp.LoadFromFile(Archivo);
ico.Assign(bmp);
bmp.Free;
ico.Free;
End;
No da error, pero si Excepcion en la siguiente linea:
ico.Assign(bmp);
Gracias y saludos a todo el foro
