Clomosy Son Sürüm Do-While Hatası

   Merhabalar,
Clomosy'nin en son sürümünde (Debug Form'lu olan) aşağıdaki do while döngüsünde syntax hatası vermekte. Bir önceki sürümde aynı kodu çalıştırınca sorunsuz bir şekilde çalışıyor.
Hata verdiği satır do ifadesinin olduğu satır.

void CustBuyPropose;
var
randomIndex : Integer;
{
  buyPanel.Visible = not buyPanel.Visible;

  do
   {
     randomIndex = clMath.GenerateRandom(0, onSaleItemsID.Count); 
   }
   while (onSaleItemsID.GetItem(randomIndex) == 0);

   InspectItem(onSaleItemsID.GetItem(randomIndex));
   ShowMessage('I want to buy ' + tempName);
}

Teşekkürler.

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
goktugrlr Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 22 Temmuz 2024 Durum: Aktif Değil Puanlar: 22	Mesaj Seçenekleri Yanıt Yaz Alıntı goktugrlr Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: Clomosy Son Sürüm Do-While Hatası Gönderim Zamanı: 30 Temmuz 2024 Saat 18:01
	Merhabalar, Clomosy'nin en son sürümünde (Debug Form'lu olan) aşağıdaki do while döngüsünde syntax hatası vermekte. Bir önceki sürümde aynı kodu çalıştırınca sorunsuz bir şekilde çalışıyor. Hata verdiği satır do ifadesinin olduğu satır. void CustBuyPropose; var randomIndex : Integer; { buyPanel.Visible = not buyPanel.Visible; do { randomIndex = clMath.GenerateRandom(0, onSaleItemsID.Count); } while (onSaleItemsID.GetItem(randomIndex) == 0); InspectItem(onSaleItemsID.GetItem(randomIndex)); ShowMessage('I want to buy ' + tempName); } Teşekkürler.

oguz22 Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 18 Nisan 2024 Konum: İstanbul Durum: Aktif Değil Puanlar: 46	Mesaj Seçenekleri Yanıt Yaz Alıntı oguz22 Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 30 Temmuz 2024 Saat 18:08
	Merhaba bu şekilde kullanabilirsiniz var num, sqrNum : Integer; { num= 1; sqrNum = num* num; Repeat ShowMessage(IntToStr(num)+' Karesi = '+IntToStr(sqrNum)); Inc(num); sqrNum = num * num; until sqrNum > 100; }