Перейти к содержанию
Fire Monkey от А до Я
  • 0

invalid class type cast в TakePhotoFromLibraryAction


x11

Вопрос

procedure TfmEditObject.TakePhotoFromLibraryAction1DidFinishTaking(
  Image: TBitmap);
begin
  ShowMessage('TakePhotoFromLibraryAction1DidFinishTaking');  
  AddPhoto(Image);
end;



procedure TfmEditObject.AddPhoto(Image: TBitmap);
Var
  item: TListBoxItem;
//  ListItemImage: TListViewItem;
  imageV: TImageViewer;
begin
  item := TListBoxItem.Create(lbPhotos);
  item.parent := lbPhotos;
  item.text   := '';
  item.Width  := lbPhotos.Width;

  imageV := TImageViewer.Create(lbPhotos);
  imageV.HitTest := False;
  imageV.Parent  := item;
  imageV.Align   := TAlignLayout.Client;
  imageV.Bitmap.Assign(image);

  item.SetFocus;
//  ListItemImage := ListView1.Items.Add;
//  ListItemImage.Height := self.Width;
//  ListItemImage.Bitmap.Assign(Image);
end;

 

При нажатии на SpeedButton получаю invalid class type cast.

Ставлю бряку (на картинке подтверждение). Но ошибка вываливается до неё.

ShowMessage('TakePhotoFromLibraryAction1DidFinishTaking');  не появляется

Screenshot_71.png

Screenshot_73.png

Ссылка на комментарий

Рекомендуемые сообщения

  • 0

И вот какая странность: если нажать кнопку TakePhotoFromCameraAction, то появляется возможность сфоткать и ошибок нет.

А потом нажимаю эту проблемную кнопку и уже в этом случае ошибка "invalid class type cast" не появляется более.

Ссылка на комментарий
  • 0

Я могу перевести и без переводчика.

Я не могу понять, откуда лезет ошибка. Из внутренностей FMX?

Ведь ошибка происходит до моего кода.

 

Вот что заметил. Если я перед нажатием на кнопку тапну по ListBox`у, то ошибки не возникает.

Ссылка на комментарий
  • 0

Привет, столкнулся с абсолютно такой же проблемой!

Вызывал action при нажатии на SpeedButton и проблема... выяснилось, что камере нужен был фокус на контроле (не знаю для чего)

Проблему решил так: заменил speedbutton на обычный button и все, надеюсь, тебе тоже поможет!

Ссылка на комментарий

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

×
×
  • Создать...