ImageChooser

   Dokümantasyondan aldığım aşağıdaki kodu bir unitte test ederken geri dönüp tekrar o unitte kamerayı aç butonuna bastığımda aşağıdaki hatayı aldım. Geri dönüp 3. defa butona bastığımda tekrar düzgün çalıştı.
RUNTIME ERROR
File library Unit2: Access violation at address 0000000000000000 in module 'ClomosyLearn.exe' (offset 0). Execution of address 0000000000000000 when evaluating instruction CallProc ($FFFFFFFF,$2,$120A270,$0,'ImageChooser').
Stack content is: [2178701724480,2178701867376,2178701572656].
Source position: 225,42
Position: 225, 42

var
myForm:TclForm;
CameraBtn:TclButton;
CameraImg:TClImage;

void onbtnClick;
{
  Clomosy.ImageChooser(MyForm, CameraImg);
}

{

myForm = TClForm.Create(Self);
CameraBtn = myForm.AddNewButton(MyForm, 'CameraBtn','Open the Camera');
MyForm.AddNewEvent(CameraBtn, tbeOnClick, 'onbtnClick');
CameraBtn.Align = alBottom;

CameraImg = myForm.AddNewImage(MyForm, 'CameraImg');

MyForm.setImage(CameraImg,'https://clomosy.com/demos/balloon.png');
CameraImg.Align = alCenter;
CameraImg.Height = 300;
CameraImg.Width = 300;

myForm.Run;

}

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
Melih Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Deneyimli Üye Kayıt Tarihi: 09 Şubat 2026 Durum: Aktif Değil Puanlar: 56	Mesaj Seçenekleri Yanıt Yaz Alıntı Melih Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: ImageChooser Gönderim Zamanı: 1 saat 54 Dakika Önce Saat 17:10
	Dokümantasyondan aldığım aşağıdaki kodu bir unitte test ederken geri dönüp tekrar o unitte kamerayı aç butonuna bastığımda aşağıdaki hatayı aldım. Geri dönüp 3. defa butona bastığımda tekrar düzgün çalıştı. RUNTIME ERROR File library Unit2: Access violation at address 0000000000000000 in module 'ClomosyLearn.exe' (offset 0). Execution of address 0000000000000000 when evaluating instruction CallProc ($FFFFFFFF,$2,$120A270,$0,'ImageChooser'). Stack content is: [2178701724480,2178701867376,2178701572656]. Source position: 225,42 Position: 225, 42 var myForm:TclForm; CameraBtn:TclButton; CameraImg:TClImage; void onbtnClick; { Clomosy.ImageChooser(MyForm, CameraImg); } { myForm = TClForm.Create(Self); CameraBtn = myForm.AddNewButton(MyForm, 'CameraBtn','Open the Camera'); MyForm.AddNewEvent(CameraBtn, tbeOnClick, 'onbtnClick'); CameraBtn.Align = alBottom; CameraImg = myForm.AddNewImage(MyForm, 'CameraImg'); MyForm.setImage(CameraImg,'https://clomosy.com/demos/balloon.png'); CameraImg.Align = alCenter; CameraImg.Height = 300; CameraImg.Width = 300; myForm.Run; }